Не работают функции (Controls)!

[Kalisnik]

У меня почему-то совершенно не работают функции (Controls) для управляющих элементов приложения FineReader 10. В частности для "ABBYY Screenshot Reader". Может кто знает в чем причина? Вот пример кода, все стандартно:

WinActivate("ABBYY Screenshot Reader")
WinWaitActive("ABBYY Screenshot Reader")
ControlClick("ABBYY Screenshot Reader", "", "Button1")

 

[Yashied]

К таким вопросам нужно по умолчанию прилагать скриншот AutoIt Window Info. А то разговор получится беспредметный.

 

[Kalisnik]

К таким вопросам нужно по умолчанию прилагать скриншот AutoIt Window Info. А то разговор получится беспредметный.

Конечно-конечно!!! Как-то я сразу не подумал... :-\...... Недодумка напала!
Вот:

 

[madmasles]

Kalisnik
А так попробуйте

ControlClick("ABBYY Screenshot Reader", "", "[CLASS:Button; INSTANCE:1]")

 

[Kalisnik]

Kalisnik
А так попробуйте

ControlClick("ABBYY Screenshot Reader", "", "[CLASS:Button; INSTANCE:1]")

Пробовал. Функция все равно возвращает "0" :laugh:
Я вот что подумал: не может ли эта проблема быть как-то связанной с 64 битной ОС, коя у меня и установлена. :wacko:

 

[Yashied]

Пробовал. Функция все равно возвращает "0"...

А если попробывать перед этим поставить

Opt('WinTitleMatchMode', 3)

 

[Kalisnik]

Пробовал. Функция все равно возвращает "0"...

А если попробывать перед этим поставить

Opt('WinTitleMatchMode', 3)

Не сработало. Уж не знаю что и делать ((( Придется эмуляцию мышки прописывать ((

 

[Yashied]

Ладно, давай по порядку. Сравни то, что выдает ControlGetHandle() со значением в AutoIt Window Info.

$hWnd = ControlGetHandle("ABBYY Screenshot Reader",  "", "[CLASS:Button; INSTANCE:1]")
ConsoleWrite($hWnd & @CR)

 

[Kalisnik]

Я не знаю как консолью пользоваться, но вот так:

$hWnd  = ControlGetHandle("ABBYY Screenshot Reader",   "", "[CLASS:Button; INSTANCE:1]")
ConsoleWrite($hWnd & @CR)
$data = ConsoleRead()
MsgBox(0, "123", $data)

И вот так:

$hWnd  = ControlGetHandle("ABBYY Screenshot Reader",   "", "[CLASS:Button; INSTANCE:1]")
MsgBox(0, "123", $hWnd)

ControlGetHandle выдает ошибку и значение $hWnd равно False.

 

[Yuri]

Вот так пробуй:

ControlClick("ABBYY Screenshot Reader", "", "[CLASSNN:Button1]")

Получилось?

 

[Kalisnik]

Вот так пробуй:

ControlClick("ABBYY Screenshot Reader", "", "[CLASSNN:Button1]")

Получилось?

Нет (( Вообще ни как...

 

[Yuri]

Ну, вот еще такой вариант:

ControlClick("ABBYY Screenshot Reader", "", "С&тарт!")

И еще такой вот:

ControlSend("ABBYY Screenshot Reader",  "", "", "{ALT}т")

Здесь т - русская.
Это комбинация ALT + т, потому что - С&тарт! - после & т русская.

 

[Kalisnik]

Да я даже фокус на объект Control не могу поставить... и вообще не один элемент этого окна не возвращает внутренний идентификатор. Что уж тут говорить? Простые модификации кода здесь не помогут, так как думается мне, что проблема уровнем выше....
Может на этом приложении защита стоит какая-нибудь? Такое в принципе возможно?
Или это баг AutoIt?

 

[Yashied]

Скачал я этот ABBYY Screenshot Reader. Вот я удивляюсь, они хотят за эту программу денег, а написать GUI по человечески не хотят (не могут), и зделано это все как-то через ж***.

ControlClick() не работает потому, что эта :Censored: кнопка полускиновая :Censored: и окно должно быть активно в момент нажатия (актуально, когда окно видимое, в трее и так работает). Вообщем, еще раз разочаровываюсь в ABBYY.

Opt('WinWaitDelay', 0)

$hWnd = WinGetHandle('[TITLE:ABBYY Screenshot Reader; CLASS:#32770]')
$hCtrl = ControlGetHandle($hWnd, '', 'Button1')
If BitAND(WinGetState($hWnd), 2) Then
	WinActivate($hWnd)
EndIf
DllCall('user32.dll', 'int', 'SendMessage', 'hwnd', $hCtrl, 'int', 0x0200, 'int', 0, 'dword', 0)
Sleep(50)
DllCall('user32.dll', 'int', 'SendMessage', 'hwnd', $hCtrl, 'int', 0x0201, 'int', 1, 'dword', 0)
Sleep(50)
DllCall('user32.dll', 'int', 'SendMessage', 'hwnd', $hCtrl, 'int', 0x0202, 'int', 1, 'dword', 0)

Добавлено:

Сообщение автоматически объединено: 1 Апр 2010

Хотя можно и через ControlClick().

Opt('WinWaitDelay', 0)

$hWnd = WinGetHandle('[TITLE:ABBYY Screenshot Reader; CLASS:#32770]')
If BitAND(WinGetState($hWnd), 2) Then
	WinActivate($hWnd)
EndIf
ControlClick($hWnd, '', 'Button1')

 

[Kalisnik]

Yashied, красава! Работает!!!! Я уж и не надеялся :IL_AutoIt_1:
Спасибо, спасибо... 404 раза спасибо!!! :beer: