[jawsscripts] Re: script hot key not working
- From: "Ann Medlar" <amedlar1@xxxxxxxxxxx>
- To: <jawsscripts@xxxxxxxxxxxxx>
- Date: Tue, 03 Mar 2009 08:28:44 -0500
Hi David,
Thanks for your ideas. Sorry for long reply.
Below, I copied revised script below the 2 node captures.
I added some string displays to see if function is performed and it is not.
After capture, is revised script. It seems like script key is not
recognized. I pressed control+d in script manager and control+m is defined.
Insert Q and twice pressed works for script file Could virtual viewer in
script be blocked by AVG application or another
application? After launching AVG from system tray is there a way to find
out what cursor or viewer is active?
I went into Notepad, opened script manager and assigned control+1 to speak
"Hi, I feel frustrated" and Jaws spoke message; however, not in virtual
viewer.
Defined same script in Notepad as AVG and could not compile because of True
Color
so I changed all parameters after true color to 0 copied below:
Let sText = GetTextInRect (GetWindowLeft (hWnd), GetWindowTop (hWnd),
GetWindowRight (hWnd), GetWindowBottom (hWnd), 0, 0,0 ,
0, 0)
I compiled, pressed control+m in notepad and Jaws stated function performed
and hit
escape to close window.
Here is node capture after launching AVG from system tray:
Handle = 2032886 = {1f04f6}
Class = Avg8ClassComponentsList
Type = Unknown window type
TypeCode = 0
SubtypeCode = 0
ControlID = 2401
StyleBits = 0x50010000
WindowName = Components List
HotKey =
Parent = 2753548 = {2a040c}
FirstChild = 1377384 = {150468}
Prior = 2753794 = {2a0502}
Next = 0 = {0}
WindowHierarchyX = 2
WindowHierarchyY = 4
WindowRect = (212,165)-(1013,630)
controlAttributes = 0
HasTitle = 0
WindowDisabled = 0
WindowObscured = 0
WindowVisible = 1
----------------------------------------
Highlighted text:
----------------------------------------
All Text Restricted:
----------------------------------------
All Text Inclusive:
Anti-Virus Anti-Spyware Anti-Rootkit E-mail Scannergraphic 100 graphic 463
Active Active graphic 266 graphic 463 Active graphic 954 graphic 463
Active
License LinkScanner Web Shield Resident Shieldgraphic 730 graphic 463
Active graphic 551 graphic 463 Active graphic 320 graphic 463 Active
graphic
723 graphic 463 Active Update Managergraphic 205 graphic 463 Active
****************************************
End of initial node capture
Is first window the same as pressing tab key after launching? If so here is
node capture:
Handle = 1574104 = {1804d8}
Class = Static
Type = Static Text
TypeCode = 6
SubtypeCode = 6
ControlID = 2402
StyleBits = 0x50020000
WindowName = Description of selected component
HotKey =
Parent = 4457278 = {44033e}
FirstChild = 0 = {0}
Prior = 3080894 = {2f02be}
Next = 0 = {0}
WindowHierarchyX = 3
WindowHierarchyY = 4
WindowRect = (212,635)-(1013,655)
controlAttributes = 0
HasTitle = 0
WindowDisabled = 0
WindowObscured = 0
WindowVisible = 1
----------------------------------------
Highlighted text:
----------------------------------------
All Text Restricted:
Description of selected component
----------------------------------------
All Text Inclusive:
Description of selected component
****************************************
end of first window capture
copy of revised script with SayString which are not spoken:
;;Jaws 10
;Scripts of AVG version 8.0
; March 2009 by Ann Marie Medlar
include "hjconst.jsh"
include "hjglobal.jsh"
include "common.jsm"
include "AVG.jsm"
Script ScriptFileName ()
ScriptAndAppNames (MsgAVGName )
EndScript
String Function RetrieveStaticText ()
SayString ("function performed" )
Var
Handle hWnd,
string sText
Let hWnd = GetFocus ()
Let hWnd = GetFirstWindow (hWnd)
Let sText = GetTextInRect (GetWindowLeft (hWnd), GetWindowTop (hWnd),
GetWindowRight (hWnd), GetWindowBottom (hWnd), 0, IgnoreColor, IgnoreColor,
True, False)
Let sText = stringChopLeft (sText, 0)
Return sText
EndFunction
Script SayStaticText ()
;Hotkey ctrl + m
Var
Handle hWnd,
String sText
If UserBufferIsActive () Then
UserBufferDeactivate ()
Endif
Let hWnd = GetFocus ()
If GetWindowSubtypeCode (GetFirstWindow (hWnd)) == WT_READONLYEDIT Then ;=43
SayString ("terminate script")
return
Endif
Let sText = RetrieveStaticText ()
SayFormattedMessage (OT_USER_BUFFER, sText + "Hit escape to close window")
EndScript
----- Original Message -----
From: "David Farough" <David.Farough@xxxxxxxxxxxxx>
To: <jawsscripts@xxxxxxxxxxxxx>
Sent: Monday, March 02, 2009 1:57 PM
Subject: [jawsscripts] Re: script hot key not working
> Hi Ann:
>
> You should try a few things to debug your scripts to see if you are
> getting any results from these functions.
>
> Try putting a sayString at the top of your RetrieveStaticText function.
> That way you will know if this function is ever called.
>
> Also in this function you set the hwnd handle to the value of
> GetFirstWindow (GetFocus())
>
> It would be a good idea to find out if hwnd is set to anything other
> than zero. You might try Sayinteger(hwnd) following the let statement.
>
> everything else in this function depends on you being able to find the
> handle for the first window. Therefore, You might want to use an if
> statement to make sure that you can get the handle for that first
> window.
>
> You could use the following after the let statement.
>
> if (hwnd) then
> ; statements for true value when you get the handle
> else
> ; statements for false path when handle is not found.
> endif
>
> In your SayStaticText script
> you check to see if the window type returned from
> If GetWindowSubtypeCode (GetFirstWindow (hWnd)) == WT_READONLYEDIT Then
> ;=43
> You should put a saystring prior to the return statement so that you
> know when you terminate the script early.
>
> These things may give you a better idea what is going on.
>
>
> David Farough
> Application Accessibility Coordinator/coordonateur de l'accessibilité
> Information Technology Services Directorate /
> Direction des services d'information technologiques
> Public Service Commission / Commission de la fonction publique
> Email / Courriel: David.Farough@xxxxxxxxxxxxx
> Tel. / Tél: (613) 992-2779
>
>>>> "Ann Medlar" <amedlar1@xxxxxxxxxxx> 12:53 pm Monday, March 02, 2009
>>>>
> Hi all,
> Below is my script which I have compiled on PC. I am using Windows XP
> and
> Jaws 10.x.
> I compiled script below but when I launch AVG and press control+m to
> invoke
> script I just get a beep from windows and do not get message press
> escape to close.
> Any help is appreciated.
>
> __________
> Visit and contribute to The JAWS Script Repository http://jawsscripts.com
>
> View the list's information and change your settings at
> http://www.freelists.org/list/jawsscripts
>
__________
Visit and contribute to The JAWS Script Repository http://jawsscripts.com
View the list's information and change your settings at
http://www.freelists.org/list/jawsscripts
Other related posts: