paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-04 18:00:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: Free part of CustomGrid's variables after inherited Destroy; Allows freeing a focused grid (works for other controls already). Issue #23478, Patch from mmxngg

Browse Source 
git-svn-id: trunk@39544 -
This commit is contained in:
juha 2012-12-15 00:12:06 +00:00
parent c76c2bdb6f
commit 424b7d0c93
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/grids.pas
View File

@ -8588,13 +8588,13 @@ begin
FreeThenNil(FPickListEditor);
FreeThenNil(FStringEditor);
FreeThenNil(FButtonEditor);
FreeThenNil(FTitleFont);
inherited Destroy;
FreeThenNil(FColumns);
FreeThenNil(FGCache.AccumWidth);
FreeThenNil(FGCache.AccumHeight);
FreeThenNil(FCols);
FreeThenNil(FRows);
FreeThenNil(FTitleFont);
inherited Destroy;
end;
procedure TCustomGrid.LoadSub(ACfg: TXMLConfig);