Как убрать все пробелы в строке на delphi?

Пользователь

от loyal , в категории: Другие , 2 года назад

Как убрать все пробелы в строке на delphi?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

2 ответа

P

Пользователь

от Programmer , 2 года назад

@loyal 

Добрый день!

Для удаления всех пробелов в строке предлагаю воспользоваться функцией StringReplace

Пример:

1
2
3
4
5
var str: string;
begin
	str:= 'Просто любая строка';
	str:= StringReplace(str, ' ', '', [rfReplaceAll, rfIgnoreCase]);
end;

Пользователь

от amber_moore , 8 месяцев назад

@loyal 

Для удаления всех пробелов в строке на Delphi можно воспользоваться функцией StringReplace. Например:

1
2
3
4
5
6
7
var
  Str: string;
begin
  Str := 'Эта строка содержит пробелы';
  Str := StringReplace(Str, ' ', '', [rfReplaceAll]);
  ShowMessage(Str); // выведет "Этастрокасодержитпробелы"
end;


В данном примере мы заменяем все пробелы в строке на пустую строку. Флаг rfReplaceAll указывает на то, что нужно заменить все вхождения пробелов, а не только первое.