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

Вниз

Перехват нажатия клавиши   Найти похожие ветки 

 
3asys   (2002-12-20 10:54) [0]

Есть форма на которой расположены TEdit и TButton.
Фокус ввода установлен на TEdit. После того, как пользователь ввел что-то в TEdit, он нажимает "Enter". При этом должен сработать код TButton. (Без перевода на TButtonфокуса ввода).

Если я правильно понимаю, для этого надо перехватить нажатие клавиши "Enter" и выполнить код TButton. Но проблема в том, что я никак не могу найти код клавиши "Enter".

Буду признателен, за строчку примера.

С Уважением, 3asys


 
myor   (2002-12-20 10:57) [1]

onkeypress

if key=#13
then


 
Переяслов Григорий   (2002-12-20 10:57) [2]

Button.Default := True;
если хочется отмены Button.Cancel := True;
можно в DesignTime


 
LongIsland   (2002-12-20 10:58) [3]

Обработка события OnKeyDown, OnKeyPress, OnKeyUp (любое) и в нем Button1.Click;


 
Delirium^.Tremens   (2002-12-20 11:01) [4]


> myor (20.12.02 10:57)
> onkeypress
>
> if key=#13
> then

Я бы сказал

if key = 13 then ...


 
myor   (2002-12-20 11:08) [5]


> Delirium^.Tremens ©



> Я бы сказал
>
> if key = 13 then ...


а я бы сначала попробовал!!!!!

edit1keypress()
if key=#13
then...


 
3asys   (2002-12-20 11:08) [6]

Спасибо ВСЕМ, БОЛЬШОЕ!

С Уважением, 3asys



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

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

Наверх





Память: 0.45 MB
Время: 0.003 c
6-1849
ppcat
2002-11-05 13:25
2003.01.02
Как получить список пользователей?


1-1811
harismatik
2002-12-20 13:47
2003.01.02
Опять про TListView


1-1790
ooo
2002-12-20 09:30
2003.01.02
Что такое плагин?


1-1787
smok_er
2002-12-20 12:27
2003.01.02
ReadLn и перемещение к началу файла


14-1900
cyborg
2002-12-11 23:09
2003.01.02
Не ожидали?





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