[TC] горячие клавиши
Здравствуйте!
Original Message From: "ислам" <bis***@r*****.ru>
*****
shift+insert+b или shift+CapsLock+b.
Если появится сообщение, что состояние батареи не найдено, надо будет править
скрипт SayBatteryLevel в файле скриптов по умолчанию.
Например, для windows vista и jaws 9.0 он выглядит так:
Script SayBatteryLevel ()
; By: S. Dawes
; Created: 2001/10/26.
; Purpose: I wrote this script, because, I felt that there was a need for the
; : laptop user to have a quick and easy way to monitor the battery level.
; Assumption: This script is assuming that your battery monitor has the string
; : "remain" contained within it. If not, determine a unique string
; : to rely upon for this script to work.
; : To make this change, change the value of LTBattery in the Let statement
below.
;
; Variables: STIndex -> used to contain the number of entries on the system
tray.
; : STItem -> The description of the entry being evaluated on the system
tray.
; : LTBattery -> Set to a unique string taken from the battery
; entry found on the system tray.
;
var
int Index,
int iFound,
String STItem
; Get the number of items on the system tray.
Let Index = SysTrayGetItemCount ()
; Now start at the end of the list, and look for the laptop battery.
While (Index >= 1)
Let STItem = SysTrayGetItemToolTip (Index)
If StringContains (STItem, cScBatteryIcon)
|| StringContains (STItem, "доступно")
|| StringContains (STItem, "Полностью") then
SayMessage (ot_status, STItem )
Let Index = 0
Let iFound = TRUE;
Else
Let Index = Index - 1
EndIf
EndWhile
If ! iFound then
SayFormattedMessage (OT_ERROR, cMsgBatteryNot Found)
EndIf
EndScript
Удачи!
С уважением,
Александр.
icq 201267748
skipe: greenaleks
