[TC] изменить размер окна
Здравствуйте.
Подскажите, как с помощью jaws 18 изменить размер окна. Нажимаю альт
пробел, там Размер, а что дальше не пойму.
С уважением, Андрей.
Подписаться
Бесплатный дискуссионный лист
Подписчиков 1.804
За последние 60 дней 521 выпусков (несколько раз в день)
Сайт листа:
http://www.tiflocomp.ru
Открыт:
22-01-2004
Пре-модерация: Нет
Адрес для писем в лист: industry.comp.tiflocomp-list@subscribe.ru
Модератор
Статистика
1.804 подписчиков
0 за неделю
0 за неделю
Ответы:
Здравствуйте, Андрей.
Вы писали 2 июля 2017 г., 23:25:07:
К своему письму забыл добавить Jaws скрипт на координаты окна, иногда
он помогает сориентироваться в размере и позиционированию текущего
окна.
итак, скрипт:
Script WindowCoordinates ()
; озвучивает координаты текущего окна
; точнее озвучивает координаты левого верхнего угла. ширины и высоты окна
var
string stroka,
int verh,
int niz,
handle hWnd,
int levo,
int pravo
let hWnd=GetCurrentWindow ()
let hWnd = GetAppMainWindow (hWnd)
let Levo=GetWindowLeft (hWnd)
let verh=GetWindowTop (hWnd)
let pravo=GetWindowRight (hWnd)
let niz=GetWindowBottom (hWnd)
let stroka="верхний левый угол "+IntToString (levo)+"@"+IntToString
(verh)+"\n"+"Ширина"+IntToString
(pravo-levo)+"Высота"+IntToString (niz-verh)
if isSameScript() == 1 then
SayFormattedMessage (OT_USER_BUFFER, stroka)
Else
SayString (stroka)
EndIf
EndScript
Удачи.
Здравствуйте, Андрей.
Вы писали 2 июля 2017 г., 23:25:07:
За Jaws18 не скажу, но вот пару слов за Jaws15 выскажу.
Просто двигайте стрелки и как только сочтёте, что сдвиг достаточный
нажмите enter.
Всё.
Удачи.