My contribution (my own projects): * Debenu Quick PDF Library - UDF * Debenu PDF Viewer SDK - UDF * Acrobat Reader - ActiveX Viewer * UDF for PDFCreator v1.x.x * XZip - UDF * AppCompatFlags UDF * CrowdinAPI UDF * _WinMergeCompare2Files() * _JavaExceptionAdd() * _IsBeta() * Writing DPI Awareness App - workaround * _AutoIt_RequiredVersion() * 3 UDF * 3 UDF * JavaManagement UDF * VIES over SOAP * WinSCP UDF * GHAPI UDF - modest begining - comunication with GitHub REST API * 3 UDF - A logging Library * Include Dependency Tree (Tool for analyzing script relations) * I'm a very newbie in this, and for sure the problem is very simple, do you know where the problem is ?Įdit: must be really a tiny problem but i don't find it, tried out older versions but it's always the same: "go" is greyed out and i don't find a way to start macrosĮdit2: i can start my macros when i directly doubleclick them, but not from the Scite Script Editor by using "go"Īny of my own code posted anywhere on the forum is available for use by others without any restriction of any kind. It doesn't want to start it and with other macros i had its the same. Means, when i go with my cursor up to "tools" and then open the dropbox, the "go" is greyed out. SetLabels ( $pos, $pos, $col ) EndIf EndFunc set label text Func SetLabels ( $x, $y, $col ) construct the text $textPos = "Mouse pos x:" & $x & " y:" & $y $textCol = "Color: " & Hex ( $col, 6 ) set the text to the labels GUICtrlSetData ( $label1, $textPos ) GUICtrlSetData ( $label2, $textCol ) EndFunc any saved value is not the same as current value) If ( $ox $pos OR $oy $pos OR $oc $col ) Then save the current value $ox = $pos $oy = $pos $oc = $col update the labels with the current readings MousePos ( ) sleep for 25ms, this is here just so we don't read the cursor every processor tick Sleep ( 25 ) WEnd Function that reads the cursor Func MousePos ( ) get the mouse cursor position, absolute $pos = MouseGetPos ( ) get pixel color $col = PixelGetColor ( $pos, $pos ) if anything changed (i.e. The two -1 means the window will be centered on screen (this is AutoIt's doing, it's like we haven't specified WHERE we want the window exactly, so it just puts it in the middle) $WS_EX_TOOLWINDOW + $WS_EX_TOPMOST - these are two constants - variables with predefined values, that tell the GUI to draw a windows with small border and always on top GUICreate ( "Cursor nfo", 160, 40, - 1, - 1, - 1, $WS_EX_TOOLWINDOW + $WS_EX_TOPMOST ) Create two labels, don't worry about text being empty for now, the reset is left, right, width, height $label1 = GUICtrlCreateLabel ( "", 5, 5, 150, 15 ) $label2 = GUICtrlCreateLabel ( "", 5, 20, 150, 15 ) helper variables, storing last known cursor position and color $ox = - 1 $oy = - 1 $oc = - 1 show our GUI window GUISetState ( ) In Infinite Loop do While True check GUI Messages (what windows sends to us) for possible events Switch GUIGetMsg ( ) Case $GUI_EVENT_CLOSE in the event user click the close button Exit EndSwitch call function MousePos Expand collapse popup include some constants we use, like $GUI_EVENT_CLOSE or $WS_EX_TOOLWINDOW #include #include Create a GUI window title will be 'Cursor nfo' width = 160, height = 40.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |