Прерывание создания компонента

Главная страница сайта "Delphi Sources"

Раздел "Исходники"

Форум

Прерывание создания компонента

Автор: Pat

Для того, чтобы отменить создание компонента, просто создайте объект исключения.

constructor TMyComponent.Create(AOwner:TComponent);
begin
  if SomeCondition then
    raise Exception.Create('Не могу создать компонент');
  inherited Create(AOwner);
  // ... дополнительная инициализация ...
end;