Нужно, чтобы программа реагировала на заданные клавиши даже когда она свернута

@Cadmy · Регистрация: 15.12.2009

Author24 — интернет-сервис помощи студентам

Здравствуйте, у меня такая проблема: нужно, чтобы программа реагировала на заданные клавиши (у меня ctrl+space) даже, когда она свернута. Посоветуйте, что-нибудь. Заранее спасибо

Vourhey · 19.10.2007, 04:46

Ctrl+Esc не получиться зарегить, так как этот хоткей уже есть в системе (кнопка "пуск"). Вот примерчик написал, как зарегистрировать другую комбинацию:

Код

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
    UnregisterHotKey(handle, 1);
end;

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

procedure TForm1.wmhotkey(var m: twmhotkey);
begin
    if (m.HotKey = 1) then
        showmessage('My first registered hotkey! Yeah!');
end;

@Цербер · 23.10.2007, 19:50

Так у него не Ctrl+Esc, а Ctrl+пробел вроде...

Vourhey · 24.10.2007, 00:35

Невнимательно прочитал. Сори. Просто я на полвопросе понял, что нужно. Зато, дополнительная информация.

@Cadmy 0 / 0 / 0 Регистрация: 15.12.2009 Сообщений: 21
		1
	Нужно, чтобы программа реагировала на заданные клавиши даже когда она свернута 19.10.2007, 04:18. Показов 2449. Ответов 3 Метки нет (Все метки) Здравствуйте, у меня такая проблема: нужно, чтобы программа реагировала на заданные клавиши (у меня ctrl+space) даже, когда она свернута. Посоветуйте, что-нибудь. Заранее спасибо 0

Vourhey Почетный модератор 7393 / 2639 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	19.10.2007, 04:46	2
	Ctrl+Esc не получиться зарегить, так как этот хоткей уже есть в системе (кнопка "пуск"). Вот примерчик написал, как зарегистрировать другую комбинацию: Код procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); begin UnregisterHotKey(handle, 1); end; procedure TForm1.FormCreate(Sender: TObject); begin RegisterHotKey(Handle, 1, MOD_CONTROL, VK_F1); end; procedure TForm1.wmhotkey(var m: twmhotkey); begin if (m.HotKey = 1) then showmessage('My first registered hotkey! Yeah!'); end; 0

@Цербер 5 / 4 / 3 Регистрация: 01.05.2006 Сообщений: 181
	23.10.2007, 19:50	3
	Так у него не Ctrl+Esc, а Ctrl+пробел вроде... 0

Vourhey Почетный модератор 7393 / 2639 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	24.10.2007, 00:35	4
	Невнимательно прочитал. Сори. Просто я на полвопросе понял, что нужно. Зато, дополнительная информация. 0