Hi Aaron,
Thanks for that, I could not see the wood for the trees, I was trying to pass 
an argument in to my function that just wasn't needed.
Warm regards.
Martin Webster.



--- On Wed, 8/20/08, Aaron Smith <[EMAIL PROTECTED]> wrote:

> From: Aaron Smith <[EMAIL PROTECTED]>
> Subject: Re: I need a rotor key example
> To: [email protected]
> Date: Wednesday, August 20, 2008, 1:26 PM
> Martin,
> 
> Try the following:
> 
> ' Begin Script
> Dim keyState : keyState = False
> Set myKey =
> Keyboard.RegisterHotkey("Control-Shift-1",
> "MyKeyToggle")
> Sub MyKeyToggle()
>       If keyState Then
>               Speak "Toggle off"
>               keyState = False
>       Else
>               Speak "Toggle on"
>               keyState = True
>       End If
> End Sub
> 
> Aaron
> 
> martin webster wrote:
> > Hi all,
> > Can somebody please help me with a rotor key example. 
> I would like window-eyes to say "on" when a
> specific hotkey is pressed, and when this key is pressed
> again, I would like window-eyes to say "off". I
> would like the script to rotor between "on" and
> "off" every time the specific hotkey is pressed.
> > Thank you.
> > Warm regards.
> > Martin Webster.
> > 
> > 
> > 
> >       
> > 
> 
> -- 
> To insure that you receive proper support, please include
> all past
> correspondence (where applicable), and any relevant
> information
> pertinent to your situation when submitting a problem
> report to the GW
> Micro Technical Support Team.
> 
> Aaron Smith
> GW Micro
> Phone: 260/489-3671
> Fax: 260/489-2608
> WWW: http://www.gwmicro.com
> FTP: ftp://ftp.gwmicro.com
> Technical Support & Web Development


      

Reply via email to