Gui Won't Close

[ripvtech]

Hello all,

The problem I'm having is when my script calls the GUI function the GUI opens accepts my input and continues the script, however it will not close the GUI until the script is completed.

Func imageVerify($picLoc)
    InetGet($picLoc,"C:\temp.jpg",0,0)
    
    GUICreate("My GUI picture",350,300,-1,-1,$WS_SIZEBOX+$WS_SYSMENU) ; will create a dialog box that when displayed is centered
    $pic = GUICtrlCreatePic("c:\temp.jpg",50,10, 200,50)
    $file = GUICtrlCreateInput ( "", 10,  60, 300, 20)
    $btn = GUICtrlCreateButton ("Ok", 40,  90, 60, 20)

    GUISetState () 

    $msg = 0
    While $msg <> $GUI_EVENT_CLOSE
           $msg = GUIGetMsg()
           Select
               Case $msg = $btn
                   exitloop
           EndSelect
    Wend
    Global $vCode = GUICtrlRead($file)
EndFunc

I'm sure it's probably something stupid I'm missing but I can't put my finger on it.

Thank you in advance!!!

~JD

[Jos]

Wend
    Global $vCode = GUICtrlRead($file)
    GuiDelete()
EndFunc

[ripvtech]

Wend
    Global $vCode = GUICtrlRead($file)
    GuiDelete()
EndFunc

I knew it would be simple. I will try it tonight. Thank you!!!

~JD