Главная страница
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.078 c
2-1131314313
Michael5
2005-11-07 00:58
2005.11.27
Заклинило на примитивной вещи - не могу отредактировать запись!


3-1129194458
Delphinium
2005-10-13 13:07
2005.11.27
Blob-поля в InterBase


4-1127758262
NikNet
2005-09-26 22:11
2005.11.27
Как узнать ИНДЕКС кнопки на ToolBar(е)


9-1120840060
Dgt
2005-07-08 20:27
2005.11.27
Привет.Хочу сделать как в контре. Glscene


14-1129969212
useroff
2005-10-22 12:20
2005.11.27
зацените мой сайт narisoval.net.ua