Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Cursor in TEdit positionieren


awzvm - Di 25.11.08 09:22
Titel: Cursor in TEdit positionieren
Hallo lieber Helfer,

ich habe ein TEdit-Feld, welches bereits Text enthält. Da es aufgrund einer anderen Aktion (welche den Focus unbedingt braucht) den Focus verliert, mache ich folgendes:

TEdit.setfocus;

Nun hat das TEdit wieder den Focus, und der Text ist komplett markiert.
Ich würde gern aber keinen markierten Text und stattdessen den Cursor an das Ende des Textes setzen, so das der Nutzer die Eingabe anfügen kann. Ist das irgendwie möglich?

Viele Grüße
awzvm


JayEff - Di 25.11.08 10:20

Versuchs mit folgendem Schnipsel:

Delphi-Quelltext
1:
2:
  Edit1.SetFocus;
  Edit1.SelStart := length(Edit1.Text);

Ich setze damit den Anfang der Auswahl auf das Ende des Textes.


awzvm - Di 25.11.08 10:38

Das ist SUPER.

Im ganzen Netz nichts gefunden, und hier steht nun die Lösung :-)

Danke JayEff


JayEff - Di 25.11.08 10:42

Aber gern doch :mrgreen: