Текущий архив: 2003.08.28;
Скачать: CL | DM;
Вниз
Почему осн. проект получает сообщение от ДЛЛ только когда активен Найти похожие ветки
← →
artist © (2003-06-25 12:19) [0]В ДЛЛ
Const
WM_HOOOK = WM_USER + 1;
function GetMsgProc(code : integer; wParam : word; lParam : longint) : longint; stdcall;
begin
if code = HC_ACTION then
begin
{Проверяю, нажата ли правая кнопка мыши}
if TMsg(Pointer(lParam)^).message = WM_RBUTTONDOWN then
begin
PostMessage(MainHandle, WM_HOOOK, 0, 0);
end;
end;
Result:= CallNextHookEx(GlobalData^.SysHook, Code, wParam, lParam);
end;
В осн. проекте:
procedure TForm1.myhoook(var Message: TMessage);
begin
Edit1.Text:=Edit1.Text+"aa";
end;
← →
Cobalt © (2003-06-25 12:49) [1]Дык, MainHandle откуда заполняется-то?
Вот то-то. А должен тоже хранится в межпроцессной GlobalData, а не в локальной переменной процесса.
← →
artist © (2003-06-25 16:32) [2]Спасибо
Страницы: 1 вся ветка
Текущий архив: 2003.08.28;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.011 c
