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

Вниз

как использовать кнопки типа "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;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.047 c
14-1083166285
Yegorchic
2004-04-28 19:31
2004.05.16
Статья по клавеатуре...


1-1083437406
G-ray
2004-05-01 22:50
2004.05.16
Подсветка синтаксиса


1-1083071145
Ruslan
2004-04-27 17:05
2004.05.16
Вопрос по функции FloatToStr


3-1082095420
Nazer
2004-04-16 10:03
2004.05.16
Хранимая процедура не изменяется :(


7-1080560791
Gamlet
2004-03-29 15:46
2004.05.16
Вход в систему