Hello Jitendra, Diciopédia is a portuguese enciclopedia, and I don't know a non portuguese version. Regarding the HTML window, it have a uniq class, a uniq owner and uniq Style bits. All other characteristics are not uniq, like Comntrol ID=0. Rui ----- Original Message ----- From: "Jitendra" <jeet.invincible@xxxxxxxxx> To: <jawsscripts@xxxxxxxxxxxxx> Sent: Monday, January 26, 2009 4:46 AM Subject: [jawsscripts] Re: Move to Window Hi Rui, can you let me know please which program it is? and if it is in english, we may also make some benifit of it, as I am searching an accessible encyclopedia for a long time. btw, if it is accessible, it is worth writing some scripts to make it accessible, come to your question: if the HTML window has a particular name, style bits, font, color or any other notable thing, with some conditional coding, you can move your focus to it. Thank you, Jitendra. Rui Fontes wrote: > Hi, > > I am trying to script a enciclopedia app. > In that app, exist a list of documents and it is easy to put Jaws talking > while arrowing... When a item is selected, the topic is showned in a > window > with a class MozillaWindowClass and Control ID = 0. > > How to move to that window? > > I have tried the following: > > Script MoveToTopic () > Var > Handle Janela > Let Janela=FindWindowWithClassAndId (GetAppMainWindow > (getCurrentWindow()),"MozillaWindowClass",0) > MoveToWindow (Janela) > RouteVirtualToPc () > EndScript > > Rui > > > ----- Original Message ----- > From: "Jitendra" <jeet.invincible@xxxxxxxxx> > To: <jawsscripts@xxxxxxxxxxxxx> > Sent: Sunday, January 25, 2009 2:48 AM > Subject: [jawsscripts] Re: Checked and unchecked status of graphic > > > Hello, After having that much trouble, and asking you all, I was able to > discover the following, it solves my problem, and hope useful to some of > you as well. its not that much complicated or special though. > Void Function CheckStatus () > Var > Handle hwnd, > Int Color, > string Class > Let hwnd = GetFocus () > Let Class = GetWindowClass (hwnd) > If Class == "TCheckListBox" Then > SaveCursor () > JAWSCursor () > SaveCursor () > RouteJAWSToPc () > PriorCharacter () > Let Color = GetColorText () > If Color == "0" Then > SayFormattedMessage (OT_MESSAGE, "checked") > Else > SayFormattedMessage (OT_MESSAGE, "not checked") > EndIf > EndIf > EndFunction > Thanks everyone, specially david and Jeff. > __________ > 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 > > > > __________ 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 58879 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