Советы по Delphi
Прерывание создания компонента
Для того, чтобы отменить создание компонента, просто создайте объект исключения.
constructor
TMyComponent.Create(AOwner:TComponent);
beginif
SomeCondition
thenraise
Exception.Create('Не могу создать компонент');
inherited
Create(AOwner);
.... дополнительная инициализация ...end
;
Pat [000470]
Содержание раздела
Главная сайта