Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как мне словить надатие комбинации клавиш?


Antosya ©   (2003-01-27 14:48:00) 

Вот, моя прога вист в трэи, как мне словить комбинацию клавиш(Ctrl+Alt+F12) например, покаите на примере, очень надо! Ведь моя прога не активна, и клавиши нажымаются в винде?! Как сделать такой хук, т.е как узнать когда они нажаты?


Antosya   (2003-01-31 16:14:00) [1]

ЩА ПОПРОБУЮ!


gsu   (2003-01-29 23:02:00) [2]

private
procedure WMHOTKEY(var Msg: TWMHotKey); message WM_HOTKEY;
public

procedure TForm1.FormCreate(Sender: TObject);
begin
RegisterHotKey(Handle, 0, MOD_CONTROL or MOD_ALT, VK_F12);
end;

procedure TForm1.WMHOTKEY(var Msg: TWMHOTKEY);
begin
Caption:="Уря"
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(Handle, 0);
end;

Пойдет ?


Spawn   (2003-01-29 22:18:00) [3]

И еще обрабатываеш при этом WM_HOTKEY


Spawn   (2003-01-29 22:16:00) [4]

Пажалста)
HotKey:=GlobalAddAtom("MyHotKey");
RegisterHotKey(Handle,HotKey,MOD_CONRTOL or MOD_ALT,VK_F12);


gsu   (2003-01-29 22:01:00) [5]

,


gsu   (2003-01-29 22:00:00) [6]

А что трудно найти ?


Antosya   (2003-01-29 21:45:00) [7]

Что, трудно пример дать?


Song   (2003-01-27 22:19:00) [8]

Пример в FAQ


Antosya   (2003-01-27 21:40:00) [9]

А поподробнее?! Не дадите ли пример?


Song   (2003-01-27 21:13:00) [10]

RegisterHotKey()


Наверх

Титульная страница Поиск, карта сайта Написать письмо