![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
АЙ НИД ХЕЛП !!! [D6, Win95/98]
HEXBAT © (2002-07-10 10:55:00)Люди, поможите плз!
Как сделать проверку маски ввода на наличие введенной информации.
Хочется, чтоб выводилось отделное окно с сабжем об ошибке (красивое),
Но не тупой стандарт типа: " . . " is not a valid date
Заранее огромное спасибо!
TTCustomDelphiMaster (2002-07-10 13:27:00) [1]Сделай компонент потомок TMaskEdit
TMyMaskEdit = class(TMaskEdit)
procedure ValidateEdit; override; // Производит проверку
end;
procedure TMyMaskEdit.ValidateEdit;
begin
try
inherited ValidateEdit;
except
// Здесь напиши свое сообщение
ShowMessage("... .. ... .....");
end;
end;
Johnmen (2002-07-10 11:08:00) [2]OnChange