Registriert seit: 14. Apr 2007
Ort: Pirna
50 Beiträge
Delphi 7 Enterprise
|
AW: StringReplace mehrfach
27. Mär 2012, 14:45
HeHe
Also:
Code:
List.DelimitedText := MWKStringReplace.StringReplace(Quelle[i], '(?<=^|[[:punct:][:space:]])', '', [rfReplaceAll]);
List.DelimitedText := MWKStringReplace.StringReplace(Quelle[i], '(?=[[:punct:][:space:]]|$)', '', [rfReplaceAll]);
if List.Count > 0 then
Ziel1.Add(StringReplace(List[0], #255, ' ', [rfReplaceAll]));
if List.Count > 1 then
Klappt schonmal nicht... da nimmt er nur des Letztere das ist das Doofe
MfG
|
|
Zitat
|