Текущий архив: 2002.08.29;
Скачать: CL | DM;
Вниз
TMyForm = class(TForm, IMyForm) Найти похожие ветки
← →
Юрий Федоров © (2002-08-19 14:31) [0]Можно ли так писать, или существуют какие-то подводные камни?
Дело в том, что деструктор формы, похоже, не вызывается при обнулении всех ссылок на интерфейс.
← →
Skier © (2002-08-19 14:36) [1]>Юрий Федоров
> Дело в том, что деструктор формы, похоже, не вызывается
> при обнулении всех ссылок на интерфейс.
И правильно делают.
Тебе нужно перекрыть методы для подсчёта ссылок.
(_AddRef и _Release)
Код можно взять из TInterfacedObject...
← →
Юрий Федоров © (2002-08-19 15:01) [2]>Skier
Спасибо
Страницы: 1 вся ветка
Текущий архив: 2002.08.29;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.015 c
