[jawsscripts] Re: KeyboardType change
- From: "Geoff Chapman" <gch@xxxxxxxxxxxxxxxx>
- To: <jawsscripts@xxxxxxxxxxxxx>
- Date: Fri, 11 Mar 2011 11:26:45 +1100
hmmm, so does this work reliably then?
I Note there's no useage of any iniFlush or IniFlushEx in this script reed?
Also, it might've been incurred during importing email, but, here there
appears a space between the quote mark and the two backslashes before the
Default.jcf file. is that the case in the real code? and if so, does that
still work then?
----- Original Message -----
From: "Reed Poynter" <Reed.Poynter@xxxxxxxxx>
To: <jawsscripts@xxxxxxxxxxxxx>
Sent: Friday, March 11, 2011 5:58 AM
Subject: [jawsscripts] KeyboardType change
> Hi Geoff,
>
> Here's my script.
> I've assigned WindowsKey+Alt+K to it and It works great.
>
> Script KeyboardTypeChange ()
>
> var
> string sProgramFile,
> string sSection,
> string sKeyname,
> string sDefault,
> string sValue
>
> let sSection = "Options"
> let sKeyname = "KeyboardType"
> let sDefault = "not found"
> let sProgramFile = GetJAWSSettingsDirectory ()+"\\default.jcf"
>
> let sValue = IniReadString (sSection, sKeyname, sDefault, sProgramFile)
> Say ("Change from"+SValue,0,0)
>
> If SValue == "Desktop" then
> let sDefault = "Laptop"
> IniWriteString (sSection, sKeyname, sDefault, sProgramFile)
> else
> let sDefault = "Desktop"
> IniWriteString (sSection, sKeyname, sDefault, sProgramFile)
> EndIf
>
> let sValue = IniReadString (sSection, sKeyname, sDefault, sProgramFile)
> Say ("to "+SValue,0,0)
>
> EndScript
>
> __________�
>
> View the list's information and change your settings at
> //www.freelists.org/list/jawsscripts
>
__________�
View the list's information and change your settings at
//www.freelists.org/list/jawsscripts
Other related posts:
