* Workaround to fpc bug leading to an interface memory leak

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@171 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
blikblum
2007-05-26 18:25:42 +00:00
parent 197173a5e8
commit 5e810ef02b

View File

@ -11746,7 +11746,9 @@ begin
//lcl
FPanningWindow.Free;
CancelEditNode;
//todo: remove this as soon as fpc fixes this bug
if FDragManager <> nil then
FDragManager._Release;
// Just in case it didn't happen already release the edit link.
FEditLink := nil;
FClipboardFormats.Free;