Привет Ребята !!!
По форуму не смог достать нужную инфу и прошу вас о помощи.
Вопрос заключается в следующем: В Фотошопе есть вкладки Actions ( Операции) и History ( История) и.т.д
Надо выяснить
- какая вкладка видимая
- и как зная заголовки вкладок переключиться на нужную вкладку
Вот , как смог написал. Прошу сильно не пинать
А вот что выдал AutoIt Window Info
За ранее благодарен и выражаю особую благодарность всем кто поможет
По форуму не смог достать нужную инфу и прошу вас о помощи.
Вопрос заключается в следующем: В Фотошопе есть вкладки Actions ( Операции) и History ( История) и.т.д
Надо выяснить
- какая вкладка видимая
- и как зная заголовки вкладок переключиться на нужную вкладку
Вот , как смог написал. Прошу сильно не пинать
Код:
HotKeySet('{Esc}','_Exit')
$sTitle="Adobe Photoshop CS3"
WinWait($sTitle)
If Not WinActive($sTitle) Then WinActivate($sTitle)
WinWaitActive($sTitle)
While 1
Sleep(1000)
;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
$hWnd = WinGetHandle($sTitle) ; 0x011C02E2
$hWndTabGroup = WinGetHandle("[CLASS:OWL.TabGroup]") ;0x003C0BF2
$sTabName = ControlGetText($hWndTabGroup, "", "[CLASS:OWL.Palette; INSTANCE:1]") ; Actions или Операции
$hTab = ControlGetHandle($hWndTabGroup,"","[CLASS:OWL.Palette; INSTANCE:1]") ; 0x004B0B98
$sTabName2= ControlGetText($hWndTabGroup, "", "[CLASS:OWL.Palette; INSTANCE:2]") ; History или История
$hTab2 = ControlGetHandle($hWndTabGroup,"","[CLASS:OWL.Palette; INSTANCE:2]") ; 0x00200BDA
ToolTip(' Exit ( Esc )'& @CRLF & " 1.hWnd --- "& $hWnd & @CRLF & " 2.hWndTabGroup --- " & $hWndTabGroup & @CRLF & " 3.TabName --- " & $sTabName & @CRLF & " 4.Tab --- " & $hTab & @CRLF & " 5.TabName2 --- " & $sTabName2 & @CRLF & " 6.Tab2 --- " & $hTab2 )
;=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
WEnd
Func _Tabs()
Switch @HotKeyPressed
Case "{F2}"
;переключаемся на вкладку History ( История )
MsgBox(64, 'Title', " History ( История ) pressed ",1)
Case "{F3}"
;переключаемся на вкладку Actions ( Операции )
MsgBox(64, 'Title', " Actions ( Операции ) pressed ",1)
EndSwitch
EndFunc
Func _Exit()
Exit
EndFunc
А вот что выдал AutoIt Window Info
>>>> Window <<<<
Title:
Class: OWL.TabGroup
Position: 662, 137
Size: 206, 229
Style: 0x96000000
ExStyle: 0x08000000
Handle: 0x000109CA
>>>> Control <<<<
Class: PSViewC
Instance: 1
ClassnameNN: PSViewC1
Name:
Advanced (Class): [CLASSSViewC; INSTANCE:1]
ID:
Text:
Position: 0, 0
Size: 206, 229
ControlClick Coords: 117, 119
Style: 0x56020000
ExStyle: 0x00000000
Handle: 0x000109D2
>>>> Mouse <<<<
Position: 779, 256
Cursor ID: 0
Color: 0xEDEDED
>>>> StatusBar <<<<
>>>> ToolsBar <<<<
>>>> Visible Text <<<<
Операции
>>>> Hidden Text <<<<
История
Title:
Class: OWL.TabGroup
Position: 662, 137
Size: 206, 229
Style: 0x96000000
ExStyle: 0x08000000
Handle: 0x000109CA
>>>> Control <<<<
Class: PSViewC
Instance: 1
ClassnameNN: PSViewC1
Name:
Advanced (Class): [CLASSSViewC; INSTANCE:1]
ID:
Text:
Position: 0, 0
Size: 206, 229
ControlClick Coords: 117, 119
Style: 0x56020000
ExStyle: 0x00000000
Handle: 0x000109D2
>>>> Mouse <<<<
Position: 779, 256
Cursor ID: 0
Color: 0xEDEDED
>>>> StatusBar <<<<
>>>> ToolsBar <<<<
>>>> Visible Text <<<<
Операции
>>>> Hidden Text <<<<
История
За ранее благодарен и выражаю особую благодарность всем кто поможет