Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TMyForm = class(TForm, IMyForm) [D6, Win2k]


Юрий Федоров ©   (2002-08-19 14:31:00) 

Можно ли так писать, или существуют какие-то подводные камни?
Дело в том, что деструктор формы, похоже, не вызывается при обнулении всех ссылок на интерфейс.


Юрий Федоров   (2002-08-19 15:01:00) [1]

>Skier
Спасибо


Skier   (2002-08-19 14:36:00) [2]

>Юрий Федоров

> Дело в том, что деструктор формы, похоже, не вызывается
> при обнулении всех ссылок на интерфейс.

И правильно делают.
Тебе нужно перекрыть методы для подсчёта ссылок.
(_AddRef и _Release)
Код можно взять из TInterfacedObject...


Наверх

Титульная страница Поиск, карта сайта Написать письмо