zeichen durchlaufen und bestimmte Zeichenfolge finden

[choose]

Wenn Du [dp]reguläre Ausdrücke[/dp] (auch ohne die SynEdit-Suite) einsetzen möchtest, könntest Du zB mit diesem Code

Delphi-Quellcode:

Result:= RegExp('\b\d{5}\b').Match(Memo1.Text);

feststellen, ob überhaupt eine Ziffernfolge der Länge von als einzelnes Wort (bei Deiner Lösung würde auch etwas der Form "1234567" mit den Ziffern "12345" treffen, obwohl eigentlich eine siebenstellige Zahl vorhanden ist) im Text des Memos vorhanden ist.

Oder, falls Du vor allen ggf vorhandenen "Postleitzahlen" (def. s.o.) einen Zeilenumbruch einfügen möchtest, etwas in der Art

Delphi-Quellcode:

with RegExp('\b\d{5}\b') do
  Memo1.Text:= Replace(Memo1.Text', #13#13'$1', True);

[woki]

HI

Zitat:

Zitat von Minz

@woki

dazu müsste er doch definieren was Postleitzahl ist.

Die kann u.U. unterschiedlich sein

ok, ich hab mich wohl von der Formulierung

Zitat:

nach einer bestimmten Zeichenfolge

in die Irre führen lassen.

Grüsse
Woki