Registriert seit: 12. Jan 2005
Ort: Waldshut-Tiengen
2.875 Beiträge
Delphi 2007 Enterprise
|
Re: lerzeichen entfernen
10. Jul 2008, 13:53
Zitat von marabu:
Hi,
bevor ich StringReplace() dreimal aufrufe, dann lieber eine Funktion, wie Guido es vorgeschlagen hat: klick
StringReplace liegt ja als Source vor, da kann man das ja selber erweitern, dass er als OldString ein "set of String" akzeptiert. Alles, was in diesem Set drin ist, wird durch NewString ersetzt.
Ungefähr so:
Delphi-Quellcode:
Tiere := 'Hund, Elefant, Katze, Frosch, Giraffe, Maus';
Tiere := StringReplace(Tiere, ['Hund', 'Katze', 'Maus'], 'Haustier')
Klaus E. Linux - das längste Text-Adventure aller Zeiten...
Wer nie Linux mit dem vi konfiguriert hat, der hat am Leben vorbei geklickt.
|
|
Zitat
|