Jump to content

Hidden Control


Recommended Posts

I am trying to automate Titan Poker (an ipoker client), I basicly want AutoIt to open a table for me.

There seems to be a TreeView Control, a ListView Control and some buttons, notably the "Sit n Go" and "Join Table", however no details come up in the 'AutoIt Window Info' viewer when I try to identify them. (This is not my first project and I have managed to get this info in the past.)

I used WinGetClassList and managed to get the following information about some of the controls on the Titan window:

ClassNameNN:Internet Explorer_Server1 IsVisible:0 x=0,y=0,w=800,h=600

ClassNameNN:Internet Explorer_Server2 IsVisible:1 x=520,y=6,w=273,h=103

ClassNameNN:Internet Explorer_Server3 IsVisible:1 x=3,y=476,w=623,h=71

ClassNameNN:Internet Explorer_Server4 IsVisible:0 x=630,y=177,w=166,h=295

ClassNameNN:PTIODEVICE1 IsVisible:0 x=0,y=0,w=800,h=600

ClassNameNN:PTIODEVICE2 IsVisible:0 x=157,y=16,w=469,h=141

ClassNameNN:PTIODEVICE3 IsVisible:0 x=2,y=458,w=142,h=92

ClassNameNN:PTIODEVICE4 IsVisible:0 x=2,y=458,w=142,h=92

ClassNameNN:Shell DocObject View1 IsVisible:0 x=0,y=0,w=800,h=600

ClassNameNN:Shell DocObject View2 IsVisible:1 x=520,y=6,w=273,h=103

ClassNameNN:Shell DocObject View3 IsVisible:1 x=3,y=476,w=623,h=71

ClassNameNN:Shell DocObject View4 IsVisible:0 x=630,y=177,w=166,h=295

ClassNameNN:Shell Embedding1 IsVisible:0 x=0,y=0,w=800,h=600

ClassNameNN:Shell Embedding2 IsVisible:1 x=520,y=6,w=273,h=103

ClassNameNN:Shell Embedding3 IsVisible:1 x=3,y=476,w=623,h=71

ClassNameNN:Shell Embedding4 IsVisible:0 x=630,y=177,w=166,h=295

<b>Can somebody help me get the className, handle etc of the buttons, TreeView and ListView controls?</b>

my code for those who are interested:

<i>

#include <Array.au3>

#include <Debug.au3>

#Include <WinAPI.au3>

_DebugSetup ( "Debug" )

Opt("MustDeclareVars", 1)

Dim $i, $j, $str, $ctrlPOS, $winclass, $hnd, $ctrlID

;Dim $winName = "Victor Chandler:"

Dim $winName = "Titan Poker: Nickname:"

WinActivate($winName)

$winclass = StringSplit(WinGetClassList($winName), @LF)

_ArraySort($winclass,0,1,$winclass[0]-1)

Dim $nextClass="", $count = 0

for $i = 1 to $winclass[0] - 1

if ($winclass[$i] & $count) = $nextClass Then

$count = $count +1

Else

$count = 1

EndIf

$nextClass = $winClass[$i] & $count

$winClass[$i] = $winClass[$i] & $count

$ctrlID = "[CLASSNN:"&$winClass[$i]&"]"

$hnd = ControlGetHandle ($winName, "", $ctrlID)

$str=""

; $str=$str&"Index:"&$i

$str=$str&" ClassNameNN:"&$winClass[$i]

; $str=$str&" Handle:"&$hnd

$str=$str&" IsVisible:"&ControlCommand($winName,"",$ctrlID,"IsVisible")

; $str=$str&" ClassName:"&_WinAPI_GetClassName($hnd)

$ctrlPOS=ControlGetPos($winName, "", $ctrlID )

$str=$str&" x="&$ctrlPOS[0]&",y="&$ctrlPOS[1]&",w="&$ctrlPOS[2]&",h="&$ctrlPOS[3]

_DebugOut($str)

Next

;MsgBox(0,"", WinGetClassList($winName))

</i>

post-35357-1210135781_thumb.jpg

Link to comment
Share on other sites

If all that is part of a Flash script or something which isn't standard HTML then you probably won't be able to grab any of it.

I'm not sure about Javascript...

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...