paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 08:59:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

ide: fix mem leak

Browse Source 
git-svn-id: trunk@14889 -
This commit is contained in:
paul 2008-04-19 13:28:26 +00:00
parent 8668735887
commit 45b2451fb2
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
ide/componentpalette.pas
View File

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