Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Обработка текста в MaskEdit [D7, WinXP]


Виталька2005 ©   (2005-07-15 14:26:00) 

Здравствуйте. Задаю в маскедит маску 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.
---------------------------
А как мне обработать програмно неверный ввод?
Пытался в онЭкзит - ничего не получается, ошибка раньше:(


Amido   (2005-07-25 13:41:00) [1]

2Виталька2005

Попробуйте "это ;D":

// maska 00.00.00;1;_
procedure TForm1.MaskEdit1Change(Sender: TObject);
begin
 MaskEdit1.Text := StringReplace(MaskEdit1.EditText, '_', '0', []);
end;


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


debuger   (2005-07-17 12:50:00) [2]

а OnChange?


Виталька2005   (2005-07-16 11:46:00) [3]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо