mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-06 09:42:46 +02:00
win32: fix mem leak (#0011496) by Martin Friebe
git-svn-id: trunk@15467 -
This commit is contained in:
parent
90da3bcca6
commit
09465eca12
@ -335,7 +335,11 @@ initialization
|
||||
else MMenuItemInfoSize := sizeof(MENUITEMINFO);
|
||||
|
||||
finalization
|
||||
|
||||
if CurDoubleBuffer.Bitmap <> 0 then
|
||||
begin
|
||||
Windows.DeleteObject(CurDoubleBuffer.Bitmap);
|
||||
CurDoubleBuffer.Bitmap := 0;
|
||||
end;
|
||||
Assert(False, 'Trace:win32int.pp - Finalization');
|
||||
|
||||
end.
|
||||
|
Loading…
Reference in New Issue
Block a user