Jump to content

Control Viewer - AutoIt Window Info Tool


Yashied
 Share

Recommended Posts

18 minutes ago, argumentum said:

"Options > use coloring" to set coloring or not.

Invalid decision. Let the color (red, gray and other) elements remain, according to the application logic, but white backgrounds must either be removed (the color will be the default), or find the white color (in the standard visual style) and set these elements. For example, use:

_WinAPI_SwitchColor(_WinAPI_GetSysColor($COLOR_WINDOW)); 28

For gray tones, likewise, take $COLOR_GRAYTEXT color (22)

Edited by musicstashall
Link to comment
Share on other sites

If _WinAPI_IsThemeActive() Then
        For $i = 3  To 30
            GUICtrlSetBkColor($Input[$i], _WinAPI_SwitchColor(_WinAPI_GetSysColor($COLOR_WINDOW))) ; <= set system colors here!!!
        Next
        GUICtrlSetColor($Input[6 ], 0xAA0000)
        GUICtrlSetColor($Input[8 ], 0xAA0000)
        GUICtrlSetColor($Input[18], 0x9999CC)
        GUICtrlSetColor($Input[20], 0x9999CC)
        GUICtrlSetColor($Input[22], 0xAA0000)
        GUICtrlSetColor($Input[24], 0xAA0000)
    EndIf

 

Link to comment
Share on other sites

14 minutes ago, musicstashall said:

Compiling - errors and crash.

hmmm, I'm with a strangely made setup.
Remove the "#Au3Stripper_Parameters=/rcwl" as that should not be there.
Also "#AutoIt3Wrapper_Res_Language=1000" is not standard, remove that too.
Removing those it should build without problems in a standard install of SciTE compiling in 32 bit. 

