paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-08 05:36:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

Bug fix for memory leak for USE_GENERICS_COLLECTIONS version.

Browse Source 
git-svn-id: trunk@51179 -
This commit is contained in:
hnb 2016-01-03 23:40:03 +00:00
parent 11c388e6d2
commit 0015151c63
2 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/sparta/dockedformeditor/source/sparta_fakecustom.pas
View File

@ -27,11 +27,7 @@ uses
type
{ TDesignedFormImpl }
{$IFDEF USE_GENERICS_COLLECTIONS}
TDesignedFormImpl = class(TSingletonImplementation, IDesignedRealFormHelper, IDesignedForm)
{$ELSE}
TDesignedFormImpl = class(TComponent, IDesignedRealFormHelper, IDesignedForm)
{$ENDIF}
private
FOwner: TForm;
FDesignedRealForm: IDesignedRealForm;

4
components/sparta/dockedformeditor/source/sparta_mainide.pas
View File

@ -34,11 +34,7 @@ const
type
{ TDesignFormData }
{$IFDEF USE_GENERICS_COLLECTIONS}
TDesignFormData = class(TSingletonImplementation, IDesignedForm)
{$ELSE}
TDesignFormData = class(TComponent, IDesignedForm)
{$ENDIF}
private
FWndMethod: TWndMethod;