[jawsscripts] Re: VMware Player
- From: "Donald Marang" <donald.marang@xxxxxxxxx>
- To: <jawsscripts@xxxxxxxxxxxxx>
- Date: Fri, 7 Aug 2009 18:38:33 -0400
I just noticed when I was reading the scripts in the email again that in
the menu functions, the hwnd variable was never defined. The functions
still work. I think this would cause the Find to start searching from the
desktop and thus all applications.
Normally, a line similar to:
Let hwnd = GetAppMainWindow (GetCurrentWindow ())
This would limit the search to the application. Technically, the commands
to set the JAWS cursor and move to the top and move down are not necessary.
The Find statement will start at the top of the window of the handle passed
to it and will move to the menu if found.
Don Marang
----- Original Message -----
From: "Chris Hallsworth" <christopherh40@xxxxxxxxxxxxxx>
To: <jawsscripts@xxxxxxxxxxxxx>
Sent: Friday, August 07, 2009 3:44 PM
Subject: [jawsscripts] Re: VMware Player
> Ok for the benefit of others, here it is again. It's the code only and I
> will not attach the actual file. Once again, any feedback is welcome.
>
> -- start of code --
> ;scripts for VMware Player
> include "hjconst.jsh"
> include "hjglobal.jsh"
>
>
> Void Function AutoStartEvent ()
> SayString ("Welcome to VMware Player")
>
>
> EndFunction
>
> Script VMwarePlayerMenu ()
> var
> handle hwnd,
> string class,
> string title
> let class="ToolbarWindow32"
> let title=GetAppTitle ()
> if title!="VMware Player" then
> JAWSCursor ()
> JAWSPageUp ()
> JAWSHome ()
> FindString (hwnd, "VMware Player", S_TOP, S_RESTRICTED)
> RoutePcToJAWS ()
> else
> JAWSCursor ()
> JAWSPageUp ()
> JAWSHome ()
> NextWord ()
> NextWord ()
> RoutePcToJAWS ()
> endif
> EndScript
>
> Script DevicesMenu ()
> var
> handle hwnd,
> string class,
> string title
> let class="ToolbarWindow32"
> let title=GetAppTitle ()
> if title!="VMware Player" then
> JAWSCursor ()
> JAWSPageUp ()
> JAWSHome ()
> FindString (hwnd, "Devices", S_TOP, S_RESTRICTED)
> RoutePcToJAWS ()
> else
> SayString ("There is no virtual machine running")
> endif
> EndScript
>
>
>
>
>
> Script OpenButton ()
> var
> string class,
> string title
> let class="Button"
> let title=GetAppTitle ()
> if title=="VMware Player" then
> JAWSCursor ()
> JAWSPageUp ()
> JAWSHome ()
> NextLine ()
> NextLine ()
> NextLine ()
> NextLine ()
> NextWord ()
> LeftMouseButton ()
> PCCursor ()
> else
> SayString ("There is already a virtual machine running")
> endif
> EndScript
>
> Script ClickDownloadButton ()
> var
> string class,
> string title
> let class="Button"
> let title=GetAppTitle ()
> if title=="VMware Player" then
> JAWSCursor ()
> JAWSPageUp ()
> JAWSHome ()
> NextLine ()NextLine ()
> NextLine ()
> NextLine ()
> NextLine ()
> NextLine ()
> NextLine ()
> NextWord ()
> LeftMouseButton ()
> PCCursor ()
> else
> SayString ("There is already a virtual machine running")
> endif
> EndScript
>
> Script ScriptFileName ()
> ScriptAndAppNames ("VMware Player")
>
>
> EndScript
>
>
>
> ;end of cscript file
>
> -- end of code --
>
> Thanks in advance.
> --
> Chris Hallsworth
> E-mail: christopherh40@xxxxxxxxxxxxxx
> MSN: ch9675@xxxxxxxxxxx
> Skype: chrishallsworth7266
> Klango: chrishallsworth
>
> --------------------------------------------------
> From: "Dave" <dave.mehler@xxxxxxxxx>
> Sent: Friday, August 07, 2009 8:12 PM
> To: <jawsscripts@xxxxxxxxxxxxx>
> Subject: [jawsscripts] Re: VMware Player
>
>> Hello,
>> I did not get any scripts. Can you write me directly and send them?
>> Thanks.
>> Dave.
>>
>>
>> -----Original Message-----
>> From: jawsscripts-bounce@xxxxxxxxxxxxx
>> [mailto:jawsscripts-bounce@xxxxxxxxxxxxx] On Behalf Of Chris Hallsworth
>> Sent: Friday, August 07, 2009 2:24 PM
>> To: jawsscripts@xxxxxxxxxxxxx
>> Subject: [jawsscripts] Re: VMware Player
>>
>> So where's the message. I have some scripts, did anyone receive the code
>> because I've not yet had any feedback.
>>
>> --
>> Chris Hallsworth
>> E-mail: christopherh40@xxxxxxxxxxxxxx
>> MSN: ch9675@xxxxxxxxxxx
>> Skype: chrishallsworth7266
>> Klango: chrishallsworth
>>
>> --------------------------------------------------
>> From: "Dave" <dave.mehler@xxxxxxxxx>
>> Sent: Friday, August 07, 2009 3:11 PM
>> To: <jawsscripts@xxxxxxxxxxxxx>
>> Subject: [jawsscripts] Re: VMware Player
>>
>>> -----Original Message-----
>>> From: jawsscripts-bounce@xxxxxxxxxxxxx
>>> [mailto:jawsscripts-bounce@xxxxxxxxxxxxx] On Behalf Of Chris
>>> Hallsworth
>>> Sent: Wednesday, August 05, 2009 4:57 PM
>>> To: jawsscripts@xxxxxxxxxxxxx
>>> Subject: [jawsscripts] VMware Player
>>>
>>> Hello all,
>>> I'd like to have a go at creating some scripts to make VMware Player
>>> more keyboard friendly, particularly when wanting to use the menus.
>>> Any starters would be greatly appreciated. At the moment it works fine
>>> with JAWS, however you have to use the JAWS cursor to first find
>>> either the VMware Player or, if a virtual machine is running, devices.
>>> Once I've found that I just click on it and a standard pull down
>>> occurs and JAWS can read the menus and associated dialogue boxes fine.
>>> So I would like to enhance the accessibility so that JAWS can quickly
>>> locate and click on the appropriate menus, which I think are actually
>>> toolbars, according to the tutor message, using keystrokes.
>>> Thanks in advance for any starters.
>>> --
>>> Chris Hallsworth
>>> E-mail: christopherh40@xxxxxxxxxxxxxx
>>> MSN: ch9675@xxxxxxxxxxx
>>> Skype: chrishallsworth7266
>>> Klango: chrishallsworth
>>>
>>> __________
>>> 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
>>>
>> __________
>> 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
>>
> __________
> 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: