SHARE
TWEET

Untitled

a guest Aug 13th, 2017 49 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #include <GUIConstantsEx.au3>
  2. #include <WindowsConstants.au3>
  3.  
  4.  
  5. Opt("GUIOnEventMode", 1)
  6. $Form1 = GUICreate("Form1", 623, 449, 192, 114)
  7. GUISetOnEvent(-3,"_Exit")
  8. $btn = GUICtrlCreateButton("Test",0,0,50,50)
  9. GUICtrlSetOnEvent(-1,"_Btn")
  10. GUISetState(@SW_SHOW)
  11.  
  12.  
  13. While Sleep(100)
  14. WEnd
  15.  
  16. Func _Exit()
  17.     Exit
  18. EndFunc   ;==>_Exit
  19.  
  20. Func _Btn()
  21. if @GUI_CtrlId = $btn Then MsgBox(0,"","")
  22. EndFunc   ;==>_Btn
RAW Paste Data
Pastebin PRO Summer Special!
Get 40% OFF on Pastebin PRO accounts!
Top