Cursor in TEdit positionieren

awzvm · Beiträge: 27

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 · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

Versuchs mit folgendem Schnipsel:

markieren

Delphi-Quelltext

1:
2:

  Edit1.SetFocus;
  Edit1.SelStart := length(Edit1.Text);

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

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

awzvm · Beiträge: 27

Das ist SUPER.

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

Danke JayEff

JayEff · Beiträge: 2971 Windows Vista Ultimate D7 Enterprise

Aber gern doch :mrgreen:

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme