Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
29. Sep 2009
Edit1.SelStart := Length(Edit1.Text) - 3;
Edit1.SelLength := 3;
Edit1.SelText := '';
löscht die letzen 3 Zeichen
Text einfügen/anhängen
Edit1.SelStart := i;
// diese Zeile kann weg, da SelLength durch SelStart auf eh 0 steht
//Edit1.SelLength := 0;
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
29. Sep 2009
Wenn du Edit.Text einen Wert zuweißt, wird nunmal unweigerlich der Cursor von Windows an den Anfang gesetzt.
VirtKeyBoardEdit.SetFocus;
VirtKeyboardEdit.SelStart := -1;
VirtKeyboardEdit.SelText := 'a'; // 'a' hinten dranhängen
VirtKeyboardEdit.SelStart := -1;
Der einzige Weg, wo der Cursor nicht erst nach vorne springt, wäre nur die Selection zu ändern.