Einzelnen Beitrag anzeigen

EarthQuaker

Registriert seit: 14. Apr 2007
Ort: Pirna
50 Beiträge
 
Delphi 7 Enterprise
 
#8

AW: StringReplace mehrfach

  Alt 27. Mär 2012, 13: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
  Mit Zitat antworten Zitat