From f399fc6979fcd88296a3fe107743a80d78083ac2 Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Thu, 12 Mar 2015 21:40:02 +0100 Subject: [PATCH] fix, hidden AV on quit --- src/ce_mru.pas | 14 ++++++++++++++ 1 file changed, 14 insertions(+) diff --git a/src/ce_mru.pas b/src/ce_mru.pas index 7ee538fb..eb738ca7 100644 --- a/src/ce_mru.pas +++ b/src/ce_mru.pas @@ -54,6 +54,7 @@ type procedure docClosing(aDoc: TCESynMemo); public constructor create; override; + destructor destroy; override; end; (** @@ -69,6 +70,7 @@ type procedure projCompiling(aProject: TCEProject); public constructor create; override; + destructor destroy; override; end; implementation @@ -154,6 +156,12 @@ begin EntitiesConnector.addObserver(self); end; +destructor TCEMRUDocumentList.destroy; +begin + EntitiesConnector.removeObserver(self); + inherited; +end; + procedure TCEMRUDocumentList.docNew(aDoc: TCESynMemo); begin end; @@ -178,6 +186,12 @@ begin EntitiesConnector.addObserver(self); end; +destructor TCEMRUProjectList.destroy; +begin + EntitiesConnector.removeObserver(self); + inherited; +end; + procedure TCEMRUProjectList.projNew(aProject: TCEProject); begin end;