开云体育

Bonjour à tous,

Mon script jaws pour Thunderbird ne fonctionne plus avec la version 91 de Thunderbird. Indication, ce script utilise comme base le script Freedom Scientific pour Jaws 18.

Le tout premier problème à résoudre est celui de la fonction IsImMessageList() qui sert beaucoup dans le script. Elle est initialement dans le script Freedom sous la forme:

Int Function IsImMessageList ()
If GetWindowClass (GetFocus ()) == WC_Client
&& GetObjectSubTypeCode (TRUE) == WT_ROW
&& GetObjectSubTypeCode (TRUE, 1) == WT_TABLE
Return (TRUE)
EndIf
Return (FALSE)
EndFunction

Quand le focus est dans la liste des messages, on obtient pour GetObjectSubTypeCode (TRUE) au début 80 qui est la valeur correcte, puis 0.

Quand c'est 0, en rajoutant:
var object o = GetCurrentObject(0)
SayInteger(o.accRole(0))

on obtient la valeur de role 14, qui correspond à l'objet Application, ancêtre de l'objet Tableau de la liste des messages. Tout se passe comme si la ligne n'était pas sélectionnée, alors qu'elle est en surbrillance. On a le même résultat avec o = GetFocusObject().

Tant que la fonction IsImMessageList() ne fonctionne pas, il n'est pas possible de chercher les modifications de mise à jour.

Quelqu'un aurait-il une idée pour résoudre ou contourner ce problème?

Un grand merci d'avance,

Bonne fin de week-end,

Daniel.