[jawsscripts] Trouble with mod to "System Dialogs.jss"

  • From: "Mark Matthews" <mark.matthews53@xxxxxxxxxxxx>
  • To: <jawsscripts@xxxxxxxxxxxxx>
  • Date: Mon, 15 Oct 2007 14:47:58 +0100

Hi folks.

I'm trying to write a little script that enables the user to simply press a
keystroke when in the list of events for the default Sound Scheme in "System
Dialogs.jss" and play the associated sound, without having to Tab to the
appropriate button, then shift tab back to the List View. Despite exploring
the relationship between the various windows using the Home Row utility, and
a few variations to the below code, the intended results still do not
appeared to be yielded. The complete script follows:

Script ClickPlayAndStopToggle ()

Var
        Handle hWND

Let hWND =GetFocus ()
Let hWND=GetNextWindow (GetFocus ())
Let hWND=GetNextWindow (GetFocus ())
Let hWND=GetNextWindow (GetFocus ()) ;should hopefully land us on the "Play
Sound Button"

If GetWindowClass (hWND) =="Button" Then ;checking that the focused window
is actually of class button
        SaveCursor ()
        JAWSCursor ()
        SaveCursor ()
        If FindString (GetFocus (), "Play Sound", S_TOP, S_UNRESTRICTED)
Then
                LeftMouseButton ()
        EndIf
EndIf

EndScript

I've got a feeling my downfall could be that button to play the currently
selected event's sound. As you can probably see from the title,
"PlayandStopToggle" is what I thought I was looking for, as when tabbing
through the dialogue that's what's announced by JFW. However when doing
further exploration and obtaining some sighted confirmation from a
co-worker, the button appears to be a graphic, and possibly a tool tip.
Being mindful of this I've substituted FindString with FindGraphic, but alas
to no avail. Due to slowly running out of ideas, can anyone offer further
input?

Also whilst I appreciate there are probably more compact ways of writing the
statements to reach the window in question (in this case the "Play Sound"
button", I thought writing it in stages would help me de-bug any problems.

Cheers,

Mark

Mark Matthews
Cardiff, Wales, UK
E-mail/MSN/Windows Messenger:  mark.matthews53@xxxxxxxxxxxx
Skype:  MMatthews1981
Mobile:  07800 561442 


__________ 
View the list's information and change your settings at
http://www.freelists.org/list/jawsscripts

Other related posts: