Форум: "Основная";
Текущий архив: 2005.01.23;
Скачать: [xml.tar.bz2];

Вниз

Простой hook... помогите!   Найти похожие ветки 

← →
Серьезный Сэм   (2005-01-04 19:58) [0]

Мне очень надо сделать так чтобы определенная процедура выполнялась при нажатии заданной клавиши даже если моя прога свернута.

Я пробовал

procedure a;
begin
showmessage("");
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
setWindowsHook(WH_CALLWNDPROC,pointer(@a));
end;

Не выходит, ошибку выдает. Помогите!!! спасибо...

---

← →
Серьезный Сэм   (2005-01-04 20:19) [1]

Немного порылся... пусть

function a(code: Integer; wparam: WPARAM; lparam: LPARAM): LRESULT stdcall;

но все равно же не работает!

---

← →
Almaz ©   (2005-01-04 21:24) [2]

Вполне возможно, что Ваша задача может быть решена при помощи функции RegisterHotKey (пример см. FAQ на этом сайте http://www.delphimaster.ru/cgi-bin/faq.pl?look=1&id=988621066&n=15)
Если же нет, то, во-первых тип хука не WH_CALLWNDPROC, а WH_KEYBOARD, во-вторых глобальных хук должен быть реализован в DLL. Подробнее про хуки можно прочитать здесь: http://www.delphimaster.ru/articles/hooks/index.html

Удачи.

---

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

Форум: "Основная";
Текущий архив: 2005.01.23;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.075 c