this tab is a mistake, it is not filled in this dialog. Tiny patch
removes it. AFAIK- Unix CUPS don't support margins at all.
--
Regards,
Alexey
Index: components/printers/unix/udlgpropertiesprinter.lfm
===================================================================
--- components/printers/unix/udlgpropertiesprinter.lfm (revision 58633)
+++ components/printers/unix/udlgpropertiesprinter.lfm (working copy)
@@ -12,7 +12,7 @@
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 @@
TabOrder = 3
end
end
- object pgMargins: TTabSheet
- Caption = 'Margins'
- end
object pgAdvanced: TTabSheet
Caption = 'Advanced'
ClientHeight = 396
Index: components/printers/unix/udlgpropertiesprinter.pp
===================================================================
--- components/printers/unix/udlgpropertiesprinter.pp (revision 58633)
+++ components/printers/unix/udlgpropertiesprinter.pp (working copy)
@@ -58,7 +58,6 @@
pgAdvanced: TTabSheet;
Notebook1: TPageControl;
pgGeneral: TTabSheet;
- pgMargins: TTabSheet;
rbSheet1: TRADIOBUTTON;
rbSheet2: TRADIOBUTTON;
rbSheet4: TRADIOBUTTON;
@@ -358,7 +357,6 @@
labBanStart.Caption := p4lrsStart;
labBanEnd.Caption := p4lrsEnd;
gbPagesSheet.Caption := ' '+p4lrsPagesPerSheet+' ';
- pgMargins.Caption := p4lrsMargins;
pgAdvanced.Caption := p4lrsAdvanced;
SetupOptions;
--
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus