Wow das ging schnell.
Danke für die antworten das hilft mir sehr weiter. Ich hab es nun umgeändert in folgendes :
Delphi-Quellcode:
s:=Memo1.Lines.GetText;
a:=edit2.text;
s:=StringReplace(s,a,a+#13,[rfReplaceAll, rfIgnoreCase]);
Memo1.Text:=s;
Er macht nun auch etwas aber im Memo wird keine neue Zeile erzeugt sondern es wird ein komischer Strich eingefügt.
Woran kann das liegen ?
danke nochmal für eure Hilfe
gruss bloody.brain