Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > Нажатие клавиши

Автор: TForumUser 22.3.2009, 17:51

Здравствуйте, появилась необходимость отловить нажатие клавиши в то время, пока окно свернута или сидит в трее. Тоесть мне надо, чтобы через некотрое время после нажатия пользователем клавиши (F2) программа издала звуковой сигнал (beep). При этом фокус наведен на окно, не являющееся окном программы (программа свернута). Как можно это реализовать? Заранее спасибо.

Автор: Dmi3ev 22.3.2009, 18:22

TForumUser, Хуки тебе нужны
вот пример, который тебе нужен
http://www.z-oleg.com/delphi/hardw2.htm

Автор: TForumUser 22.3.2009, 19:11

Сделал F2 горячей клавишей, получилось следующее:

Код

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
  private
    procedure WMHotKey(var Mess:TWMHotKey);message WM_HOTKEY;
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.WMHotKey(var Mess: TWMHotKey);
begin
 Sleep(1000);
 Beep;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
 RegisterHotKey(Handle, 1, 0, vk_F2);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
 UnregisterHotKey(Handle, 1);
end;

Сигнал есть, программа работает, но тянет одеяло на себя: горячая клавиша F2 во время работы программы больше не обрабатывается ни одним прилжением. Как решить эту проблемму, чтобы работа программы не влияла на работоспособность других приложений, клавиша F2 должна остаться горячей для всех остальных программ.

Автор: Dmi3ev 22.3.2009, 19:12

TForumUser, а ниже прокрутить ты не пробовал, про hook? Тебе нужен именно он...
Горячие клавиши тут не при чем...

Добавлено через 2 минуты и 11 секунд
Тебе не нужно назначать свои горяие клавиши, тебе нужно анализировать, что нажал пользователь, я так понял...

Добавлено через 3 минуты и 6 секунд
Перехват нажатия клавиши в Windows (hook)
вот это найди по ссылочке и будет тебе счастье...