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

cleanup

Browse Source 
git-svn-id: trunk@12777 -
This commit is contained in:
paul 2007-11-08 02:35:38 +00:00
parent eb11482eee
commit e6be90a770
2 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/include/toolbar.inc
View File

@ -398,7 +398,6 @@ procedure TToolBar.CalculatePreferredSize(var PreferredWidth,
PreferredHeight: integer; WithThemeSpace: Boolean);
var
ARect, Adjusted: TRect;
CurAnchors: TAnchors;
begin
ARect := ClientRect;
Adjusted := ARect;

2
lcl/widgetset/wsimglist.pp
View File

@ -72,8 +72,6 @@ type
TDefaultImageListImplementor = class(TObjectList)
private
FWidth: Integer;
FHeight: Integer;
FList: TCustomImageList;
public
constructor Create(AList: TCustomImageList); reintroduce;