Nach Auwahl von ComboBox automatisch in nächste Feld wechseln

johny1099

Hallo zusammen

ist es möglich, dass nach Auswahl eines Eintrages in der ComboBox, der Cursor automatisch in nächste Feld wechselt?

[autoit]

#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
Dim $form_main = GUICreate("Beispiel Formular",250,250)
Dim $input_1 = GUICtrlCreateInput("",10,10,100,20)
Dim $combo_1 = GUICtrlCreateCombo("",10,50,100,20,$CBS_DROPDOWNLIST)
GUICtrlSetData(-1,"Entry 1|Entry 2|Entry 3","Entry 1")
Dim $input_3 = GUICtrlCreateInput("",10,90,100,20)
Dim $bttn_exit = GUICtrlCreateButton("Exit",180,200,60,30)

[/autoit][autoit][/autoit][autoit]

GUISetState()
While 1
$nmsg = GUIGetMsg()
Select
Case $nmsg = -3 or $nmsg = $bttn_exit
Exit
EndSelect
WEnd

[/autoit]

MfG
johny1099

name22

Wie jetzt? Zum nächsten Control oder wie?
Wenn du das so gemeint hast, dann frag einfach Änderungen des ComboBox Inhalts ab und setze den Fokus mit ControlFocus oder GUICtrlSetState auf das Control mit der nächsten ControlID. Also die ControlID des jetzigen Controls plus 1.

johny1099

Hallo name22

sorry, dass ich das für Dich unverständlich formuliert habe. Ich meine zum nächsten Control (s. Beispiel ==> $input_3).

Wie kann ich prüfen ob eine Änderung des Combobox Inhalts stattgefunden hat.?

MfG
johny1099

name22

Zitat

e kann ich prüfen ob eine Änderung des Combobox Inhalts stattgefunden hat.?

Das geht bei der Comboboc recht einfach, weil GUIGetMsg die ID der Box zurückgibt wenn ein Wert ausgewählt wurde ;).
Beispiel:

Spoiler anzeigen

[autoit]

#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>

[/autoit] [autoit][/autoit] [autoit]

$form_main = GUICreate("Beispiel Formular",250,250)
$input_1 = GUICtrlCreateInput("",10,10,100,20)
$combo_1 = GUICtrlCreateCombo("",10,50,100,20,$CBS_DROPDOWNLIST)
GUICtrlSetData(-1,"Entry 1|Entry 2|Entry 3","Entry 1")
$input_3 = GUICtrlCreateInput("",10,90,100,20)
$bttn_exit = GUICtrlCreateButton("Exit",180,200,60,30)
GUISetState()

[/autoit] [autoit][/autoit] [autoit]

$sBuffer = GUICtrlRead($combo_1)

[/autoit] [autoit][/autoit] [autoit]

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $bttn_exit
Exit
Case $combo_1
ControlFocus($form_main, "", $input_3)
EndSwitch
WEnd

[/autoit]

johny1099

Hallo name22

das funktioniert soweit sehr gut.

Ich habe nur festgestellt, dass wenn ich auf dem ComboFeld bin und die Pfeiltaste nach unten drücke der Cursor sofort auf das Input_3 Feld springt. Ich kann jetzt nicht mehr "blättern" wenn ich auf dem ComboFeld bin und die Pfeiltaste nach unten drücke.

MfG
johny1099

name22

Zitat

Ich habe nur festgestellt, dass wenn ich auf dem ComboFeld bin und die Pfeiltaste nach unten drücke der Cursor sofort auf das Input_3 Feld springt. Ich kann jetzt nicht mehr "blättern" wenn ich auf dem ComboFeld bin und die Pfeiltaste nach unten drücke.

Das ist auch richtig so. Schließlich wird bei jedem "blättern" ein neues Item ausgewählt.

**Raupi**

Du kannst z.B. per WM_COMMAND den Event $CBN_DBLCLK abfragen. Dieser Event wird ausgelöst, wenn man doppelt auf einen Eintrag in der Dropdownliste klickt.

Spoiler anzeigen

[autoit]

#Region - Timestamp
; 2011-06-28 18:35:46
#EndRegion

[/autoit] [autoit][/autoit] [autoit]

