Einzelnen Beitrag anzeigen

Benutzerbild von Catbytes
Catbytes

Registriert seit: 7. Sep 2002
Ort: Heckendalheim
353 Beiträge
 
Delphi XE5 Enterprise
 
#16

Re: StringReplace und seine Tücken

  Alt 7. Dez 2005, 10:19
Zitat von Jasocul:
@Catbytes:
Ein bisschen mehr Fantasie. Erst das ";" und dann das"#".
Okay:

Delphi-Quellcode:
    s := StringReplace(Memo1.Lines[i], ';', ';', [rfReplaceAll]);
    s := StringReplace(s, '#', '#', [rfReplaceAll]);
    s := StringReplace(s, '&', '&', [rfReplaceAll]);
    s := StringReplace(s, 'ä', 'ä', [rfReplaceAll]);
Ergibt:

Mustermann GmbH & # 3 8 ; Co. KG

T& # 2 2 8 ;ler, W& # 2 2 8 ;lder& # 3 8 ; & # 3 8 ; # 3 5 ; 5 9; all das & # 3 8 ; # 3 5; ist Natur & # 3 8 ; schön.



Zitat von Jasocul:
Man muss die Ursache beheben und nicht die Symptome.


Trotzdem danke für die Tipps. Egal wie ich es drehe und wende: eine Sache wird immer "falsch" ersetzt.

Noch andere Ideen?
Catbytes
  Mit Zitat antworten Zitat