[TC] Чтение статусной строки
Здравствуйте.
На комбинации Insert+PageDown у меня висит вот такой скрипт:
Script SayStatusBar ()
var
handle status
let status=FindDescendantWindow (GetAppMainWindow (GetCurrentWindow ()), 40961)
SayWindowTypeAndText (status)
EndScript
В Jaws 6.20 всё работало замечательно, а вот в Jaws 7.10 в
некоторых приложениях скрипт молчит.
Так вот, подскажите, пожалуйста, каким образом можно
модифицировать скрипт, таким образом, чтобы если статусная строка пуста,
то он бы читал нижнюю строчку окна.
Здравствуйте, Владимир.
Если еще жив скрипт
SayBottomLineOfWindow, то приблизительно так (не проверял):
Script SayStatusBar ()
var
handle status,
string content
let status=FindDescendantWindow (GetAppMainWindow (GetCurrentWindow ()), 40961)
let content =
GetWindowText (status, 0)
if content != "" then
SayString (content)
;SayWindowTypeAndText (status)
else
PerformScript
SayBottomLineOfWindow()
Endif
EndScript
Успехов. Анатолий.