Обработка текста в MaskEdit

← →
Виталька2005 (2005-07-15 14:26) [0]

Здравствуйте. Задаю в маскедит маску 00.00.00
теперь если ввести например 11.22.3 или ещё как-то не по маске
возникает:
---------------------------
Debugger Exception Notification
---------------------------
Project Sisters.exe raised exception class EDBEditError with message "Invalid input value. Use escape key to abandon changes". Process stopped. Use Step or Run to continue.
---------------------------
А как мне обработать програмно неверный ввод?
Пытался в онЭкзит - ничего не получается, ошибка раньше:(

← →
Виталька2005 (2005-07-16 11:46) [1]

Мастера, неужели никто не сталкивался с таким?

← →
debuger © (2005-07-17 12:50) [2]

а OnChange?

← →
Amido (2005-07-25 13:41) [3]

2Виталька2005

Попробуйте "это ;D":
// maska 00.00.00;1;_ procedure TForm1.MaskEdit1Change(Sender: TObject); begin MaskEdit1.Text := StringReplace(MaskEdit1.EditText, "_", "0", []); end;

Криво, но хотя-бы ошибку не выкидывает :)

Обработка текста в MaskEdit Найти похожие ветки