Edit: x64 also builds and runs ok ( tested just now )
Edit 2: x64 crashes at times :(

Edited by argumentum

Follow the link to my code contribution ( and other things too ).
FAQ - Please Read Before Posting.
autoit_scripter_blue_userbar.png

Link to comment
Share on other sites

#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=Resources\CV.mod.ico
#AutoIt3Wrapper_Outfile=CV.exe
;#AutoIt3Wrapper_Outfile_x64=CV_x64.exe
#AutoIt3Wrapper_Compile_Both=y
;#AutoIt3Wrapper_UseX64=y
#AutoIt3Wrapper_Res_Description=Control Viewer
#AutoIt3Wrapper_Res_Fileversion=0.2019.11.8
#AutoIt3Wrapper_Res_ProductName=CV.exe
#AutoIt3Wrapper_Res_ProductVersion=0.0
#AutoIt3Wrapper_Res_Icon_Add=Resources\201.ico,201
#AutoIt3Wrapper_Res_Icon_Add=Resources\202.ico,202
#AutoIt3Wrapper_Res_Icon_Add=Resources\203.ico,203
#AutoIt3Wrapper_Res_Icon_Add=Resources\204.ico,204
#AutoIt3Wrapper_Res_Icon_Add=Resources\205.ico,205
#AutoIt3Wrapper_Res_Icon_Add=Resources\206.ico,206
#AutoIt3Wrapper_Res_Icon_Add=Resources\207.ico,207
#AutoIt3Wrapper_Res_Icon_Add=Resources\208.ico,208
#AutoIt3Wrapper_Res_Icon_Add=Resources\209.ico,209
#AutoIt3Wrapper_Res_Icon_Add=Resources\210.ico,210
#AutoIt3Wrapper_Res_Icon_Add=Resources\214.ico,214
#AutoIt3Wrapper_Res_Icon_Add=Resources\217.ico,217
#AutoIt3Wrapper_Res_File_Add=Resources\100.cur,RT_CURSOR,100
#AutoIt3Wrapper_Res_File_Add=Resources\101.cur,RT_CURSOR,101
#AutoIt3Wrapper_Res_File_Add=Resources\102.cur,RT_CURSOR,102
#AutoIt3Wrapper_Res_File_Add=Resources\103.cur,RT_CURSOR,103
#AutoIt3Wrapper_Res_File_Add=Resources\104.cur,RT_CURSOR,104
#AutoIt3Wrapper_Res_File_Add=Resources\105.cur,RT_CURSOR,105
#AutoIt3Wrapper_Res_File_Add=Resources\106.cur,RT_CURSOR,106
#AutoIt3Wrapper_Res_File_Add=Resources\107.cur,RT_CURSOR,107
#AutoIt3Wrapper_Res_File_Add=Resources\108.cur,RT_CURSOR,108
#AutoIt3Wrapper_Res_File_Add=Resources\About.png,PNG,ABOUT
#AutoIt3Wrapper_AU3Check_Parameters=-q -d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7
;#AutoIt3Wrapper_Run_Au3Stripper=y
;#Au3Stripper_Parameters=/rcwl
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

Errors:

>Running AU3Check (3.3.14.5)  params:-q -d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7  from:C:\Program Files (x86)\AutoIt3  input:D:\CV_PROJECT\CV.au3
"D:\CV_PROJECT\UDFs\ColorChooser.au3"(112,117) : warning: 'Dim' deprecated as declaration. Prefer to use Local or Global.
Dim $ccData[29] = [0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, Default, Default, 0, 0]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UDFs\ColorChooser.au3"(150,35) : warning: 'Dim' deprecated as declaration. Prefer to use Local or Global.
Dim $ccPalette[21][3] = [[0, 1, 0]]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UDFs\ColorChooser.au3"(829,13) : warning: $ARGB: declared, but not used in func.
    Local $ARGB,
    ~~~~~~~~~~~^
"D:\CV_PROJECT\UDFs\ColorChooser.au3"(1472,38) : warning: $iMsg: declared, but not used in func.
Func CC_WM_NCRBUTTONDOWN($hWnd, $iMsg,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UDFs\ColorChooser.au3"(1472,56) : warning: $lParam: declared, but not used in func.
Func CC_WM_NCRBUTTONDOWN($hWnd, $iMsg, $wParam, $lParam)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UDFs\ColorChooser.au3"(1521,35) : warning: $iMsg: declared, but not used in func.
Func CC_WM_SYSCOMMAND($hWnd, $iMsg,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UDFs\ColorChooser.au3"(1521,53) : warning: $lParam: declared, but not used in func.
Func CC_WM_SYSCOMMAND($hWnd, $iMsg, $wParam, $lParam)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\CUIAutomation2.au3"(2,70) : warning: $sCLSID_UIAutomationClient possibly not declared/created yet
$sCLSID_UIAutomationClient = "{944DE083-8FB8-45CF-BCB7-C477ACB2F897}"
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\CUIAutomation2.au3"(834,7) : warning: 'Local' specifier in global scope.
Local $UIA_propertiesSupportedArray
~~~~~~^
"D:\CV_PROJECT\UIA\CUIAutomation2.au3"(953,7) : warning: 'Local' specifier in global scope.
Local $UIA_ControlArray
~~~~~~^
"D:\CV_PROJECT\UIA\UIAWrappers.au3"(12,7) : warning: 'Local' specifier in global scope.
Local $UIA_oUIAutomation
~~~~~~^
"D:\CV_PROJECT\UIA\UIAWrappers.au3"(14,7) : warning: 'Local' specifier in global scope.
Local Const
~~~~~~^
"D:\CV_PROJECT\UIA\UIAWrappers.au3"(15,7) : warning: 'Local' specifier in global scope.
Local Const
~~~~~~^
"D:\CV_PROJECT\UIA\UIAWrappers.au3"(16,7) : warning: 'Local' specifier in global scope.
Local Const
~~~~~~^
"D:\CV_PROJECT\UIA\UIAWrappers.au3"(19,7) : warning: 'Local' specifier in global scope.
Local Const
~~~~~~^
"D:\CV_PROJECT\UIA\UIAWrappers.au3"(107,98) : warning: $t: declared, but not used in func.
    Local $t = _UIA_GetDesktopElement().FindFirst($TreeScope_Children, $pCondition, $UIA_pUIElement)
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAWrappers.au3"(159,102) : warning: $UIA_oTW possibly not declared/created yet
    $UIA_oTW = ObjCreateInterface($UIA_pTW, $sIID_IUIAutomationTreeWalker, $dtagIUIAutomationTreeWalker)
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(30,62) : warning: $flag: declared, but not used in func.
Func _UIA_ControlSetText($h_wnd, $controlID, $text, $flag = 0)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(51,71) : warning: $sText already declared/assigned
    Local $sText = _UIA_GetPropertyValue($controlID, $UIA_NamePropertyId)
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(63,85) : warning: $currentState possibly not declared/created yet
    $currentState = _UIA_GetPropertyValue($controlID, $UIA_ToggleToggleStatePropertyId)
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(85,72) : warning: $tPattern possibly not declared/created yet
        $tPattern = _UIA_CreateControlPattern($controlID, $UIA_InvokePattern)
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(90,80) : warning: $aBound possibly not declared/created yet
        $aBound = _UIA_GetPropertyValue($controlID, $UIA_BoundingRectanglePropertyId)
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(156,55) : warning: $ret possibly not declared/created yet
            $ret = __UIA_ControlSearch($searchRoot, $controlID)
            ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(191,97) : warning: $searchStringKvPairs possibly not declared/created yet
    $searchStringKvPairs = StringRegExp($searchString, $_UIA_Regex_ControlId_SplitKeyValuePairs, 3)
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(197,37) : warning: $kvPair possibly not declared/created yet
        $kvPair = $searchStringKvPairs[$i]
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(198,37) : warning: $split possibly not declared/created yet
        $split = StringInStr($kvPair, ":")
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(199,41) : warning: $key possibly not declared/created yet
        $key = StringLeft($kvPair, $split - 1)
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(200,42) : warning: $value possibly not declared/created yet
        $value = StringMid($kvPair, $split + 1)
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(211,22) : warning: $pCondition already declared/assigned
                Local $pCondition
                ~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(219,72) : warning: $parsed possibly not declared/created yet
                $parsed = StringRegExp($value, $UIA_Regex_ControlId_ClassNameNN, 1)
                ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(222,24) : warning: $class possibly not declared/created yet
                $class = $parsed[0]
                ~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(226,22) : warning: $pCondition already declared/assigned
                Local $pCondition
                ~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(231,22) : warning: $pCondition already declared/assigned
                Local $pCondition
                ~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(254,58) : warning: $pCondition already declared/assigned
        Local $pAndCondition = $pConditions[0], $pCondition = 0
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(268,124) : warning: $oAutomationElementArray possibly not declared/created yet
    $oAutomationElementArray = ObjCreateInterface($pElements, $sIID_IUIAutomationElementArray, $dtagIUIAutomationElementArray)
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(285,95) : warning: $oFound possibly not declared/created yet
        $oFound = ObjCreateInterface($pFound, $sIID_IUIAutomationElement, $dtagIUIAutomationElement)
        ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(291,74) : warning: $tValuePattern possibly not declared/created yet
            $tValuePattern = _UIA_CreateControlPattern($oFound, $UIA_ValuePattern)
            ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(306,121) : warning: $aBound possibly not declared/created yet
            $aBound = _UIA_GetPropertyValue($oFound, $UIA_BoundingRectanglePropertyId) ; $aBound[0] = X [1] = Y, [2] = W, [3] = H
            ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
"D:\CV_PROJECT\UIA\UIAutomation.au3"(309,85) : warning: $aWinBound possibly not declared/created yet
            $aWinBound = _UIA_GetPropertyValue($searchRoot, $UIA_BoundingRectanglePropertyId)
            ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
D:\CV_PROJECT\CV.au3 - 0 error(s), 39 warning(s)
->00:15:16 AU3Check ended. Press F4 to jump to next error.rc:1
>Running:(3.3.14.5):C:\Program Files (x86)\AutoIt3\aut2exe\aut2exe.exe  /in "D:\CV_PROJECT\CV.au3" /out "C:\Users\music\AppData\Local\AutoIt v3\Aut2exe\~AU82CD.tmp.exe" /nopack /comp 2
+>00:15:19 Aut2exe.exe ended.C:\Users\music\AppData\Local\AutoIt v3\Aut2exe\~AU82CD.tmp.exe. rc:0
>00:15:19 Performing the Program Resource Update steps:
...>Updating Program Version information.
...>Adding 12 Icon(s).
...>Adding / Removing 10/10 resource(s).
>00:15:19 Program Resource updating finished successfully.
+>00:15:20 Created program:D:\CV_PROJECT\CV.exe
>Running:(3.3.14.5):C:\Program Files (x86)\AutoIt3\aut2exe\aut2exe.exe  /in "D:\CV_PROJECT\CV.au3" /out "C:\Users\music\AppData\Local\AutoIt v3\Aut2exe\~AU82CD.tmp.exe" /nopack /comp 2 /x64
+>00:15:22 Aut2exe.exe ended.C:\Users\music\AppData\Local\AutoIt v3\Aut2exe\~AU82CD.tmp.exe. rc:0
>00:15:22 Performing the Program Resource Update steps:
...>Updating Program Version information.
...>Adding 12 Icon(s).
...>Adding / Removing 10/10 resource(s).
>00:15:23 Program Resource updating finished successfully.
+>00:15:23 Created program:D:\CV_PROJECT\CV_x64.exe
+>00:15:24 AutoIt3Wrapper Finished.

 

Link to comment
Share on other sites

Remove the "#AutoIt3Wrapper_AU3Check_Parameters=-q -d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6 -w 7" and it will stop all the warnings.
If a Dim is out of place ... just let it go. Unless you'd wanna rewrite the whole thing from scratch.

Again, I did not code this. Just added stuff I needed at the time and shared the modified resultant.
In x64, the color pick, crashes the executable. That should be changed.
There is much to "nice it up", but I'm quite busy with other things to do a deep dive into this code.

Follow the link to my code contribution ( and other things too ).
FAQ - Please Read Before Posting.
autoit_scripter_blue_userbar.png

Link to comment
Share on other sites

What's New in Version 0.2019.11.10
fixed: TaskSched would not work in x64.
fixed: running a 2nd time, would not restore previously running.

The files are in the downloads area.

PS: If selected to run via TaskSched, running any exe ( x32 or x64), will load the version of the TaskSched ( by design )
         If previously running an exe ( x32 or x64 ), running any exe ( x32 or x64) again, will popup the previously loaded version ( by design )

Edited by argumentum

Follow the link to my code contribution ( and other things too ).
FAQ - Please Read Before Posting.
autoit_scripter_blue_userbar.png

Link to comment
Share on other sites

Henceforth, do not force the controls to any color. If you do this, then set the color for the text, for the background of the window, and for the whole composition, you will have to assign colors. The simplest thing is to assign system colors if you want to somehow change the default composition. When a developer violates such a rule, this is not a good tone.

Edited by musicstashall
Link to comment
Share on other sites

4 hours ago, musicstashall said:

The simplest thing is to assign system colors

What @Yashied did, is to have in Black what is visible, gray for hidden and red if is gone. For 2011, it was good. He used those colors for other things too. What I did is "2019-ed" the colors a bit, to keep the developer's spirit in color assignment.

Follow the link to my code contribution ( and other things too ).
FAQ - Please Read Before Posting.
autoit_scripter_blue_userbar.png

Link to comment
Share on other sites

Those colors are user electable clicking the colored label at the bottom. I'm working in a HC theme editor and for what I've seen, is better that way. Tho I could add to right-click a color and select to use the system default by choosing so. I'll do it as soon as I can give some time to it. Thanks for the research.

Follow the link to my code contribution ( and other things too ).
FAQ - Please Read Before Posting.
autoit_scripter_blue_userbar.png

Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...