[jawsscripts] Re: Keypress question
- From: "Rui Fontes" <rui.fontes@xxxxxxxxxxxxxxx>
- To: <jawsscripts@xxxxxxxxxxxxx>
- Date: Fri, 23 Jan 2009 02:06:55 -0000
Thanks! They work allright!
Rui
----- Original Message -----
From: "David Farough" <David.Farough@xxxxxxxxxxxxx>
To: <jawsscripts@xxxxxxxxxxxxx>
Sent: Thursday, January 22, 2009 4:26 PM
Subject: [jawsscripts] Re: Keypress question
Hi Rui and Martin;
I think that I have found an answer to the solution you provided which
did not speak the appropriate characters when selecting the text.
Here are the slightly modified scripts.
Script toggleState ()
Let iToggle = not iToggle
SayInteger (iToggle, 10)
EndScript
Script improvedRightArrow ()
If (iToggle) Then
; TypeKey ("Shift+RightArrow")
; SayString ("selected ")
; SayString (GetCharacter ())
PerformScript SelectNextCharacter()
Else
PerformScript SayNextCharacter()
Endif
EndScript
Script improvedLeftArrow ()
If (iToggle) Then
; TypeKey ("Shift+LeftArrow")
;SayString ("unselected ")
; SayString (GetCharacter ())
PerformScript SelectPriorCharacter()
Else
PerformScript SayPriorCharacter()
Endif
EndScript
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
>>> "Martin Slack" <m.g.slack@xxxxxxxxxxxx> 09:22 am Thursday, January
22, 2009 >>>
Hi Rui,
As I said in my last post, these scripts are not the complete answer
for
your problem, but they may give you a start.
The lines SayString (GetCharacter ()) and PerformScript
SayNext/PriorCharacter()
in the two arrow scripts seem to have no effect at all.
Martin...
__________
Visit and contribute to The JAWS Script Repository http://jawsscripts.com
View the list's information and change your settings at
//www.freelists.org/list/jawsscripts
--
Estou utilizando a versão gratuita de SPAMfighter para usuários privados.
Foi removido 58861 emails de spam até hoje.
Os usuários pagantes não têm esta mensagem nos seus emails.
Adquira SPAMfighter grátis aqui: http://www.spamfighter.com/lpt
__________
Visit and contribute to The JAWS Script Repository http://jawsscripts.com
View the list's information and change your settings at
//www.freelists.org/list/jawsscripts
Other related posts:
