Форум: "Основная";
Текущий архив: 2002.08.29;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.011 c