GUI Input help please?

[Ultima2]

Hi Im trying to create a GUI where one can put in a value and it will return in a MsgBox with the value added by some random value like 2.

#include <GUIConstants.au3>

GUICreate("test",300,250)
$exitbutton = GUICtrlCreateButton("Exit", 50, 70)
$value = GUICtrlCreateInput("",4,25,200,25)
$okbutton = GUICtrlCreateButton("ok", 2, 200)
GUISetState()

While 1
    $msg = GUIGetmsg()
    Select
        Case $msg = $okbutton 
        $value += 3
        ExitLoop
        
        Case $msg = $exitbutton
        ExitLoop
    EndSelect
WEnd
MsgBox(0,"The value is", $value)

Yea Im pretty sure I messed up somewhere. When I put a value in, it always return 7?! What's the correct way to write this? Dont be too harsh

[mmavipc]

Hi Im trying to create a GUI where one can put in a value and it will return in a MsgBox with the value added by some random value like 2.

#include <GUIConstants.au3>

GUICreate("test",300,250)
$exitbutton = GUICtrlCreateButton("Exit", 50, 70)
$value = GUICtrlCreateInput("",4,25,200,25)
$okbutton = GUICtrlCreateButton("ok", 2, 200)
GUISetState()

While 1
    $msg = GUIGetmsg()
    Select
        Case $msg = $okbutton 
        $value += 3
        ExitLoop
        
        Case $msg = $exitbutton
        ExitLoop
    EndSelect
WEnd
MsgBox(0,"The value is", $value)

Yea Im pretty sure I messed up somewhere. When I put a value in, it always return 7?! What's the correct way to write this? Dont be too harsh

try this

#include <GUIConstants.au3>

GUICreate("test",300,250)
$exitbutton = GUICtrlCreateButton("Exit", 50, 70)
$value = GUICtrlCreateInput("",4,25,200,25)
$okbutton = GUICtrlCreateButton("ok", 2, 200)
GUISetState()

While 1
    $msg = GUIGetmsg()
    Select
        Case $msg = $okbutton 
        GuiCtrlSetData($Value,Number(GuiCtrlRead($Value))+3)
        ExitLoop
        
        Case $msg = $exitbutton
        ExitLoop
    EndSelect
WEnd
MsgBox(0,"The value is", GuiCtrlRead($Value))

[Robjong]

Hey,

this works fine

#include <GUIConstantsEx.au3>
#include <EditConstants.au3>

GUICreate("test",300,250)
$exitbutton = GUICtrlCreateButton("Exit", 50, 70)
$hValue = GUICtrlCreateInput("",4,25,200,25, $ES_NUMBER)
$okbutton = GUICtrlCreateButton("ok", 2, 200)
GUISetState()

While 1
    $msg = GUIGetmsg()
    Select
        Case $msg = $okbutton
    ; $hValue is the handle to GUICtrlCreateInput, to get the data entered in GUICtrlCreateInput use GuiCtrlRead
        $iValue = GUICtrlRead($hValue)
        $iValue += 3
        ExitLoop
        
        Case $msg = $exitbutton
        ExitLoop
    EndSelect
WEnd
MsgBox(0,"The value is", $iValue)

[Ultima2]

Thank you very much, now it works