Bei Enter wort einfügen und neue Zeile

[Illuminator-23-5]

ich würd sagen, es wär besser, wenn man die abfrage im Ereignis des Richedits/des eingabefelds zu machen, denn wenn man sonst irgendwo enter drückt, dann wird das ereignis doch ausgeführt (sprich: keypreview dann auch auf false)

dann würds so aussehen (wie schon von stanlay angedeutet)

Delphi-Quellcode:

procedure TForm1.RichEdit1KeyPress(Sender: TObject; var Key: Char);
begin
  if key = #13 then
    richedit1.Lines[richedit1.CaretPos.Y] := richedit1.Lines[richedit1.CaretPos.Y] + '
'
end;