Wie setze ich den Curser an das Ende des textes im Editfeld

[Luckie]

Autsch. Das tut ja schon weh, wenn man das sieht.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Edit1.SetFocus;
  Edit1.SelStart := length(Edit1.text);
end;