MaskEdit. Сообщение об ошибке. - Общие вопросы Delphi

Don Karleone · 28.11.2010, 00:21

Есть компонент для ввода даты MaskEdit. Его свойство EditMask выглядет так: !90/90/0000;1;_
т.е полезователь должен ввести месяц (90), день (90) и год (0000);
В последствии все эти три числа присваиваются переменным m, d, y.
Год задается четырьмя цифрами. Но если пользователь задаст три цифры, например 201, то появляется сообщение об ошибке.
Можно ли эту ошибку обработать программно и вместо нее вывести например диалоговое окно MessageBox, где будет написано, что надо задать все 4 цифры.

mihali4 · 28.11.2010, 00:41

Проверяйте количество сиволов после второго слэша.

Пепел Феникса · 28.11.2010, 00:43

try except end отменили?

palevg · 28.11.2010, 00:51

А зачем изобретать велосипед, если отличный компонент DateEdit уже существует?
Когда-то он был в библиотеке RX, теперь - в JEDI.
Поставьте - и не мучайтесь!

Прик · 28.11.2010, 01:11

Самое простое, разумеется, применить TDateTimePicker и не париться.
Но если никак и MaskEdit свет в окошке, то не делать обязательным ввод всех символов (с этим компонентом шутки плохи).
В маске для даты использовать 90.90.9999.
Затем проверять "вручную" правильность заполнения в событии OnExit MaskEdit (TryStrToDate). Там же и дать пользователю по рукам, если не так или не все ввел, вернув обратно фокус ввода.

Don Karleone · 28.11.2010, 01:20

[QUOTE]try except end отменили? [QUOTE]
а какое исключение при этом генерируется?

Прик · 28.11.2010, 01:31

Цитата:

Сообщение от Don Karleone

а какое исключение при этом генерируется?

А в этом то и все и дело. Исключение генерируется внутри компонента и перехватить его невозможно не имея наследника.

wm_leviathan · 28.11.2010, 02:11

не скажу что это самый лучший способ но когда то яделал так...
в Edit'е была маска даты "01.01.2010" длина строки 10 символов можно просто поставить проверку если длина текста Edit не 10 символов то выдаем сообщение "введена неправильная дата"

28.11.2010, 00:43	#3
Пепел Феникса Старожил Регистрация: 28.01.2009 Сообщений: 21,000	try except end отменили? Хорошо поставленный вопрос это уже половина ответа. \| Каков вопрос, таков ответ. Программа делает то что написал программист, а не то что он хотел. Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.

28.11.2010, 00:51	#4
palevg Пользователь Регистрация: 03.10.2010 Сообщений: 77	А зачем изобретать велосипед, если отличный компонент DateEdit уже существует? Когда-то он был в библиотеке RX, теперь - в JEDI. Поставьте - и не мучайтесь! По соотношению цена-качество, халявное пиво не имеет конкурентов.

28.11.2010, 01:20	#6
Don Karleone Форумчанин Регистрация: 05.04.2010 Сообщений: 410	[QUOTE]try except end отменили? [QUOTE] а какое исключение при этом генерируется? ICQ: 593-013-807

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Сообщение об ошибке...	Arinka	Помощь студентам	9	25.05.2010 16:58
MaskEdit - вывод об ошибке.	lutdan	Компоненты Delphi	2	29.10.2009 09:29
Сообщение об ошибке	ruavia3	Microsoft Office Excel	3	13.10.2009 23:10
Сообщение об ошибке	Kreadlling	Общие вопросы C/C++	3	08.09.2009 13:30
Сообщение об ошибке!	QWERT1988	Общие вопросы Delphi	4	01.06.2009 17:14

28.11.2010, 00:41	#2
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Проверяйте количество сиволов после второго слэша.

28.11.2010, 01:11	#5
Прик Форумчанин Регистрация: 08.09.2010 Сообщений: 880	Самое простое, разумеется, применить TDateTimePicker и не париться. Но если никак и MaskEdit свет в окошке, то не делать обязательным ввод всех символов (с этим компонентом шутки плохи). В маске для даты использовать 90.90.9999. Затем проверять "вручную" правильность заполнения в событии OnExit MaskEdit (TryStrToDate). Там же и дать пользователю по рукам, если не так или не все ввел, вернув обратно фокус ввода.

28.11.2010, 02:11	#8
wm_leviathan Форумчанин Регистрация: 17.02.2010 Сообщений: 399	не скажу что это самый лучший способ но когда то яделал так... в Edit'е была маска даты "01.01.2010" длина строки 10 символов можно просто поставить проверку если длина текста Edit не 10 символов то выдаем сообщение "введена неправильная дата"