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

Вниз

Как строковое значение клавиши перегнать в её VirtualKeyCode значение (integer)   Найти похожие ветки 

 
greenrul ©   (2002-03-19 21:24) [0]

Например "Ctrl"->16 и прочее, CHR и ORD не подходят - длинные строки ("Shift") не проскочат. Надеюсь на вас, мастера!


 
Song ©   (2002-03-19 23:11) [1]

http://delphi.mastak.ru/articles/sendkey.html


 
Anatoly Podgoretsky ©   (2002-03-19 23:31) [2]

Если я правильно тебя понял, то тебе нужна шутка типа ShortCut Editor, реализация есть в файле dsgnintf.pas
Или уточни вопрос, а то он какой то непонятный.


 
greenrul ©   (2002-03-20 08:13) [3]

2Song - хреново..
а по иному никак?


 
Song ©   (2002-03-20 08:22) [4]

Если только узнать, то:
сделай для любого элемента процедуру на onKeyPressed и на точку внутри процедуры поставь метку. Когда трассировка сработает посмотри код переменной Key.
Я так простенько делал, когда мне нужно было узнать Ctrl+A
Если не будет получаться сделай OnKeyUp - точно получиться.


 
McSimm ©   (2002-03-20 15:23) [5]

Попробуй такую связку:
function TextToShortCut(Text: string): TShortCut;
получить TShortCut из текста;
procedure ShortCutToKey(ShortCut: TShortCut; var Key: Word; var Shift: TShiftState;)
получить код и Shift из TShortCut



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
14-294
Fellomena
2002-02-13 15:53
2002.04.01
Помяните меня в своих молитвах - в ближайшее время меня обрекли на Фортран =(


14-286
AriokH
2002-02-17 22:00
2002.04.01
Просто вопрос


1-83
ЛенаК
2002-03-21 07:58
2002.04.01
Как определить, на каком компоненте формы находится фокус?


1-90
Sergey Saf
2002-03-21 12:07
2002.04.01
Воспроизведение файла


1-173
deleon
2002-03-19 16:15
2002.04.01
Как из плагина вставлять свои TMenuItem в любую менюшку программы ?