Hi all,
How do I get at the word and translate properies of the active exception 
dictionary.  I want to be able to point window-eyes at an exception entry and 
speak either the word or translation strings.  I tried to do this with the 
following code, but it doesn't work.

Dim MyEntry, MyWord, MyHotKey
Set MyHotKey = Keyboard.RegisterHotkey("d", "HandleHotKey")
Function HandleHotKey()
Set MyEntry = ActiveExceptionDictionariesExceptionDictionaries.Item(1)
MyWord = ExceptionEntry.Word
Speak MyWord
End Function




warm regards.
Martin Webster.




      

Reply via email to