Отправляет email-рассылки с помощью сервиса Sendsay

Screen reader JAWS for Windows Russian

Подписаться Бесплатный дискуссионный лист Подписчиков 589
←   Февраль 2008   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
16.02.2008
16:16:14
20:57:46
17
17.02.2008
09:53:47
18:31:06
18
19
20
21
22
23
24
25
26
27
28
29


За последние 60 дней ни разу не выходила


Открыт: 27-07-2004
Пре-модерация: Нет
Адрес для писем в лист: comp.soft.others.jfwrus-list@subscribe.ru

Модератор
Олег Кутищев

Статистика

589 подписчиков
0 за неделю

[JFWRus] Re: чтение справки в формате hlp

Здравствуйте!

Анатолий, спасибо за скрипт. (я не знаю вашего адреса, приходится писать в
общую рассылку). Да и на вопрос может быть кто-нибудь другой ответит.

Предложенный скрипт ругается на строчку

if __windoc_class__ == GetWindowClass(hwin) then

Ошибка компиляции
Unknown variable __windoc_class__
Что с этим делать я не знаю!

На счёт jaws 8.0, могу сказать, что они пытались, но у меня ничего не
работает. Да и как я понял, там можно только весь топик прослушать.

Вот, что он мне выдал:

для просмотра разделов справки, используйте С.
для перехода к предыдущему разделу справки, используйте Н.
для печати этого раздела справки, используйте Е.
для открытия меню Параметры, используйте А.
для перехода назад по списку обзора, используйте меньше.
для перехода вперёд по списку обзора, используйте больше.
для прокрутки страницы вниз и чтения JAWS курсором, используйте
Control+PageDown.
для прокрутки страницы вверх и чтения JAWS курсором, используйте
Control+PageUp.
для чтения этого раздела с помощью JAWS курсора, используйте
Control+JAWSKey+DownArrow.
С кнопками и ссылками можно поступить так же как в эксплорере, вынести их в
отдельный список.

Наверное придётся не скрипт писать, а вообще прогу для чтения файлов
справки.

Ответить   "Eric-S" Mon, 4 Feb 2008 12:04:33 +0300 (#722683)

 

Ответы:

Здравствуйте, Eric.

По всей видимости, вы пропустили строку
const
__windoc_class__ = "MS_WINDOC"

которая должна стоять до начала скрипта (см. предыдущее сообщение).
Или вы можете проблемную строку записать так:
if "MS_WINDOC" == GetWindowClass(hwin) then

отдельный список.

Это несколько сложнее сделать, чем в IE; иначе бы в FS давно реализовали бы такую
опцию.

Успехов. Анатолий.

***
Это сообщение No 6552
было разослано для 406 участников дискуссионного листа
[JFWRus] Re[2]: чтение справки в формате hlp

Ответить   "i_chay" Mon, 4 Feb 2008 13:26:37 +0400 (#722690)

 

Здравствуйте.
Ниже приведены скрипт и сопутствующая функция, реализующие навигацию по ссылкам
при просмотре .hlp файлов.
Версия JAWS: 5.0 и выше (возможно, будет работать и в 4.51)
Файл: winhlp32.JSS
Назначьте на скрипт комбинацию (например, Insert+F7), по которой будет отображаться
список ссылок, расположенных только на текущей странице справки. При выборе
ссылки из списка будет выполнен переход к соответствующему топику.
Примечание: поиск ссылок выполняется по цвету, что теоретически может не гарантировать
результат. Однако для справки в формате .hlp наблюдается постоянство цветовых
схем, что позволяет надеяться на работоспособность скрипта в большинстве случаев.

; вспомогательная функция
string Function EnumHyperlinks (int IsNextCall)

var

int nFColor,

string sField

InvisibleCursor()

if !IsNextCall then

RouteInvisibleToPc ()

JAWSPageUp ()

JAWSHome ()

endif

let nFColor= 32768 ; искомый цвет

if FindColors (nFColor, IgnoreColor, S_NEXT)

&& (ATTRIB_UNDERLINE & GetCharacterAttributes ()) then

let sField = GetColorField ()

endif

return sField

EndFunction

; основной скрипт

Script HyperlinksList ()

var

int nLimit, int nItem,

string sBuffer, string sItem

SaveCursor()

let sBuffer = ""

let nLimit = 0

while nLimit < 100

let sItem = EnumHyperlinks(nLimit)

let nLimit = nLimit + 1

if !sItem then

let nLimit = 200

else

let sBuffer = sBuffer +sItem + "\007"

endif

endwhile

if !sBuffer then

SayMessage (OT_SCREEN_MESSAGE, cMsgNoLinks, cMsgNoLinks)

else

Let sBuffer = stringChopRight (sBuffer, 1)

let sItem =StringSegment (sBuffer, "\007",

DlgSelectItemInList (sBuffer, cMsgLinks, FALSE, 1))

SayMessage (OT_SCREEN_MESSAGE,sItem,sItem)

let nLimit = 0

while nLimit < 100

let sBuffer= EnumHyperlinks(nLimit)

let nLimit = nLimit + 1

if sItem == sBuffer then

JAWSCursor()

RouteJAWSToInvisible ()

Pause()

LeftMouseButton ()

let nLimit = 200

elif !sBuffer then

let nLimit =200

endif

endwhile

endif

RestoreCursor()

EndScript

Успехов. Анатолий.

***
Это сообщение No 6553
было разослано для 406 участников дискуссионного листа
[JFWRus] Re[3]: чтение справки в формате hlp

Ответить   "i_chay" Tue, 5 Feb 2008 11:56:33 +0400 (#722904)