Главная страница
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.028 c
2-1131296696
ant_
2005-11-06 20:04
2005.11.27
цыклы


14-1131096685
Pazitron_Brain
2005-11-04 12:31
2005.11.27
Проблемы с железом #2


2-1131107194
syte_ser78
2005-11-04 15:26
2005.11.27
сетевой доступ к баз Paradox7


5-1112319727
komusito
2005-04-01 05:42
2005.11.27
Как создать графический компонент нестандартного вида


14-1131001203
__new
2005-11-03 10:00
2005.11.27
Посоветуйте бесплатный инсталятор