А> procedure ShowControlWindow(iType: Integer; iIndex: Integer); safecall; А> end;[/pascal]Что, где проверить\отловить надо, чтобы успеть уничтожить форму в момент завершения вызывающего приложения?
Вопрос, а при FormClose делается уничтожение вашего объекта ?
Например
obj := CreateObject( 'bla-bla' );
и в
FormClose( .. )
begin
obj := null;
end
ну и естественно в деструкторе должно быть закрытие окна которое создано в сом-объекте
или можно в отдельный метод вынести бывает полезно ( закрытие диалога )