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

Вниз

Работа с HotKey   Найти похожие ветки 

 
Иванько   (2003-10-26 23:37) [0]

есть HotKey. У него берем сочетание клавиш и присваиваем пункту меню:
form3.ranslate1.ShortCut := HotKey1.hotkey;

затем считываем:
hotkey1.HotKey:= form3.ranslate1.ShortCut;
Проблема:
если мы используем клавиши управления курсором, то при считывании он вместо Right будет писать Num 6, вместо Left Num 4. Все работает корректно, и работают обе клавиатурные комбинации, но отображается не корректно... Как быть?


 
DesWind   (2003-10-27 01:28) [1]

Может попробовать изменить Hint?


 
Deedlit   (2003-10-27 04:54) [2]

Та же фигня :((( Нифево не могу с этой гадостью сделать. Единственно что при считывании значений можно прописать нечто вроде If ShortCutToText(form3.ranslate1.ShortCut)="Ctrl+Num 6" then form3.ranslate1.ShortCut:=TextToShortCut("Ctrl+Right");

То же самое и для PgDn, PgUp, Home, End, Up, Down и даже Caps Lock. >_<


 
Deedlit   (2003-10-27 04:58) [3]

То есть, тьфу, HotKey1.HotKey:=...



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

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

Наверх




Память: 0.44 MB
Время: 0.035 c
3-40851
Andrushk
2003-10-07 18:21
2003.11.13
Как восстановить утерянный Connect


6-41810
saNat
2003-09-10 02:32
2003.11.13
Закачка файла с удаленного компьютера


14-42088
Дракон
2003-10-23 11:16
2003.11.13
Первая версия Microsoft Windows 1.0 (1985 год)


3-41081
Layner
2003-10-22 14:54
2003.11.13
Посоветуйте клиента для Access, минимум как Query Analyzer


14-41971
B&B
2003-10-13 23:42
2003.11.13
Американские мультфильмы





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