user inputbox

[jakub]

i want to make inputbox2() - GUI that works like inputbox with some addition:

Func inputbox2($title,$label,$parent)
GUISetState(@SW_DISABLE,$parent)
$GUIInput=GUICreate ($title,300,100,-1,-1,-1,-1,$parent)
$Input=GUICtrlCreateInput("",20,40,260,20)
$OK=GUICtrlCreateButton("ok",250,70,30,20)
$COPY=GUICtrlCreateButton("Copy",200,70,50,20)
$GUIInputLabel=GUICtrlCreateLabel($label,20,10)

GUISetState(@SW_SHOW,$GUIInput)
While 1
    $msg=GUIGetMsg()

    Select
    Case $msg=$GUI_EVENT_CLOSE
    ExitLoop
    Case $msg=$OK
    Return GUICtrlRead($input)
    ExitLoop
    Case $msg=$COPY
    Return $title
    ExitLoop
    EndSelect
    
WEnd

GUISetState(@SW_ENABLE, $parent)
GUIDelete($GUIInput)

EndFunc

My question is how to set keypressing Enter as a triger of "Return GUICtrlRead($input)" (like in orginal inputbox). _Ispressed didnt work as i want- triger more then 1 time.Can i check somewhere code of orginal functions ? thanks for help

Edited October 30, 2007 by jakub

[Nahuel]

Just use the $BS_DEFPUSHBUTTON style for the button.

Func inputbox2($title,$label,$parent)
GUISetState(@SW_DISABLE,$parent)
$GUIInput=GUICreate ($title,300,100,-1,-1,-1,-1,$parent)
$Input=GUICtrlCreateInput("",20,40,260,20)
$OK=GUICtrlCreateButton("ok",250,70,30,20,$BS_DEFPUSHBUTTON)
$COPY=GUICtrlCreateButton("Copy",200,70,50,20)
$GUIInputLabel=GUICtrlCreateLabel($label,20,10)

GUISetState(@SW_SHOW,$GUIInput)
While 1
    $msg=GUIGetMsg()

    Select
    Case $msg=$GUI_EVENT_CLOSE
    ExitLoop
    Case $msg=$OK
    Return GUICtrlRead($input)
    ExitLoop
    Case $msg=$COPY
    Return $title
    ExitLoop
    EndSelect
    
WEnd

GUISetState(@SW_ENABLE, $parent)
GUIDelete($GUIInput)

EndFunc

[MrCreatoR]

Check _InputBox in my signature