jgq85 Posted October 20, 2011 Posted October 20, 2011 Ok I'm new and went through stick/pinned thread and read through FAQ on Koda documentation, but still think I need assistance from someone who has time to lend a hand. This is my simple 1 button GUI I created (to test):#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form=Form1.kxf $Form1 = GUICreate("1button Closer", 196, 82, 192, 122) $Button1 = GUICtrlCreateButton("Close Incident", 8, 16, 91, 25) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd How do I make the button, when pushed, to run this script?;select the Edit Incident Window HotKeySet("{F4}", "ExitProg") Func ExitProg() Exit 0 ;;Exits the program EndFunc WinActivate("OnTime)", "") $coord = PixelSearch( 380, 187, 1745, 401, 0xFF0000 ) If Not @error Then ; Click the Critical Incident MouseClick("left", $coord[0], $coord[1], 1) Sleep(1000) Else MsgBox(4096,"", "Critical Incident Not Found") EndIf I tried using putting the script I want to run in between Func Button1() and EndFunc and but button still didn't execute the script.The script only runs if I run it independently from the GUI script. This is the first GUI/script I've tried to create together...
sleepydvdr Posted October 21, 2011 Posted October 21, 2011 (edited) Not really enough code for me to test, but I think it should look a little more like this: #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> HotKeySet("{F4}", "ExitProg") $Form1 = GUICreate("1button Closer", 196, 82, 192, 122) $Button1 = GUICtrlCreateButton("Close Incident", 8, 16, 91, 25) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 _Button1() EndSwitch WEnd Func _Button1() WinActivate("OnTime)", "") $coord = PixelSearch(380, 187, 1745, 401, 0xFF0000) If Not @error Then ; Click the Critical Incident MouseClick("left", $coord[0], $coord[1], 1) Sleep(1000) Else MsgBox(4096, "", "Critical Incident Not Found") EndIf EndFunc Func ExitProg() Exit ;Exits the program EndFunc ;==>ExitProg Edited October 21, 2011 by sleepydvdr #include <ByteMe.au3>
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now