Prob mit RichEdit (allgemein)

[MiniKeks]

Delphi-Quellcode:

Im RichEdit bis nach unten scrollen


Das zeigt, wie man in einem RichEdit den Cursor in die letzte Zeile setzt und so den untersten Abschnitt des RichEdits sichtbar macht.


procedure TForm1.Timer1Timer(Sender: TObject);
begin
  RichEdit1.Lines.Add('Test-Zeile');
  RichEdit1.Perform(EM_SCROLLCARET, 0, 0);
  RichEdit1.SelStart:=length(RichEdit1.text); 
end;

Gruss MiniKeks