Уважаемые коллеги!
Солкнулся со следующей проблемой, сам понимаю, что туплю, но в чем грабли не пойму.
Есть внутренний сервер автоматизации писанный на Дельфи, соответственно это dll.
В нем есть несколько СОМ-объектов.
Я добавляю еще один объект который использует некоторые методы других объектов.
Соответственно, перегрузив AfterConstruction получаю в нем указатели на нужные мне интерфейсы требуемых объектов с помощью соответствующий фабрик:
procedure TObj4.AfterConstruction;
begin
inherited;
Obj1 := CoObj1.Create;
Obj2 := CoObj2.Create;
Obj3 := CoObj3.Create;
end;
Все прекрасно, все работает, если бы не одно НО: я зарабатываю недопустимую операцию при завершении приложения
Что бы это могло быть?
Заранее спасибо за конструктив!