Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

сочетание клавиш в фоновом режиме   Найти похожие ветки 

 
rendall   (2010-04-25 16:23) [0]

Всем привет! Не понимаю как заставить OnKeyDown работать в фоновом режиме, если приложение скрывается через
Application.ShowMainform:=false; в модуле project, а также стоит KeyPreview = true; вот процедура:

procedure TForm2.FormKeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
  if (Key=$81) and (ssShift in Shift) then Button1Click(Sender);
end;

правильно ли организовано сочетание Shift+Q ?


 
sniknik ©   (2010-04-25 16:37) [1]

в "фоновом режиме" нет ввода.


 
rendall   (2010-04-25 16:40) [2]

просто видел в программах, таких как hypersnap при  нажатии shift+ctrl+? что-то все-таки происходит
правда она была в трее (а это что-то меняет?)


 
sniknik ©   (2010-04-25 16:43) [3]

нет. меняет если она поставила хук. или в винде назначила "горячие клавиши" по которым ее "подымают" второй раз и она что-то делает в зависимости от повторности запуска делает.


 
rendall   (2010-04-25 16:50) [4]

классно! спасибо за совет, думаю, нужно работать с SetWindowsHookEx


 
Игорь Шевченко ©   (2010-04-25 18:18) [5]


> думаю, нужно работать с SetWindowsHookEx


нужно работать с RegisterHotKey


 
Rendal ©   (2010-04-25 22:10) [6]


> нужно работать с RegisterHotKey


есть!!! спасибо за помощь. проблема решена. это был именно RegisterHotKey, нашел готовый пример с перехватами сообщений от окон и созданием ""глобальных атомов"". осталось лишь только найти метод определения занятости/незанятости  зарезервированных на данный момент комбинаций(аналогичное hypersnap выдает сообщение если комбинация занята), но сущ функция GlobalFindAtom(...), и тут уже ясно что делать)


 
Leonid Troyanovsky ©   (2010-04-25 22:53) [7]


> Rendal ©   (25.04.10 22:10) [6]

> RegisterHotKey, нашел готовый пример с перехватами сообщений
> от окон и созданием ""глобальных атомов"". осталось лишь

If the function fails, the return value is zero.
To get extended error information, call GetLastError.

--
Regards, LVT.


 
rendal ©   (2010-04-25 23:07) [8]


> If the function fails, the return value is zero. To get
> extended error information, call GetLastError.

...точно, можно судить о занятости по обращении ф-ции в нуль, что намного проще!



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

Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.166 c
15-1268689777
Германн
2010-03-16 00:49
2010.08.27
Build Events в опциях проекта.


15-1273125258
oxothuk
2010-05-06 09:54
2010.08.27
Точки останова


15-1270759152
Nickola2
2010-04-09 00:39
2010.08.27
Борьба с рекламными баннерами не увенчалась успехом


15-1265319012
Юрий
2010-02-05 00:30
2010.08.27
С днем рождения ! 5 февраля 2010 пятница


15-1272036312
@!!ex
2010-04-23 19:25
2010.08.27
Как получить повышенные привилегии в Vista?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский