Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.11;
Скачать: CL | DM;

Вниз

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

 
Alarm ©   (2007-02-16 09:50) [0]

Доброго времени суток.
В приложении используются "горячие клавиши" (HotKey). Собственно все нормально, однако у меня вопрос. Запускаю второй экземпляр приложения, набираю "горячие клавиши" и с некоторым удивлением наблюдаю, что их обрабатывает приложение запущенное первым, а активное (в данном случае второе) их не обрабатывает. Видимо это нормально, но мне не понятно. Можно ли сделать так, чтобы эти HotKey обрабатывало то приложение, с которым я в данный момент работаю?
Спасибо.


 
Elen ©   (2007-02-16 09:53) [1]


> В приложении используются "горячие клавиши" (HotKey)

Как их создаеш? Через RegisterHotKey?


 
Alarm ©   (2007-02-16 10:01) [2]

> Elen ©   (16.02.07 09:53) [1]
Как их создаеш? Через RegisterHotKey?


Нет,
юзаю
procedure ShortCutToKey(ShortCut: TShortCut; var Key: Word; var Shift: TShiftState);


 
Elen ©   (2007-02-16 10:08) [3]


> Alarm ©   (16.02.07 10:01) [2]

Т.Е. хоткеи у тебя в менюхе прописаны?


 
Alarm ©   (2007-02-16 10:44) [4]

HotKey(и) у меня на форме (из Package Win32).

HotKey1: THotKey;
HotKey2: THotKey;


private
procedure WMHotKey(var Msg: TWMHotKey); message WM_HOTKEY;

...
procedure TForm1.WMHotKey(var Msg: TWMHotKey);
begin
 if Msg.HotKey = Hotkey_id1 then
   begin
     ...
   end;
 if Msg.HotKey = Hotkey_id2 then
  begin
   ...
  end;
end;


 
Elen ©   (2007-02-16 11:01) [5]


> Alarm ©   (16.02.07 10:44) [4]

Извини за глупый вопрос, а как ты их (хоткеи) регистрируеш? Разве ThotKey это делает?


 
Alarm ©   (2007-02-16 19:02) [6]

>Alarm ©   (16.02.07 10:01) [2]

> Elen ©   (16.02.07 09:53) [1]
Как их создаеш? Через RegisterHotKey?
Нет,
юзаю
procedure ShortCutToKey(ShortCut: TShortCut; var Key: Word; var Shift: TShiftState);


А здесь я нечаянно соврал:(

в TForm1.FormCreate(Sender: TObject);
у меня
RegisterHotKey(Handle, Hotkey_id1, Modifiers, hhKey1);



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

Текущий архив: 2007.03.11;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.049 c
15-1171606301
Loginov Dmitry
2007-02-16 09:11
2007.03.11
Ловушка для сишника MidStr()


6-1159934609
verybadbug
2006-10-04 08:03
2007.03.11
CGI + AD


2-1171975088
Nija
2007-02-20 15:38
2007.03.11
Просмотр Html кода


2-1171970365
Scavenger
2007-02-20 14:19
2007.03.11
StringGrid


15-1171150185
Макрос
2007-02-11 02:29
2007.03.11
А я знаю простую задачу которую без макросов очень сложно сделать