Reading Text from GUI control

[TrickyDeath 1]

Hello everyone,

I would like to get some advice or help with my code.

I am try to make a simple script, what is reading the text form other program GUI.

I do have an old communicator what was made with Delphi, and i try to read the message what i am geting on it.

Here is the Info from the communicator:

 

>>>> Window <<<<
Title: Delphi Chat
Class: TMainForm
Position: 120, 120
Size: 1152, 596
Style: 0x16CF0000
ExStyle: 0x00010100
Handle: 0x000000000006158A

>>>> Control <<<<
Class: TRichEdit
Instance: 2
ClassnameNN: TRichEdit2
Name:
Advanced (Class): [CLASS:TRichEdit; INSTANCE:2]
ID: 529638
Text:
Position: 0, 226
Size: 1134, 276
ControlClick Coords: 408, 80
Style: 0x54010844
ExStyle: 0x00000200
Handle: 0x00000000000814E6

>>>> Mouse <<<<
Position: 537, 487
Cursor ID: 0
Color: 0xF0F0F0

>>>> StatusBar <<<<

>>>> ToolsBar <<<<

>>>> Visible Text <<<<
8
System
System
Connected to 192.168.0.103
_ArrayDelete($WinH_Array, 0)asdasdasdasdasdasdasdasdasdasdasdasdasdasdasd
#include <Array.au3>

>>>> Hidden Text <<<<

 

INSTANCE1 is the TOP side, and INSTANCE2 is the bottom side.

I could manage only to sending message with script, but i could not read the exact panel text. See below.

Local $WHnd = WinList("[CLASS:TMainForm]", "")

ControlSend($WHnd[1][1], "", "[CLASS:TRichEdit; INSTANCE:1]", "asd")

I tried to read it with GuiCtrlRead, and _GUICtrlRichEdit_GetText, and WinGetText but somehow it did not work, or i am just too lame to make it alive.

Any idea how to make it or is it posible to make it with AutoIT?

Tricky,

[Valuater 135]

maybe...  ControlGetText ?

Run("notepad.exe")
WinWait("[CLASS:Notepad]")
ControlSetText("[CLASS:Notepad]", "", "Edit1", "New Text Here")
Local $sText = ControlGetText("[CLASS:Notepad]", "", "Edit1")
MsgBox(0, "ControlGetText Example", "The control text is: " & $sText)

 

8)

[TrickyDeath 1]

I gona take a look on it.

Edit:

Thank you, problem solved, that is the order what i was looking for.

Work fine now.

Edited October 16, 2014 by TrickyDeath