Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include <WindowsConstants.au3>
- #include <GUIConstantsEx.au3>
- Dim $aItems[4] = ["", "Hi", "Wie gehts?", "Tschüss"]
- GUICreate("", -1, -1, -1, -1, $WS_SIZEBOX)
- $input = GUICtrlCreateInput("1", 10, 10, 50, 20)
- $updown = GUICtrlCreateUpdown($input)
- GUICtrlSetLimit($updown, 3, 1)
- GUICtrlSetPos($input, 10, 10, 100, 40)
- GUISetState()
- While 1
- $msg = GUIGetMsg()
- If $msg = $GUI_EVENT_CLOSE Then ExitLoop
- $wert = GUICtrlRead($input)
- If $wert > 0 Then
- GUICtrlSetData($input, $aItems[$wert])
- EndIf
- WEnd
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement