Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.21;
Скачать: CL | DM;

Вниз

Как поймать исключение по несоответствию маске в EditMask?   Найти похожие ветки 

 
SunnyTm   (2002-09-30 22:33) [0]

Создаю форму для ввода в базу. Для полей базы созданы постоянные поля. Использую MaskEdit. Например, поле для даты. Маска !00.00.00;1; Ввожу дату, делаю ошибку, стирая символ BackSpac"ом.
Нажимаю Tab для перехода в следующее поле и получаю англ.сообщение:
Invalid input value. Use escape key to abandon changes.
Проверила Debugger"ом: исключение EDBEditError, но я
никак не могу его перехватить.
Ловлю в OnExit из этого компонента - перехватывает раньше меня.
try
ME.ValidateEdit;
except
on DBEditError do
...
end;
Пытаюсь поймать в OnKeyUp или OnKeyPress - то же самое.
Знаю, что EditMask имеет метод ValidateEdit.
Так как же надо ловить и где? В форме? В компоненте?

А так же не могу поймать неверную дату (30.02.00).
Как, где и что надо написать?


 
NP-237 ©   (2002-10-01 09:49) [1]

Если маска указана с нулями !00.00.00;
то это значит, что данные в поле НЕОБХОДИМЫ

Я всегда ставлю девятки - !99.99.99;
- поля можно не заполнять - ошибки
Invalid input value. Use escape key to abandon changes
при выходе не будет
А на onExit проверяю правильность значения
и если ошибка - даю сообщение и setfocus


 
VAleksey ©   (2002-10-01 12:30) [2]

Application.OnException не пробовал использовать ? И там обработать это исключение.



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

Текущий архив: 2002.10.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
6-68905
Delpher-Hacker
2002-08-18 02:14
2002.10.21
Помогите мне разабраться с чатом. PLEASE!!!


7-69041
DarkSimpson
2002-08-14 18:27
2002.10.21
S.M.A.R.T.


1-68752
AL2002
2002-10-11 01:23
2002.10.21
Как сравнить две переменные TStrings?


3-68630
Виталий Панасенко
2002-09-30 10:44
2002.10.21
QuickReport


14-69011
SPeller
2002-09-30 13:11
2002.10.21
UBPFD - бесплатная база готовых решений для Delphi