ide: fix mem leak

git-svn-id: trunk@14889 -
This commit is contained in:
paul 2008-04-19 13:28:26 +00:00
parent 8668735887
commit 45b2451fb2

View File

@ -552,8 +552,7 @@ begin
+'_'+CurComponent.ComponentClass.ClassName; +'_'+CurComponent.ComponentClass.ClassName;
// Left and Top will be set in ReAlignButtons. // Left and Top will be set in ReAlignButtons.
SetBounds(Left,Top,ComponentPaletteBtnWidth,ComponentPaletteBtnHeight); SetBounds(Left,Top,ComponentPaletteBtnWidth,ComponentPaletteBtnHeight);
Glyph := TBitmap.Create; Glyph := CurComponent.Icon;
Glyph.Assign(CurComponent.Icon);
GroupIndex := 1; GroupIndex := 1;
Flat := true; Flat := true;
OnClick := @ComponentBtnClick; OnClick := @ComponentBtnClick;