[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

Other related posts: