From 972fbf460b14b61126e1910ffff9c014c026a84a Mon Sep 17 00:00:00 2001 From: Graeme Geldenhuys Date: Thu, 12 Aug 2010 00:04:04 +0200 Subject: imagelist: in the destructor, rather call .Free and not .Destroy --- src/corelib/fpg_imagelist.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/corelib/fpg_imagelist.pas b/src/corelib/fpg_imagelist.pas index c2c1b3eb..20d34e35 100644 --- a/src/corelib/fpg_imagelist.pas +++ b/src/corelib/fpg_imagelist.pas @@ -282,7 +282,7 @@ end; destructor TfpgImageItem.Destroy; begin if FImage <> nil then - FImage.Destroy; + FImage.Free; inherited Destroy; end; -- cgit v1.2.3-70-g09d2