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

Printers: Remove empty Margins tab in Unix Printer Props dialog. Patch from AlexeyT.

Browse Source 
git-svn-id: trunk@58637 -
This commit is contained in:
juha 2018-07-26 08:58:41 +00:00
parent 323f78d041
commit 6700ae635e
2 changed files with 1 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/printers/unix/udlgpropertiesprinter.lfm
View File

@ -12,7 +12,7 @@ object dlgpropertiesprinter: Tdlgpropertiesprinter
OnDestroy = FormDestroy
OnShow = dlgpropertiesprinterSHOW
Position = poScreenCenter
LCLVersion = '1.5'
LCLVersion = '1.9.0.0'
object Notebook1: TPageControl
AnchorSideRight.Side = asrBottom
Left = 0
@ -311,9 +311,6 @@ object dlgpropertiesprinter: Tdlgpropertiesprinter
TabOrder = 3
end
end
object pgMargins: TTabSheet
Caption = 'Margins'
end
object pgAdvanced: TTabSheet
Caption = 'Advanced'
ClientHeight = 396

2
components/printers/unix/udlgpropertiesprinter.pp
View File

@ -58,7 +58,6 @@ type
pgAdvanced: TTabSheet;
Notebook1: TPageControl;
pgGeneral: TTabSheet;
pgMargins: TTabSheet;
rbSheet1: TRADIOBUTTON;
rbSheet2: TRADIOBUTTON;
rbSheet4: TRADIOBUTTON;
@ -358,7 +357,6 @@ begin
labBanStart.Caption := p4lrsStart;
labBanEnd.Caption := p4lrsEnd;
gbPagesSheet.Caption := ' '+p4lrsPagesPerSheet+' ';
pgMargins.Caption := p4lrsMargins;
pgAdvanced.Caption := p4lrsAdvanced;
SetupOptions;