Главная страница
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.031 c
2-1171886181
lorn
2007-02-19 14:56
2007.03.11
web deploys


3-1166107397
Shaman_
2006-12-14 17:43
2007.03.11
Не могу динамически задать TClientDataSet.ProviderName


2-1171982875
VovkaN
2007-02-20 17:47
2007.03.11
Как указать temp-файлам .db при работе BDE другую папку?


11-1150718660
Arvist
2006-06-19 16:04
2007.03.11
Свернуть в трей, скрыть из таскбара


2-1171830497
Mr.Vlad
2007-02-18 23:28
2007.03.11
Проблема с компонентом GLScene