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

LCL/DBGrid: Fix memory leak, patch by michalgw, issue #39904.

Browse Source
This commit is contained in:
wp_xyz 2022-09-15 23:42:57 +02:00
parent 6dc31007d1
commit e21bc4cd01
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/dbgrids.pas
View File

@ -4630,7 +4630,12 @@ begin
FList.Insert(Index, Bookmark);
FGrid.Invalidate;
end else
begin
FDataset.FreeBookmark(Bookmark);
{$ifndef noautomatedbookmark}
SetLength(TBookmark(Bookmark),0); // decrease reference count
{$endif}
end;
end;
end;