Leerzeichen in einem String rauslöschen

[Dejan Vu]

Falls es noch jemanden interessiert: Ich mach das in einer Schleife (bzw. würde es bei langen Strings so machen):

Delphi-Quellcode:

Function ZapSpaces (Const s: String) : String;
Begin
  Result := '';
  for c in s do if c<>' ' then Result:=Result+c;
End;

Wegen FastMM4 als Speichermanager auch schnell genug. Meiner Meinung nach schneller als ReplaceString.