diff --git a/src/ce_observer.pas b/src/ce_observer.pas index 36e20754..7b5e1623 100644 --- a/src/ce_observer.pas +++ b/src/ce_observer.pas @@ -111,6 +111,7 @@ destructor TCEEntitiesConnector.destroy; begin fObservers.Free; fSubjects.Free; + fServices.Free; inherited; end;