Problem with Popup window

[Nataku]

Hello guys I have a problem with the pop-up GUI.

I created a popup, but the problem is that when I put a background image in the window is not draggable.

When i removed the background the program works well.

Can anyone help me?

expandcollapse popup

#include <GuiConstantsEx.au3>
#include <Windowsconstants.au3>
#include <SendMessage.au3>


Global Const $SC_DRAGMOVE = 0xF012



HotKeySet("{ESC}", "On_Exit")



$hGUI = GUICreate("Gui", 800, 540, -1, -1, $WS_POPUP )



GUIRegisterMsg($WM_LBUTTONDOWN, "_WM_LBUTTONDOWN")



$nPic = GUICtrlCreatePic("\background.jpg", 0, 0, 800, 540)

GUICtrlSetState($nPic, $GUI_DISABLE)



GUICtrlCreateLabel("Title",180,45)



$Title_Man = GUICtrlCreateInput("",230,40,100,20)



$Sel1 = GUICtrlCreateRadio("Sel1", 180, 100)

$Sel2 = GUICtrlCreateRadio("Sel2", 240, 100)

$Sel3 = GUICtrlCreateRadio("Sel3", 300, 100)



GUICtrlSetState($Sel1 , $GUI_CHECKED)



GUISetState()



While 1

sleep(10)

WEnd



Func _WM_LBUTTONDOWN($hWnd, $iMsg, $wParam, $lParam)

Local $aCurInfo = GUIGetCursorInfo($hGUI)

If $aCurInfo[4] = 0 Then ; Mouse not over a control

_SendMessage($hGUI, $WM_SYSCOMMAND, $SC_DRAGMOVE, 0)

EndIf



EndFunc



Func On_Exit()

Exit

EndFunc

[bogQ]

Change line

If $aCurInfo[4] = 0 Then ; Mouse not over a control

to line

If Not $aCurInfo[4] Or $aCurInfo[4] = $nPic Then ; Mouse not over a control(disinclude picture)

Edited July 31, 2012 by bogQ

[Nataku]

It works!!! Thank you very much =)