|
Registriert seit: 28. Mär 2005
Ort: Hamburg
802 Beiträge
Delphi 11 Alexandria
|
Text ersetzen
19. Apr 2005, 15:20
Hat jemand eine Funktion die mir in einem String nach einem Char sucht und diesen durch einen anderen String ersetzt? Der Char soll nur ersetzt werden, wenn er nicht mehrmals genau hinereinander auftritt. Wenn er 2x hintereinader auftritt soll ein Char entfernt werden.
Beispiele
Replace(s, '|', #13#10)
Das ist ein Test|und das auch. --> Das ist ein Test#13#10und das auch.
Das ist ein Test||und das auch. --> Das ist ein Test|und das auch.
Das ist||ein Test|und das|||auch. --> Das ist|ein Test#13#10und das|#13#10auch.
|