[jawsscripts] Re: SayHighlightedText Question

That might be worth trying, as long as you are sure you never use that feature elsewhere in this particular application. 

 Martin
----- Original Message ----- From: "GianniP46" <giannip46@xxxxxxxxxxxxx> 
To: <jawsscripts@xxxxxxxxxxxxx>
Sent: Sunday, November 25, 2007 7:09 PM
Subject: [jawsscripts] Re: SayHighlightedText Question
why yes I do. Is that the culprit? Should I put a copy of NewTextEvent in my ScratchLive.jss and modify it not to call SayHighlightedText? ----- Original Message ----- From: Martin Slack 
 To: jawsscripts@xxxxxxxxxxxxx
 Sent: Sunday, November 25, 2007 5:44 AM
 Subject: [jawsscripts] Re: SayHighlightedText Question


 Thanks for the code, Gianni,

   Can I ask, do you have a NewTextEvent function, possibly in default.jss,
 which is still set up to call SayHighlightedText?

   Martin
----- Original Message ----- From: "GianniP46" <giannip46@xxxxxxxxxxxxx> 
 To: <jawsscripts@xxxxxxxxxxxxx>
 Sent: Sunday, November 25, 2007 9:31 AM
 Subject: [jawsscripts] Re: SayHighlightedText Question


 Void Function SayHighlightedText (handle hwnd, string buffer)

 ; HighlightedText Function for speaking all newly written highlighted

 ; text.

 var

 int iWinType,

 string strVal,

 String sClass,

 String TextColor

 ;If GlobalMenuMode > 1

 ;&& IsMSAAWindow(hWnd) then

 ; If hWnd != GetCurrentWindow() then

 ; Return;Let ActiveItemChangedEvent do its job.

 ; EndIf

 ;EndIf

 Let iWinType = GetWindowSubTypeCode (hWnd)

 if (GetScreenEcho() > 0) then

 Let TextColor = IntToString (GetColorText ())

 If TextColor == "6750054" Then

 SayMessage (ot_message, "played", cmsgSilent )

 ElIf TextColor == "10066431" Then

 SayMessage (ot_message, "Unavailable", cmsgSilent )

 EndIf

 Say(buffer, OT_HIGHLIGHTED_SCREEN_TEXT)

 endIf

 ;SayString ("Fired")

 EndFunction



 Void Function SayLineMinusFirstWordPCCursor ();This is needed in order for
 the Line PCCursor functions to read properly

 var

 string line

 Pause ()

 ;SayString (GetTextBetween (250, 1000))

 let line = (GetTextBetween (250, 1000))

 ;StringTrimLeadingBlanks (line)

 Pause ()
let line = stringChopLeft (line, StringLength (StringSegment (line, " ", 1)) 
 +1)

 ;let line = stringChopLeft (line, StringLength (StringSegment (line, " ",
 1)) +1)

 ;let line = stringChopLeft (line, StringLength (StringSegment (line, " ",
 1)) +1)
;et line = stringChopLeft (line, StringLength (StringSegment (line, " ", 1)) 
 +1)

 Saystring(line)

 EndFunction



 Script SayNextLinePCCursor ()

 ;SayString ("Fired")

 If ( ! GetDefaultJcfOption (OPT_TETHER_JAWS_TO_PC)) then

 SaveCursor ()

 endIf

 PcCursor ()

 If (GetCursorCol () >= 250) Then

 NextLine ()

 Pause ()

 SayLineMinusFirstWordPCCursor ()

 Else

 PerformScript SayNextLine()

 EndIf

 EndScript
The problem is that SayHighlightedText is fired before SayNextLinePCCursor. 

 ---snip---

 __________
 View the list's information and change your settings at
 http://www.freelists.org/list/jawsscripts
-- No virus found in this incoming message. 
 Checked by AVG Free Edition.
Version: 7.5.503 / Virus Database: 269.16.7/1151 - Release Date: 11/25/2007 4:24 PM 


__________ 
View the list's information and change your settings at http://www.freelists.org/list/jawsscripts

Other related posts: