vllt solltest du noch mal genau erklären was du meinst??!!
also das hier:
Delphi-Quellcode:
procedure TForm1.speedbutton1Click(Sender: TObject);
begin
memo1.lines.text := memo1.lines.text + #13#10;
end;
//sollte eigentlich den ein "enter" nach deinem text einfügen
aber vllt verstehen wir dich auch nur falsch??
und willst du nur den cursor noch am ende gleich sehen?? dann vllt auch so:
Delphi-Quellcode:
procedure TForm1.speedbutton1Click(Sender: TObject);
var
carpos: tpoint;
begin
memo1.lines.text := memo1.lines.text + #13#10; //fügt nach dem text ein "enterzeichen" ein
memo1.SetFocus; //setzt den focus wieder auf memo
carpos.x := 0; //setzt die variable carpos.x auf den zeilenanfang im memo
carpos.Y := memo1.Lines.Count; //setzt die variable carpos.y auf das memo text ende
memo1.CaretPos := carpos; //weißt dem memo cursor die variable carpos zu
end;
edit:
beschreibung eingefügt