![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
HotKey [D5, Win95/98]
dim- © (2002-06-03 22:36:00)Данный вопрос встречался здесь уже не раз, но задам его еще раз
как назначить горячуют клавишу для программы.
Делаю как написано в этом форуме http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=988621065&n=16
но программа вобще не реагирует.
dim- (2002-06-06 09:44:00) [1]интересно что в Д5 все работает, а в Д6 нет
Севостьянов Игорь (2002-06-04 19:56:00) [2]Да попробуй сначала назначить другую или в сочетании
У меня вот vkTAB+WIN+CTRL рабоает не надо баловаться
Севостьянов Игорь (2002-06-04 19:56:00) [3]Да попробуй сначала назначить другую или в сочетании
У меня вот vkTAB+WIN+CTRL работает не надо баловаться
Song (2002-06-04 10:01:00) [4]Довольно странно... Возможно Вы нажимаете эту клавишу находясь в приложении где она уже зарегистрирована.
dim- (2002-06-04 09:48:00) [5]....
procedure hotykey(var msg:TMessage); message WM_HOTKEY;
private
.....
var id:Integer;
procedure TForm1.hotykey(var msg:TMessage);
begin
if (msg.LParamHi=vk_Insert) then
begin ShowMessage("kjhdfbvcdjkfv!");
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
id:=GlobalAddAtom("hotkey");
RegisterHotKey(Handle,id,0,vk_Insert);
end;
procedure TForm1.FormDestroy(Sender: TObject);
begin
UnRegisterHotKey(handle,id);
end;
QWest (2002-06-04 09:16:00) [6]//Компонент предназначен, чтобы эмулировать нажатия клавиш в сисеме. В качестве параметра берет переменную типа Integer, но можно использовать и именнованные константы типа VK_SNAPSHOT (тогда произойдет нажатие PrintScreen"a// - не подойдет ??
Song (2002-06-04 09:06:00) [7]Всё должно работать. Напишите как Вы делаете.
dim- (2002-06-04 09:03:00) [8]Народ кто чего может посоветовать?