Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.27;
Скачать: CL | DM;

Вниз

Как отловить нажатие комбинации клавиш в системе?   Найти похожие ветки 

 
DELORAC ©   (2005-09-27 16:50) [0]

Как отловить нажатие комбинации клавиш в системе?
Если не очень сложно, помогите с кодом, плиз...
Заранее спасибо!


 
ANB ©   (2005-09-27 17:00) [1]

Хук придется ставить на клавиатуру. Затем ловить кнопки по одной и проверять на комбинацию. Читать статью на этом сайте. Когда поймешь и наступишь на грабли из примера - приходи сюда, поправим.


 
ShiFT   (2005-09-28 06:37) [2]

> DELORAC ©   (27.09.05 16:50)
> Как отловить нажатие комбинации клавиш в системе?
> Если не очень сложно, помогите с кодом, плиз...


тебе твои комбинации клавиш отловить надо??
если да то:
 protected
   procedure hotykey( var msg: TMessage); message WM_HOTKEY;
.....
var
 id : Integer;
.....
procedure TForm1.hotykey(var msg: TMessage);
begin
 if msg.WParam = id then ShowMessage("Ctrl + Q!");
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
 id := GlobalAddAtom( "hotkey");
 RegisterHotKey( handle, id, mod_control, 81);
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
 UnRegisterHotKey( handle, id);
end;


если нет то Хук.


 
DELORAC ©   (2005-09-28 10:28) [3]

Да, мои комбинации клавиш...
Спасибо, разобрался!



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

Текущий архив: 2005.11.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.037 c
1-1130303079
zsv
2005-10-26 09:04
2005.11.27
Текущий каталог, ярлык и справка.


14-1131418978
TModem
2005-11-08 06:02
2005.11.27
У кого нибудь есть модем Zyxel UNO ?


4-1127596252
GuAV
2005-09-25 01:10
2005.11.27
EMF - изменение записей - как заполнить intercharacter spacing ?


14-1131292279
Миха2
2005-11-06 18:51
2005.11.27
Как преобразовать график функции в звуковой файл


14-1130924024
stone
2005-11-02 12:33
2005.11.27
ОЕМ-версия