Вниз
Скачать: CL | DM;

HotKey   Найти похожие ветки 

 
dim- ©   (2002-06-03 22:36) [0]

Данный вопрос встречался здесь уже не раз, но задам его еще раз
как назначить горячуют клавишу для программы.
Делаю как написано в этом форуме http://delphi.mastak.ru/cgi-bin/faq.pl?look=1&id=988621065&n=16
но программа вобще не реагирует.


 
dim- ©   (2002-06-04 09:03) [1]

Народ кто чего может посоветовать?


 
Song ©   (2002-06-04 09:06) [2]

Всё должно работать. Напишите как Вы делаете.


 
QWest   (2002-06-04 09:16) [3]

//Компонент предназначен, чтобы эмулировать нажатия клавиш в сисеме. В качестве параметра берет переменную типа Integer, но можно использовать и именнованные константы типа VK_SNAPSHOT (тогда произойдет нажатие PrintScreen"a// - не подойдет ??


 
dim- ©   (2002-06-04 09:48) [4]

....
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;


 
Song ©   (2002-06-04 10:01) [5]

Довольно странно... Возможно Вы нажимаете эту клавишу находясь в приложении где она уже зарегистрирована.


 
Севостьянов Игорь ©   (2002-06-04 19:56) [6]

Да попробуй сначала назначить другую или в сочетании
У меня вот vkTAB+WIN+CTRL рабоает не надо баловаться


 
Севостьянов Игорь ©   (2002-06-04 19:56) [7]

Да попробуй сначала назначить другую или в сочетании
У меня вот vkTAB+WIN+CTRL работает не надо баловаться


 
dim- ©   (2002-06-06 09:44) [8]

интересно что в Д5 все работает, а в Д6 нет



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
1-55151
Reticent
2002-06-04 13:38
2002.06.17
ColumnClick!?!?!


8-55234
dmitriyk
2002-01-31 03:22
2002.06.17
Как качественно перевести цветную картинку в черно-белую


4-55343
Nomad
2002-04-10 11:16
2002.06.17
как недопустить закрытия плавающего окошка?


8-55222
[\/\/ \/\/ \/\/]
2002-02-03 06:53
2002.06.17
AlphaBlending


1-55190
Alexander_D6_XP
2002-06-04 18:04
2002.06.17
сделать Ctrl+Enter в TMemo?!




   Наверх