Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Вниз

Как обойти такую ситуацию   Найти похожие ветки 

 
AFROLOV   (2002-03-26 13:09) [0]

Привет всем.
Решается следующая задача: надо отслеживать нажатия клавиш пользователем в Word. Иногда ему надо не давать вводить определенные символы. Для анализа его действий приходится обращаться к Word созданному
MSWord := CreateOleObject("Word.Application");
В глобальном Hook я перехватываю сообщения от клавиатуры идущие к MSWord. И если пользователь нажал то, что ему не положено сообщение из очереди должно изымаеться.
Проблема в следующем:Анализ того что ввел пользователь может быть довольно продолжительным. До того как сообщение будет пропущено далее надо решить: можно его пускать или нет.
Я посылаю сообщение

SendMessage(ShareInf^.AppWndHandle,ShareInf^.KeyboardMsgId,WPARAM(MapH),code); своему приложению для анализа кода клавиатуры.

Вот тут и возникает проблема - сделать что либо с Word не удается(программа просто отвисает). Похоже возникает такая ситуация: все действия осуществляются через сообщения, сообщения помещаются в очереды но очередь не движится, т.к в процедуре анализа ожидается реакция на сообщения помещенные в очередь после анализируемого.


 
Севостьянов Игорь   (2002-03-26 13:56) [1]

Смотри PeekMessage, GetMessage и так далее... Просто щас не припомню...
Все вопросы по мылу



Страницы: 1 вся ветка

Форум: "WinAPI";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.007 c
3-88373
ЕленаКв
2002-04-30 07:42
2002.05.27
В таблице есть поле summa в котором данные стрингового типа,


7-88656
pvn
2002-03-02 19:44
2002.05.27
WriteFile(hPort, S, StrLen(S), actual_bytes, nil)


4-88685
greenrul
2002-03-27 11:06
2002.05.27
Как понизить/повысить громкость системную?


1-88516
VJar
2002-05-15 21:39
2002.05.27
Создание ссылки


8-88567
tovSuhov
2001-12-28 11:13
2002.05.27
Возвращаясь к pmNotXor...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский