IDE: fixed mem leak in sort selection dialog

git-svn-id: trunk@13501 -
This commit is contained in:
mattias 2007-12-28 10:58:11 +00:00
parent 9306d7d9e9
commit ed73de5c00

View File

@ -176,7 +176,7 @@ const
SpaceChars = [' ',#9];
var
Settings: TTextBlockCompareSettings;
Tree: TAVLTree;
Tree: TAVLTree;// tree of TTextBlock
StartPos: Integer;
EndPos: Integer;
ANode: TAVLTreeNode;
@ -317,6 +317,7 @@ begin
// clean up
Tree.FreeAndClear;
Tree.Free;
Settings.Free;
end;