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

@loyal 

Добрый день!

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

Пример:

1
2
3
4
5

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

@loyal 

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

1
2
3
4
5
6
7

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

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