Command "AddString" in function ControlCommand get error

[dd1978]

take a look at following code:

Func Example_01()

    # I copy properties of win form and control by AutoIt window info tool
    Local $win_ppt = "[TITLE:Form_ListBox;CLASS:WindowsForms10.Window.8.app.0.141b42a_r9_ad1;INSTANCE:1]"
    Local $ctl_ppt = "[CLASS:WindowsForms10.LISTBOX.app.0.141b42a_r9_ad1;NAME:ListBox1;INSTANCE:1]"

    WinActivate($win_ppt, "")

    Local $ret = ControlCommand($win_ppt, "", $ctl_ppt, "AddString", 'line ii')

    If @error Then
        MsgBox($MB_SYSTEMMODAL, "", "Error")
    EndIf

EndFunc   #==>Example_01

The result of running the code is: get error and no new line is added to ListBox

Anyone can help, thanks.

[ioa747]

4 hours ago, dd1978 said:

Local $win_ppt = "[TITLE:Form_ListBox;CLASS:WindowsForms10.Window.8.app.0.141b42a_r9_ad1;INSTANCE:1]"

that doesn't seem right

in info Tools in the Windows tab it does not have Advanced mode as have the control tab

[TITLE:My Window; CLASS:My Class; INSTANCE:2]

... and the  # I copy properties of win form and control by AutoIt window info tool

 is better  with  ; I copy properties of win form and control by AutoIt window info tool

 

Edited January 23, 2023 by ioa747

[dd1978]

but by using the mode, the code that do clicking a button on a windows form can work correctly.

thanks.

[ioa747]

try first to minimize, to see if you have the right handle   WinSetState($win_ppt, "", @SW_MINIMIZE)

[dd1978]

in the code I post above,

WinActivate($win_ppt, "")

this line really brings the window to front.

[dd1978]

I just test the code that minimize and maximize the windows form by WinSetState function, it does a correct action.

[ioa747]

try something like

Local $Test = ControlGetText($win_ppt, "", "ListBox1")
ConsoleWrite("$Test=" & $Test & @CRLF)

$Test = ControlGetHandle($win_ppt, "", "ListBox1")
ConsoleWrite("$Test=" & $Test & @CRLF)

to interact with control, to be sure you have the right control handle

[dd1978]

I have tested following code:

Func Example_01()

    Local $win_ppt = "[TITLE:Form_ListBox;CLASS:WindowsForms10.Window.8.app.0.141b42a_r9_ad1;INSTANCE:1]"
    Local $hWnd = WinGetHandle($win_ppt)

    If @error Then
        MsgBox($MB_SYSTEMMODAL, "", "An error occurred when trying to retrieve the window handle.")
        Exit
    EndIf

    MsgBox($MB_SYSTEMMODAL, "", $hWnd)

EndFunc   ;==>Example_01

The MsgBox prints the value: 0x000306A2

and without error

I feel that this is a handle, right?

[dd1978]

well

above code is for win form

I am now trying to get control handle

[dd1978]

I have tested the code for control:

Func Example_02()

    Local $win_ppt = "[TITLE:Form_ListBox;CLASS:WindowsForms10.Window.8.app.0.141b42a_r9_ad1;INSTANCE:1]"
    Local $ctl_ppt = "[CLASS:WindowsForms10.LISTBOX.app.0.141b42a_r9_ad1;NAME:ListBox1;INSTANCE:1]"

    Local $hControl = ControlGetHandle($win_ppt, "", $ctl_ppt)

    If @error Then
        MsgBox($MB_SYSTEMMODAL, "", "An error occurred when trying to retrieve the control handle.")
        Exit
    EndIf

    MsgBox($MB_SYSTEMMODAL, "", "The handle is: " & $hControl)

EndFunc   ;==>Example_02

has run without error

MsgBox prints the value of $hControl like a handle: 0x000E0610

any suggestions, thanks

[dd1978]

The UI to be tested against is a .net winform. I compile the UI application under VS2019 VB.Net

I have tested button click, button enable and disable, combo box show dropdown and hide dropdown. These tasks all work properly.

Now I stoped at using AddString command of ControlCommand function to add new line into ListBox.

Is there any configuration required for ListBox to get new line from my AutoIt script?

[ioa747]

not that I know

try to get some value from control

Local $Test = ControlCommand($win_ppt, "",  $ctl_ppt , "GetCount", "")

ConsoleWrite("$Test=" & $Test & @CRLF)

[ioa747]

try this format

 Local $Test = ControlCommand($win_ppt,  "",  "[NAME:ListBox1]" , "GetCount", "")

ConsoleWrite("$Test=" & $Test & @CRLF)

 

[dd1978]

There is not GetCount command for ListBox control, and I found "GetLineCount" command for Edit control

Thanks.

[dd1978]

has answer?

[Nine]

Quote

"GetCount", ""

Returns number of entries in a ListBox or ComboBox

About ControlCommand in help file.  Make sure you have latest version of AutoIt.

[ioa747]

@Nine Thank you for the explanation

@dd1978  I honestly don't know. I just try to help

from help book  see Title special definition

e.g. Set the text of the .NET Winforms "textBoxFolder" control to "C:\Some\Folder"

ControlSetText("My Window", "", "[NAME:textBoxFolder]", "C:\Some\Folder")

[dd1978]

@Nine thanks. it is actually a too old version I am using. I would try the newest one 

 

@ioa747 thanks a lots for these days help.

[dd1978]

@Nine@ioa747I'm back, with problem testing result

I have install the latest stable version of AutoIt, then run the following code:

Func Example_03()

    Local $win_ppt = "[TITLE:Form_ListBox;CLASS:WindowsForms10.Window.8.app.0.141b42a_r9_ad1]"
    Local $ctl_ppt = "[NAME:ListBox1]"
    Local $hWnd = WinActivate($win_ppt, "")
    Local $Test = ControlCommand($hWnd,  "",  $ctl_ppt , "GetCount", "")

    If @error Then
        MsgBox($MB_SYSTEMMODAL, "", "Error")
        Exit
    EndIf

    MsgBox($MB_SYSTEMMODAL, "", $Test)

EndFunc

The last MsgBox print: -1

no error occurs

My ListBox1 has three items before I run the code.

In this forum, I found somebody advise to use beta version and is it an answer?

Thanks.

[dd1978]

And by my test, command "AddString" for ControlCommand still cause error