Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi TCombobox Text deselektieren nach SetFocus (https://www.delphipraxis.net/213302-tcombobox-text-deselektieren-nach-setfocus.html)

himitsu 12. Jul 2023 16:57

AW: TCombobox Text deselektieren nach SetFocus
 
Zitat:

Zitat von Delphi.Narium (Beitrag 1524292)
Geht das?
Delphi-Quellcode:
Start := Length(ComboBox1.Text) // evntuell + 1?;

Da SetStart bei 0 beginnt, ist Length bereits hinter dem letzten Zeichen.
Prinzipiell gäbe es somit eigentlich kein +1 mehr, aber praktich könnte man hier auch einfach MaxInt für "Ende" reingeben (falls ich das nicht falsch in Erinnerung hab).

KodeZwerg 13. Jul 2023 01:06

AW: TCombobox Text deselektieren nach SetFocus
 
High(Word) triffts wohl eher, da das die maximal länge dieses wincontrols ist. (siehe post #4 - $FFFF)

himitsu 13. Jul 2023 01:27

AW: TCombobox Text deselektieren nach SetFocus
 
OK, wenn man die neuerdings aktive Überlaufprüfung wieder deaktiviert, dann passt MaxInt auch. :lol:

Hmmm, prinzipiell stimmt's also, wenn man den richtigen Typ nimmt. :oops:
Hatte wohl mehr EM_SETSEL im Kopf (wie kam ich nur darauf, dass das Edit in der ComboBox ein Edit sei ... neee, hat seine eigene API)

KodeZwerg 13. Jul 2023 09:41

AW: TCombobox Text deselektieren nach SetFocus
 
Bin mir nicht ganz sicher was passiert wenn man jenseits von 64k den cursor setzt, prinzipiell hats nach hinten hin keine fix-Grenze, wenn man über Length() hinaus geht setzt die API es automatisch ans Ende wobei mytbo und ich uns mehr an die API gehalten haben mit -1

himitsu 13. Jul 2023 09:44

AW: TCombobox Text deselektieren nach SetFocus
 
Vermutlich gehen sie davon aus, dass im Edit nur Text steht, der auch in der Liste vorkommt.
Und da können sollten eh nicht unendlich lange Texte drin stecken.


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:45 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz