| |
|
|
Rainer Hoefs | Salut,
j'ai déjà gesucht, mais rien trouvé, vllt. falschen Suchbegriff benutzt.
comment peux je une tabulateur-Contrôle pour Controls festlegen, avant allem qui richtige Reihenfolge, si cela prochain Contrôle avec TAB angesprungen wird, cela vorherige avec ShiftTab ou bien AltTAb ou bien StrgTab.
MfG Rainer |
|
|
| |
|
|
|
Georg Teles | allô, habe là quoi sur qui Schnelle trouvé [...] et umgebastelt
$H windows.ph
cls
Déclarer b%[10]
Def OnTAB(0) MenuItem(9)
WhileLoop 0,10
b%[&loop] = create("button",%hwnd,"Button "+Str$(&loop),0,20*&loop,100,20)
Endwhile
SetFocus(b%[0])
AddHotKey 9,9,0
Tandis que 1=1
WaitInput
Si OnTAB()
SetFocus(GetNextChild(%getfocus))
locate 2,20
Imprimer "nächster " + GetText $(GetNextChild(%getfocus))+" "
locate 0,20
Imprimer "aktuell " + GetText $(%getfocus)+" "
EndIf
Endwhile
Proc GetNextChild
Paramètres h&
Var ID% = ItemId(h&)
Var hNext& = GetHandle(~GetParent(h&),ID% + 1)
Cas hNext& = 0:hNext& = GetHandle(~GetParent(h&),1000)
Retour hNext&
ENDPROC
Gibt sicherlich une bessere Solution
Grüße |
|
|
| |
|
|
|
Rainer Hoefs | allô et vielen Dank pour den Tip. malheureusement funktioniert es dans mon Programme pas. Rainer |
|
|
| |
|
|
|
Georg Teles | Salut,
Rainer Hoefs (02.05.2023)
malheureusement funktioniert es dans mon Programme pas.
ici sollte naturellement im En-tête Def OnTAB(0) MenuItem(9) pas manquer et avant qui Boucle SetFocus(b%[0]) et AddHotKey 9,9,0
hierbei sollte on den ersten Button avec SetFocus(_Handle_Button_) "fokusieren", avec cela qui Sprung avec qui TAB-bouton klappt
qui Code wurde sous X4 et X2 getestet, allez ... möglicherweise la hâte Du qui TAB bouton avec einem anderen Code déjà "reserviert/gelockt" ?
Grüße |
|
|
| |
|
|