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

packageeditor:

Browse Source 
- cleanup
 - on resize dec 1 from last button width to remove scroll at the bottom of dialog

git-svn-id: trunk@16680 -
This commit is contained in:
paul 2008-09-23 09:28:15 +00:00
parent 0eb6d41114
commit 42b1ced14c
1 changed files with 2 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
packager/packageeditor.pas
View File

@ -399,8 +399,8 @@ begin
inc(x,w);
// fifth column of buttons
HelpBitBtn.SetBounds(x,y1,ClientWidth-x,h);
MoreBitBtn.SetBounds(x,y2,ClientWidth-x,h);
HelpBitBtn.SetBounds(x,y1,ClientWidth-x - 1,h);
MoreBitBtn.SetBounds(x,y2,ClientWidth-x - 1,h);
FilePropsGroupBox.Height:=120;
end;
@ -1300,12 +1300,6 @@ begin
end;
procedure TPackageEditorForm.SetupComponents;
procedure LoadBitBtnGlyph(ABitBtn: TBitBtn; const ResName: string);
begin
ABitBtn.Glyph.LoadFromLazarusResource(ResName);
end;
begin
ImageIndexFiles := IDEImages.LoadImage(16, 'pkg_files');
ImageIndexRemovedFiles := IDEImages.LoadImage(16, 'pkg_removedfiles');