[JFWRus] TC и Jaws5.10
При работе Jaws5.10 в Total Commander как правило не читаются названия
разделов меню при нажатии {Alt}. Случайно обнаружил, что добавление в
скрипт приложения ниже приведённых функций ликвидирует это
неудобство.
Void Function FocusChangedEvent (handle FocusWindow, handle PrevWindow)
If GetWindowClass (FocusWindow) == "TTOTAL_CMD" then
saystring (getObjectName())
endif
FocusChangedEvent (FocusWindow, PrevWindow)
EndFunction
Function ActiveItemChangedEvent (handle curHwnd, int curObjectId, int curChildId,
handle prevHwnd, int prevObjectId, int prevChildId)
SaveCursor ()
PCCursor ()
If GetWindowClass (curHwnd) == "TTOTAL_CMD" then
saystring (getObjectName())
endif
RestoreCursor ()
ActiveItemChangedEvent (curHwnd, curObjectId, curChildId, prevHwnd, prevObjectId,
prevChildId)
EndFunction
Вставьте и откомпилируйте.
