ide, packager: use AutoSize for toolbar dividers

git-svn-id: trunk@20517 -
This commit is contained in:
paul 2009-06-08 12:34:53 +00:00
parent c729661d99
commit 9037c5325a
2 changed files with 2 additions and 2 deletions

View File

@ -1641,7 +1641,7 @@ procedure TMainIDE.SetupSpeedButtons;
with Result do
begin
Style := tbsDivider;
Width := 3;
AutoSize := True;
Parent := AToolBar;
end;
end;

View File

@ -1273,7 +1273,7 @@ procedure TPackageEditorForm.SetupComponents;
begin
Result := TToolButton.Create(Self);
Result.Style := tbsDivider;
Result.Width := 3;
Result.AutoSize := True;
Result.Parent := ToolBar;
end;