|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.05.2016, 17:37 | #1 |
Регистрация: 14.05.2016
Сообщений: 4
|
Подскажите, как сделать так, чтобы можно было нажать клавишу Bescape.
Вот мой код :
procedure TForm1.edit1KeyPress(Sender: TObject; var Key: Char); begin if not (Key in ['1'..'9','0']) then Key:=#0; end; end. А как добавить туда клавишу Bascape? Ну чтобы текст стирать можно было. Последний раз редактировалось Militia; 14.05.2016 в 17:43. |
14.05.2016, 17:40 | #2 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
Знаю BackSpace (в простонародье "забой", код #8), знаю Escape (она же "Esc", код #27) А Bescape не знаю! |
|
14.05.2016, 17:53 | #3 |
Регистрация: 14.05.2016
Сообщений: 4
|
Извините, не так написал. Bascape клавиша.
|
14.05.2016, 18:29 | #4 |
Форумчанин
Регистрация: 12.02.2011
Сообщений: 808
|
Bascape ЭТО ЧТО ЗА КЛАВИША ТАКАЯ??
Коды клавиш если это BackSpace Код:
Терпение!Дежурный экстрасенс скоро свяжется с вами!
Последний раз редактировалось Dvoishnik; 14.05.2016 в 18:32. |
15.05.2016, 15:26 | #5 |
Регистрация: 14.05.2016
Сообщений: 4
|
Большое спасибо, все работает. Просто писал
if not (Key in ['1'..'9','0','#8']) then Key:=#0; А там надо было #8 без кавычек. Спасибо, что помогли! |
15.05.2016, 15:28 | #6 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
А как насчет del и клавишами управления курсором?
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
16.05.2016, 10:16 | #7 |
ПШП
Участник клуба
Регистрация: 15.07.2013
Сообщений: 1,887
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Подскажите пожалуйста, как сделать, чтобы в Edit можно было ввести цифры от 0 до 12. | ciev | Общие вопросы Delphi | 6 | 14.05.2016 17:45 |
Как сделать, чтобы при поисковой выдаче было так:...? | hvs1987 | HTML и CSS | 3 | 10.02.2012 17:01 |
Как сделать так чтобы изображение было поверх таблицы | otenova | HTML и CSS | 2 | 29.09.2010 18:00 |
Как сделать так, чтобы форму можно было тостать не только за заголовок? | Никки | Общие вопросы Delphi | 1 | 04.09.2008 14:34 |
Подскажите, как сделать так, чтобы тест можно было повторно пройти не перезагружая пр | Kamikadze_666 | Помощь студентам | 2 | 23.05.2007 02:48 |