[jawsscripts] Re: VMware Player

  • From: "Chris Hallsworth" <christopherh40@xxxxxxxxxxxxxx>
  • To: <jawsscripts@xxxxxxxxxxxxx>
  • Date: Wed, 12 Aug 2009 21:01:56 +0100

Yes please package them up and send it. I'd love to try them out. Thanks!

--
Chris Hallsworth
E-mail: christopherh40@xxxxxxxxxxxxxx
MSN: ch9675@xxxxxxxxxxx
Yahoo! Messenger: christopherh40@xxxxxxxxx
Skype: chrishallsworth7266
Klango: chrishallsworth

--------------------------------------------------
From: "Donald Marang" <donald.marang@xxxxxxxxx>
Sent: Wednesday, August 12, 2009 12:17 PM
To: <jawsscripts@xxxxxxxxxxxxx>
Subject: [jawsscripts] Re: VMware Player

> Hi Chris and others,
>
> I finally got something more reliable using mostly FindString functions
> within just the menu bar (hBar).  The FindString statements in your 
> original
> code did not work.  The functions still worked because you had already
> manually moved the JAWS cursor to the right position before the FindString
> statement.  I still have one problem strictly using the FindString 
> statement
> to bring up the "VMware Player" menu when no Virtual Machine is running 
> and
> the "Command" dialog is displayed.  There is a graphic with the same name
> before the menu.  I attempted various options to the FindString function 
> to
> search from the bottom using:
> If FindString (hBar, "VMware Player", S_BOTTOM, S_RESTRICTED) Then
>    ...
> EndIf
>
> I could not figure out what I was doing wrong, so I just added two 
> NextWord
> statements after the above code using S_TOP.  How do you perform a search 
> of
> a single control window from the bottom up ()last)?
>
> I have added an OpenRecent script to set focus on the multi select list 
> box
> of recently used virtual machines.
>
> I currently am using the following keystrokes:
> [Common Keys]
> Alt+V=VMPlayerMenu
> Alt+D=DevicesMenu
> Control+O=Open
> Control+R=OpenRecent
> Enter=ActivateListItem
>
> Would you rather I paste my code within an email or package and host these
> scripts that would merge with the factory scripts (using a JSX container
> file) later today?  I would clean them up a little as well and add a 
> simple
> help key (Alt + h?).
>
> 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
> 
__________ 
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: