Zitat von
Matze:
Delphi-Quellcode:
RichEdit1.Lines.Exchange(0,RichEdit1.CaretPos.Y);
RichEdit1.Lines.Strings[richedit1.CaretPos.Y]:='
';
Du läßt ja auch die ganze Zeile ersetzten!
Probier mal:
Delphi-Quellcode:
RichEdit1.Lines.Strings[richedit1.CaretPos.Y]:=RichEdit1.Lines.Strings[richedit1.CaretPos.Y]+'
';
Das Setzten des Cursors müßtest du alleine hinbekommen, gab es auch schon oft genug hier im Forum.