Jump to content

Combobox Inputfield


Recommended Posts

Hello,

a short question: If somebody choose Exchange 2000, then come a messagebox with the value of the regkey, but i want to have, that the program write it into THE field "$input31 = GUICtrlCreateInput($file31, 100, 0, 120)", but it doesn't worked. I have read in the online help, but no chance. Can somebody help me?

GUICtrlCreateLabel("Mail Server", 10, 25, 100, 20)
$input30 = GUICtrlCreateCombo("", 100, 0, 120,80,$CBS_DROPDOWNLIST)
GUICtrlSetData(-1, " |Exchange 5.5|Exchange 2000|Exchange2003|Lotus Notes 5|Lotus Notes 6|Lotus Notes 6.5", $file30)
GUICtrlCreateLabel("Name Mail-Server", -100, 25, 100, 20)
$input31 = GUICtrlCreateInput($file31, 100, 0, 120)

SetState($file30)
GUISetState()
; Run the GUI until the dialog is closed
While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    If $msg = $input30 Then
        SetState(GUICtrlRead($input30))
    EndIf
WEnd


Func SetState($selected)

If $selected = ("Exchange 2000") Then
$var = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\PP-COM\MRS\ExchAPL","Exchange Server")
Msgbox(0,"",$var)

EndIf
EndFunc
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...