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

Reply via email to