#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

$form_main = GUICreate("Beispiel Formular", 250, 250)
$input_1 = GUICtrlCreateInput("", 10, 10, 100, 20)
$combo_1 = GUICtrlCreateCombo("", 10, 50, 100, 20, $CBS_DROPDOWNLIST)
GUICtrlSetData(-1, "Entry 1|Entry 2|Entry 3", "Entry 1")
$input_3 = GUICtrlCreateInput("", 10, 90, 100, 20)
$bttn_exit = GUICtrlCreateButton("Exit", 180, 200, 60, 30)
GUISetState()
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
$sBuffer = GUICtrlRead($combo_1)

[/autoit] [autoit][/autoit] [autoit]

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $bttn_exit
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
#forceref $hWnd, $iMsg
Local $hWndFrom, $iIDFrom, $iCode
Local $hCombo = GUICtrlGetHandle($combo_1)
$hWndFrom = $ilParam
$iIDFrom = BitAND($iwParam, 0xFFFF) ; Low Word
$iCode = BitShift($iwParam, 16) ; Hi Word
Switch $hWndFrom
Case $hCombo
Switch $iCode
Case $CBN_DBLCLK, $CBN_SELENDOK
ControlFocus($form_main, "", $input_3)
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_COMMAND

[/autoit]

Edit: Code angepaßt, es wird auch der Event $CBN_SELENDOK ausgewertet. Sobald ein Item ausgewäht oder die Dropdownliste geschlossen wird sendet die Combo diesen Event.

johny1099

Hallo Raupi

das Script von Dir funktioniert auch bestens. Ich habe aber festgestellt wenn ich auf dem ComboFeld bin (ohne Öffenen des ComboFelds) und Pfeil nach unten drücke springt er sofort ins Input_3 Feld, Ich möchte gerne mit der Pfeil nach Unten Taste "blättern" ohne das Combo Feld zu öffnen. Ist so etwas auch möglich?

MfG
johny1099

**Raupi**

Bei klick auf die Combo und dann Pfeil nach untern wird Standardmäßig immer das nächste Element gewählt und selektiert.
Da bleibt dir nur die Abfrage der Doppelklicks.

Spoiler anzeigen

[autoit]

#Region - Timestamp
; 2011-06-28 19:55:08
#EndRegion

[/autoit] [autoit][/autoit] [autoit]

#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

$form_main = GUICreate("Beispiel Formular", 250, 250)
$input_1 = GUICtrlCreateInput("", 10, 10, 100, 20)
$combo_1 = GUICtrlCreateCombo("", 10, 50, 100, 20)
GUICtrlSetData(-1, "Entry 1|Entry 2|Entry 3", "Entry 1")
$input_3 = GUICtrlCreateInput("", 10, 90, 100, 20)
$bttn_exit = GUICtrlCreateButton("Exit", 180, 200, 60, 30)
GUISetState()
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
$sBuffer = GUICtrlRead($combo_1)

[/autoit] [autoit][/autoit] [autoit]

While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $bttn_exit
Exit
EndSwitch
WEnd

[/autoit] [autoit][/autoit] [autoit]

Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
#forceref $hWnd, $iMsg
Local $hWndFrom, $iIDFrom, $iCode
Local $hCombo = GUICtrlGetHandle($combo_1)
$hWndFrom = $ilParam
$iIDFrom = BitAND($iwParam, 0xFFFF) ; Low Word
$iCode = BitShift($iwParam, 16) ; Hi Word
Switch $hWndFrom
Case $hCombo
Switch $iCode
Case $CBN_DBLCLK
ControlFocus($form_main, "", $input_3)
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_COMMAND

[/autoit]

johny1099

ich meinte ohne mit der Maus auf das ComboFeld klicken. Ich möchte mit der TAB Taste von Input_1 auf das ComboFeld und dann "blättern" mit Pfeil nach unten Taste. (ohne das ComboFeld zu öfffen.)

MfG
johny1099

**Raupi**

Das geht nicht, das Combofeld wählt bei sektiertem Combo und Pfeil nach unten, das nächste Item aus und sendet den Event.

johny1099

vielen Dank für die ausführliche Erklärung.

MfG
johny1099