DaProgrammer Posted July 5, 2007 Share Posted July 5, 2007 (edited) expandcollapse popup; Script By DaProgrammer, for use as an autoit programming assistant #include <GUIConstants.au3> #include <Constants.au3> Opt("TrayMenuMode",1) ; $i=1 #region - Tray Opt("TrayOnEventMode", 1) TraySetOnEvent($TRAY_EVENT_PRIMARYDOWN, "Tray") TraySetOnEvent($TRAY_EVENT_SECONDARYDOWN, "Tray2") Func Tray() If $i=1 Then GUISetState(@SW_HIDE) $i=0 Return EndIf If $i=0 Then GUISetState(@SW_SHOW) $i=1 Return EndIf EndFunc Func Tray2() Exit EndFunc #endregion ; $Prog=GUICreate("", 68, 155, -1, -1, "", BitOR($WS_EX_TOPMOST, $WS_EX_TOOLWINDOW)) $b1 = GUICtrlCreateRadio("Absolute", 00, 00, 60, 15) $b2 = GUICtrlCreateRadio("Relative", 00, 15, 60, 15) $Label_mouse = GUICtrlCreateLabel("Mouse", 00, 30, 60, 15, BitOR($SS_CENTER, $SS_SUNKEN)) $Label_cords = GUICtrlCreateLabel("", 00, 45, 60, 15, $SS_CENTER) $Label_ID = GUICtrlCreateLabel("Control ID", 00, 60, 60, 15, BitOR($SS_CENTER, $SS_SUNKEN)) $Label_ID2 = GUICtrlCreateLabel("", 00, 75, 60, 15, $SS_CENTER) $Label_H = GUICtrlCreateLabel("Control Handle", 00, 90, 60, 30, BitOR($SS_CENTER, $SS_SUNKEN)) $Label_H2 = GUICtrlCreateLabel("", 00, 120, 60, 15, $SS_CENTER) GUISetState() While 1 $x = MouseGetPos(0) $y = MouseGetPos(1) GUICtrlSetData($Label_cords, $x & "/" & $y) $point = MouseGetPos() $hwnd = DllCall("user32.dll", "hwnd", "WindowFromPoint", "int", $point[0], "int", $point[1]) $hWIN = $hwnd[0] $ID = DllCall('User32.dll', 'int', 'GetDlgCtrlID', 'hwnd', $hWIN) GUICtrlSetData($Label_ID2, $ID[0]) GUICtrlSetData($Label_H2, $hWIN) $msg = GUIGetMsg() If $msg = $b1 Then Opt("MouseCoordMode", 1) If $msg = $b2 Then Opt("MouseCoordMode", 0) WEnd been using autoit for a while now and made this tool for myself, so why not share tell me how u like it and is there anything i should add ? P.S. left click to Hide/Show the tool, and right click to close it. Edited July 5, 2007 by DaProgrammer Link to comment Share on other sites More sharing options...
Bert Posted July 5, 2007 Share Posted July 5, 2007 wrong forum. Can a Mod please move it? The Vollatran project My blog: http://www.vollysinterestingshit.com/ Link to comment Share on other sites More sharing options...
DaProgrammer Posted July 5, 2007 Author Share Posted July 5, 2007 wrong forum. Can a Mod please move it?i cant post in example scripts for some reason so i posted it here, if some1 can move it ill appritiate it Link to comment Share on other sites More sharing options...
Developers Jos Posted July 5, 2007 Developers Share Posted July 5, 2007 wrong forum. Can a Mod please move it?OP can't post in the Examples yet since the post count is less than 10 ... SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Link to comment Share on other sites More sharing options...
Generator Posted July 5, 2007 Share Posted July 5, 2007 Well, an alternative of AutoIt Windows Tool i guess. Link to comment Share on other sites More sharing options...
DaProgrammer Posted July 5, 2007 Author Share Posted July 5, 2007 Well, an alternative of AutoIt Windows Tool i guess.yes it is but its smaller (doesnt take half the screen) and more conviniet to my sence. Link to comment Share on other sites More sharing options...
martin Posted July 5, 2007 Share Posted July 5, 2007 yes it is but its smaller (doesnt take half the screen) and more conviniet to my sence.Yes, smaller is an advantage.Needs a slightly taller form for XP because the Control ID is not shown fully. (Another 5 pixels maybe?) Serial port communications UDF Includes functions for binary transmission and reception.printing UDF Useful for graphs, forms, labels, reports etc.Add User Call Tips to SciTE for functions in UDFs not included with AutoIt and for your own scripts.Functions with parameters in OnEvent mode and for Hot Keys One function replaces GuiSetOnEvent, GuiCtrlSetOnEvent and HotKeySet.UDF IsConnected2 for notification of status of connected state of many urls or IPs, without slowing the script. Link to comment Share on other sites More sharing options...
Mast3rpyr0 Posted July 6, 2007 Share Posted July 6, 2007 I attempted to do something like that, its in my sig. My UDF's : _INetUpdateCheck() My Programs : GameLauncher vAlpha, InfoCrypt, WindowDesigner, ScreenCap, DailyRemindersPick3GeneratorBackupUtility! Other : Bored? Click Here! Link to comment Share on other sites More sharing options...
DaProgrammer Posted July 6, 2007 Author Share Posted July 6, 2007 Yes, smaller is an advantage.Needs a slightly taller form for XP because the Control ID is not shown fully. (Another 5 pixels maybe?)i think u can manage to add 5 pixel's im not using any theme so it looks ok here. Link to comment Share on other sites More sharing options...
DaProgrammer Posted July 13, 2007 Author Share Posted July 13, 2007 thats it no more responses ? common ppl Link to comment Share on other sites More sharing options...
Klaatu Posted July 13, 2007 Share Posted July 13, 2007 Maybe if you had said in the first post what the heck it's supposed to do, you would have had more people trying it, and more responses. My Projects:DebugIt - Debug your AutoIt scripts with DebugIt! Link to comment Share on other sites More sharing options...
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