![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
передача числовых значений из DLL [D6, D7, Win95/98, WinME, NT4, Win2k, WinXP]
Dio © (2004-06-27 21:44:00)Подскажите пожалуйста способ передачи числовых значений из DLL в EXEшник (не в фокусе), причем инициатором передачи является DLL.
Подробнее: требуется ловить все нажатия клавиш (Hook). Нашел пример, но там регистрировало только стрелки (4 кнопки), для каждой из которых DLL посылал окну EXEшника определенное сообщение, по которому выполнялась определенная функция. Мне надо все кнопки и прописывать больше сотни сообщений глупо. При посылке сообщения с параметром, в лучшем случае, работает только если окно EXEшника активно.
Dio (2004-06-30 08:54:00) [1]Дело в том, что сам hook (глобальный) работает, могу, как в той статье писать в файл, но мне надо не в файл писать. Надо передать в EXE, а метод - писать в файл, посылать сообщение и exe файл читает - немного замудрен.
Германн (2004-06-30 03:09:00) [2]2 Dio © (29.06.04 21:45) [8]
> но конкретно для себя ... сложно
Ну и что, что сложно?
Имхо, есть три варианта:
1. Забить на все и пойти пить пиво. :))
2. Упростить задачу, забыв о Hook'ах.
3. Все-таки, читать статью. И другие источники. И задавать по мере прочтения более конкретные вопросы.
Dio (2004-06-29 21:45:00) [3]Да, очепятка, а статью я читал. Много всего полезного но конкретно для себя ... сложно
VMcL (2004-06-29 09:15:00) [4]wm_press= wm_User + 100;
procedure WM_DioMSG (Var M : TMessage);message wm_pass;
Это очепятка?
P.S. Почитай всё-таки http://www.delphimaster.ru/articles/hooks/index.html, как советует Германн ©
Dio (2004-06-29 09:01:00) [5]1) >>DrPass © (27.06.04 22:14)
Попробую.
2) >>KilkennyCat © (27.06.04 22:16)
Дллка ловит все клавиши системы и должна сообщать екзешнику о всех нажатиях, типа «история клавишь».
3) >>VMcL © (27.06.04 22:46)
В DLL ->
const
wm_press = wm_User + 100;
…
H := FindWindow('TForm1', 'Dio');
...
SendMessage(H,wm_press,0,0);
В EXE ->
const
wm_press = wm_User + 100;
…
type
TForm1 = class(TForm)
Label1: TLabel;
Edit1: TEdit;
private //Обработчик сообщений
procedure WM_DioMSG (Var M : TMessage);message wm_pass;
end;
…
procedure TForm1.WM_DioMSG (Var M : TMessage);
begin
Label1.Caption:=inttostr(i);
inc(i);
end;
Так все OK если EXE не в фокусе значение I и метки изменяется. Но при передаче параметра – глухо – значение I изменяется, а параметр …
Пример: хочу так
Var key:integer;
…
SendMessage(H,wm_press,key,0);
Заранее спасибо.
Германн (2004-06-28 03:14:00) [6]Следует читать "глобального хука" вместо "гдобального хука". Пардон, промахнулся.
Германн (2004-06-28 03:12:00) [7]Лучше всего прочитать статью Алексея Павлова о Hook-ах на этом сайте. Думается мне, что "найденный автором сабжа пример", не удовлетворяет требованиям "гдобального хука".
VMcL (2004-06-27 22:46:00) [8]>>Dio © (27.06.04 21:44)
Как посылаешь сообщение?
KilkennyCat (2004-06-27 22:16:00) [9]Что-то я не понял...
Дллка ловит клавиши екзешника? и для этого шлет ему сообщения? Типа: "Я готова ловить стрелки, жми!" ?
DrPass (2004-06-27 22:14:00) [10]передать из exe в dll указатель на какую-нибудь функцию для обработки сообщений, и пусть dll ее вызывает, когда захочет