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

Вниз

как использовать кнопки типа "ctrl,alt,print screen и.т.д"?   Найти похожие ветки 

 
MRAk ©   (2004-05-04 15:26) [0]

как использовать кнопки типа "ctrl,alt,print screen и.т.д"?
а то возможности ограничеваются только обычными =(


 
TUser ©   (2004-05-04 15:28) [1]

Методом оказания приемлимого по модулю давления, вектор которого направлен ортогонально к поверхности клавы.

PS. OnKeyPress if key = vk_YourKey then begin end;, если по сабжу.


 
MRAk ©   (2004-05-04 19:18) [2]

=)))) спасибо


 
MRAk ©   (2004-05-04 20:27) [3]

хотя у меня новая проблема на VK_SNAPSHOT он пишет Incompatible types


 
begin...end ©   (2004-05-04 20:31) [4]

> [3] MRAk ©   (04.05.04 20:27)

А... Тебе не OnKeyPress нужно, а OnKeyDown.


 
begin...end ©   (2004-05-04 20:34) [5]

P.S. OnKeyPress перехватывает только буковки и циферки. :)


 
MRAk ©   (2004-05-04 20:42) [6]

да ошибка пропала но работать не хочет =((


 
begin...end ©   (2004-05-04 20:43) [7]

> [6] MRAk ©   (04.05.04 20:42)

Form.KeyPreview := True ?


 
MRAk ©   (2004-05-04 20:48) [8]

vk_shift работает а vk_SNAPSHOT нет =(


 
MRAk ©   (2004-05-04 20:51) [9]

>Form.KeyPreview := True ?

да и так и так =(


 
begin...end ©   (2004-05-04 20:51) [10]

> vk_shift работает а vk_SNAPSHOT нет =(

У тебя, наверно, клавиша PrintScreen неисправна. :)


 
MRAk ©   (2004-05-04 20:59) [11]

=))))))да нет картинки то она скринит =( а вообше можно чтобы прога даже в свернутом режиме читала все нажатия? например скажем пишу я ченить в блокноте а она выдет мне сколько раз я shift нажал?


 
Gero ©   (2004-05-04 21:11) [12]


> MRAk ©   (04.05.04 20:59)

Читай статьи про хуки.


 
begin...end ©   (2004-05-04 21:14) [13]

> а вообше можно чтобы прога даже в свернутом режиме читала все нажатия?

ИМХО, форма должна быть активна.

Попробуй ещё вот что.
Опиши у себя в форме такую процедуру:

procedure Hook(var Msg: TMsg; var Handled: Boolean)

А реализация такая:

procedure Hook(var Msg: TMsg; var Handled: Boolean);
begin
 if Msg.Message = WM_KEYDOWN then
   if Msg.wParam = VK_SNAPSHOT then
     // Обрабатывай тут
end;


 
MRAk ©   (2004-05-04 21:52) [14]

эх я ешё тока учусь и до хуков не дошел вот как дойду попробую =( Спасибо большое все таки что то работает и я этим непременно воспользуюсь =))



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
11-1069465382
azsd
2003-11-22 04:43
2004.05.16
ShowModal Must Close Twice?


1-1083225554
Dysan
2004-04-29 11:59
2004.05.16
опредиление кодировки


9-1059490261
Rooo
2003-07-29 18:51
2004.05.16
Как поставить GlScene 09b на Delphi 7?


8-1077375996
Cerber
2004-02-21 18:06
2004.05.16
Прозрачность.


1-1083276815
Dumnok
2004-04-30 02:13
2004.05.16
Версия exe-файла





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский