Hallo Hans-Peter,
Hier im Forum ist es üblich seinen vollen Namen zu verwenden.
So kannst Du eine Combobox auslesen:
Declare ende%
WindowStyle $21F
Cls
Declare Combo&
Combo&=CreateChoiceBox(%hwnd,"",100,10,100,80)
WhileLoop 10
AddString "Test " + Str$(&Loop)
Wend
MoveListToChoice(Combo&)
WhileNot ende%
WaitInput
If Equ(%key,2)
Let ende%=1
ElseIf GetFocus(Combo&)
Print GetText$(Combo&)
EndIf
Wend
Gruß
Jörg
|