|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
03.02.2012, 23:03 | #1 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 69
|
Запрет ввода в Edit
Ребят, помогите пожалуйста с одной проблемой! я сделал защиту от ввода букв, символов и от всего такого вот:
Код: procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char); begin if key in ['a'..'z','A'..'Z','а'..'я','А'..'Я','ё',' ','.','+','-','*','/','=',')','(','&','^','%','$','#',' @','!',';',':','?','"','[',']','{','}','\','|','/','_','<','>','¦','№'] then key:=#0; end; Проблема в том, что русские буквы при любом случае вводятся почему. Кто нибудь помогите решить проблему! |
03.02.2012, 23:12 | #2 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 69
|
а все решил проблему, спасибо!
|
04.02.2012, 07:29 | #3 |
Форумчанин
Регистрация: 13.07.2010
Сообщений: 346
|
вроде разрешить только числа проще, чем перечислять всё подряд
Non est culpa vin, sed culpa bibentis
|
10.02.2012, 23:02 | #4 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 69
|
а как это сделать, подскажите пожалуйста!
|
26.02.2012, 15:26 | #5 | |
Регистрация: 18.02.2012
Сообщений: 4
|
Цитата:
|
|
26.02.2012, 15:55 | #6 |
!=
Участник клуба
Регистрация: 08.09.2008
Сообщений: 1,751
|
|
08.03.2012, 12:18 | #7 |
Пользователь
Регистрация: 12.01.2009
Сообщений: 42
|
Код:
|
09.05.2012, 23:19 | #8 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 69
|
В таком варианте не работает Backspace. как исправить эту ситуацию.
|
09.05.2012, 23:43 | #9 |
Старожил
Регистрация: 28.01.2009
Сообщений: 21,000
|
добавить в множество #9.
то есть Код:
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите. |
09.05.2012, 23:52 | #10 |
Пользователь
Регистрация: 26.12.2011
Сообщений: 69
|
не работает всеравно (
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Запрет ввода букв | Евгений Уральский | Microsoft Office Excel | 19 | 19.09.2012 12:06 |
Запрет нажатия кнопки и запрет неправильного ввода данных | De_Kurlzz | Помощь студентам | 1 | 15.06.2011 15:14 |
Как сделать запрет ввода букв в поле для ввода input | zvezda_t | PHP | 1 | 27.12.2009 22:02 |
Запрет ввода в Stringgrid | D-Snaker | Помощь студентам | 1 | 18.06.2009 08:08 |
запрет ввода одинаковых чисел в edit | epic6 | Общие вопросы Delphi | 6 | 15.06.2009 08:31 |