Cursor in TEdit

[Pluto]

Hallo,
ich hab folgendes Problem:
Auf einem Formular u.a. ein TEdit (genauer gesagt, es ist ein TDBEdit,
aber das ändert nichts an der Aufgabe), das bereits einen Teiltext
enthält.
Wenn ich nun mittels Tab auf das TEdit springe, so soll der Cursor
bereits am Ende des enthaltenen Teiltextes stehen. Wie kann ich das
erreichen?

Beispiel: Ich benutze das TDBEdit als Eingabefeld für eine Telefon-
nummer. Aus der Datenbank enthält das Feld bereits die Vorwahl z.B.:
[06832- ]. Wenn ich den Cursor im Editfeld per Code ans Ende der
Vorwahl bringen könnte, kann der User einfach weiter tippen, um
die Telefonnummer zu ergänzen.

Dank für Hilfe

[ErazerZ]

meinst du vielleicht sowas?

Delphi-Quellcode:

procedure TForm1.Edit1Enter(Sender: TObject);
begin
  Edit1.SelStart := Length(Edit1.Text);
end;

[Pluto]

Danke an ErarserZ

Das wars! Manchmal sieht man den Wald vor lauter Bäumen nicht.