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

Перехват клавиш   Найти похожие ветки 

 
Cosmic ©   (2002-11-20 20:10) [0]

Прога без окна висит в памяти. Нужно, чтобы при нажатии, например, <Ctrl-F6>, прога выполняла какое-то действие (скажем, MessageBox). Если не трудно - с примерами... :)


 
Song ©   (2002-11-20 20:53) [1]

И чем же она сообщение будет по-вашему ловить, если у неё нет окна?


 
Diamond Cat ©   (2002-11-21 00:25) [2]

2 Song
интересно, вот такой пример
WndClassEx: TWndClassEx;
....
with WndClassEx do // Инициализируем только необходимое.
begin
cbSize := SizeOf(TWndClassEx);
lpfnWndProc := @WndFunc;
lpszClassName := AppName
end;
WndClassEx.hInstance := HInstance;
окна как такогого нет а сообщения обрабатываются
if (RegisterClassEx(WndClassEx) <> 0) and (CreateWindowEx(0, AppName, AppName, WS_OVERLAPPEDWINDOW,0, 0, 0, 0, 0, 0, HInstance, nil) <> 0) then
while GetMessage(Msg, 0, 0, 0) do
begin
TranslateMessage(Msg);
DispatchMessage(Msg)
end
ну и далее по плану

2 Cosmic зарегистрируй для себя быстрые клавиши и вперед либо ставь hook глобальный


 
Song ©   (2002-11-21 08:30) [3]

Ну дык в данном случае у Вас не досовская прога, а консольная Win32 причём с созданным окном, которое и будет ловить сообщения.



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

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



Память: 0.45 MB
Время: 0.012 c
14-25019
Delirium
2002-12-19 16:32
2003.01.09
Download DevExpress QuantumGrid 4.0 For Delphi 7


4-25134
vvs2002
2002-11-21 05:21
2003.01.09
Разлочить Button?????


3-24814
Светлана
2002-12-17 09:29
2003.01.09
Помогите найти пример SQL скриптика с использованием курсоров ...


3-24805
Bocman
2002-12-16 19:21
2003.01.09
Выбор записи в DBLookupcomboBox


8-24985
Ascan_
2002-09-20 18:46
2003.01.09
array --> TJpg. Это возможно?




   Наверх