Решение проблемы с освобождением объекта-наблюдателя в Delphi: паттерн Наблюдатель и интерфейсы

Delphi , Программа и Интерфейс , Интерфейс

Паттерн Наблюдатель (Observer) является одним из основных паттернов проектирования, который позволяет объектам (наблюдателям) получать уведомления от других объектов (субъектов) об изменении состояния. В Delphi для реализации этого паттерна часто используются интерфейсы, что позволяет объектам быть одновременно наблюдателями и субъектами.

Проблема

Разработчик столкнулся с проблемой освобождения объекта-наблюдателя после его добавления в список наблюдателей субъекта. При попытке освобождения объекта-наблюдателя возникала ошибка недопустимой операции с указателем, даже несмотря на использование модификатора const в параметрах и корректное назначение свойств объекта в режиме отладки.

Контекст

В коде субъекта (TSomeClass) реализован метод Attach, который добавляет наблюдателя в список наблюдателей. При вызове метода FreeAndNil наблюдателя (locObserver) после его добавления в список наблюдателей субъекта (Fobservers) происходит ошибка.

Подтвержденный ответ

Проблема заключается в том, что объект-наблюдатель, скорее всего, наследует TInterfacedObject. При добавлении объекта в список наблюдателей субъекта, интерфейсное представление объекта получает счетчик ссылок, который увеличивается до 1. При уничтожении субъекта и, соответственно, списка наблюдателей, счетчик ссылок уменьшается до 0, что приводит к уничтожению объекта-наблюдателя. Попытка освободить объект в этот момент приводит к ошибке, так как объект уже уничтожен.

Альтернативный ответ

Не следует смешивать ссылки на объекты и интерфейсы, или использовать классы, которые не реализуют автоматический подсчет ссылок.

Пример кода

var
  obj: TInterfacedObject;
  list: TInterfaceList;
begin
  obj := TInterfacedObject.Create;
  try
    list := TInterfaceList.Create;
    list.Add(obj);
    list.Free;
  finally
    FreeAndNil(obj); // Ошибка, так как объект уже уничтожен
  end;
end;

Рекомендации

Для реализации паттерна Наблюдатель в Delphi, где объект может быть и наблюдателем, и субъектом, следует использовать класс TObserverSubject, который реализует оба поведения. Метод обновления наблюдателя в таком классе должен быть виртуальным и переопределяться в подклассах. В случае использования TInterfacedObject необходимо тщательно следить за подсчетом ссылок и порядком освобождения ресурсов.

Выводы

При работе с интерфейсами и автоматическом подсчете ссылок в Delphi важно понимать механизм управления жизненным циклом объектов, чтобы избежать ошибок при освобождении ресурсов.

Создано по материалам из источника по ссылке.

Разработчик в Delphi сталкивается с трудностями при освобождении объекта-наблюдателя после его добавления в список субъекта из-за неправильного управления интерфейсными ссылками и подсчетом ссылок.

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Интерфейс ::