Непонятная ситуация с временем жизни COM-объектов

[Jack Ferre]

Экспериментировал с потоками и ссылками - экземпляр класса стал удалятся позже, чем должен.
Закомментировал большую часть кода, пытался найти забытую мной ссылку. Результатов ноль.
Создал копию проекта, переделал для теста.
Суть - класс CMain со ссылками на CNormal и CStupid. Перед смертью CMain должен убить объекты по ссылкам и помереть сам.
Удалил все кроме debug.print в событии Class_Terminate и вижу:

Код: Выделить всё

CNormal terminated.
CMain terminated.
CStupid terminated.

вместо

Код: Выделить всё

CNormal terminated.
CStupid terminated.
CMain terminated.

Сейчас это два идентичных класса. Почему так?

StupidClass.rar

(2.41 Кб) Скачиваний: 109

[Хакер] :: Устное замечание за неадекватное название темы. Тема переименована из «Бесит. Просто бесит.» в «Непонятная ситуация с временем жизни COM-объектов».

[Хакер]

Ты полагаешься на встроенный спрятянный под капотом механизм зачистки, и предъявляешь претензии к пому, что порядок уничтожения не совпадает с желаемым.

Если тебе важен определённый порядок, добавь с Class_Terminate явное зануление ссылок:

Код: Выделить всё

    Set obj1 = Nothing
    Set obj2 = Nothing

[Jack Ferre]

свет мигнул(

неадекватное название темы

Извиняюсь

Пытаюсь разобраться в VB-шным ООП. Казалось, что понял некоторые нюансы.
Понимаю, что Class_Terminate событие, а не деструктор. Но всё же. Еще сегодня утром все работало как мне надо, а сейчас...
Попробовал переименовать классы, файлы классов, все равно событие CStupid::Class_Terminate вылетает позже, чем CMain::Class_Terminate.
Например

Код: Выделить всё

CNormal terminated.
CNormal terminated.
CMain terminated.

и

Код: Выделить всё

CMain terminated.
CStupid terminated.
CStupid terminated.

Да и ладно с Class_Terminate. В какой последовательности они удаляются на самом деле? (без set nothing)

[Хакер]

В какой последовательности они удаляются на самом деле? (без set nothing)

Ну а какая разница? Частью концепции является то, что порядок уничтожения зависящих друг от друга объектов не играет (не должен играть роли).

[Jack Ferre]

Подумал над важностью порядка удаления - и правда не важно. Но...

Я создаю ссылки на объекты в потоке (т.е. вторую, которая не даст убить экземпляр класса), и для наглядности вывожу данные о смерти экземпляра объекта (т.к. новый поток может начать вызывать методы мертвого объекта и все рухнет).
UPD: событие уничтожения CStupid после CMain стало выглядеть как моя ошибка.

Зависимость порядка событий нашел: порядок модулей/классов в файле проекта *.vbp. Видимо убирал и добавлял файлы и все перепуталось.

[Хакер]

Я создаю ссылки на объекты в потоке (т.е. вторую, которая не даст убить экземпляр класса), и для наглядности вывожу данные о смерти экземпляра объекта (т.к. новый поток может начать вызывать методы мертвого объекта и все рухнет).

Проект какого типа? Откуда несколько потоков в Standard EXE (с учётом того, что мой кирпич ещё не опубликован)?

[Jack Ferre]

Откуда несколько потоков в Standard EXE

Стабильных потоков нет, а нестабильных - пожалуйста.
Если что-то (DLL или ActiveX control) создает для себя потоки, то приложение перестает падать на Set/GetTlsValue. Другие причины падения пытаюсь выяснить.

[Хакер]

Стабильных потоков нет, а нестабильных - пожалуйста.

Прекрати заниматься фигнёй. Кроме того, ссылки на объекты вообще недопустимо передавать между потоками STA, не делая маршаллинга. Чего ты не делаешь, я уверен.

[The trick]

Jack Ferre, почитай