object dlgSelectPrinter: TdlgSelectPrinter Left = 330 Height = 217 Top = 111 Width = 530 ActiveControl = btnProp Caption = 'Printing' ClientHeight = 217 ClientWidth = 530 OnCreate = dlgSelectPrinterCREATE OnShow = dlgSelectPrinterSHOW Position = poScreenCenter LCLVersion = '0.9.27' object PrinterGroupbox: TGroupBox Left = 6 Height = 137 Top = 6 Width = 518 Align = alTop BorderSpacing.Around = 6 Caption = ' Printer ' ClientHeight = 118 ClientWidth = 514 TabOrder = 0 object labState: TLabel Left = 96 Height = 18 Top = 49 Width = 55 Caption = 'labState' ParentColor = False end object labLocation: TLabel Left = 96 Height = 18 Top = 73 Width = 74 Caption = 'labLocation' ParentColor = False end object labComment: TLabel Left = 96 Height = 18 Top = 97 Width = 84 Caption = 'labComment' ParentColor = False end object ImgPrn: TImage Left = 96 Height = 17 Top = 12 Width = 17 end object PrinterNameLabel: TLabel Left = 234 Height = 18 Top = 7 Width = 40 Anchors = [] Caption = 'Name' ParentColor = False end object PrinterStateLabel: TLabel Left = 10 Height = 18 Top = 49 Width = 36 Caption = 'State' ParentColor = False OnChangeBounds = PrinterStateLabelChangeBounds end object PrinterLocationLabel: TLabel Left = 10 Height = 18 Top = 73 Width = 55 Caption = 'Location' ParentColor = False end object PrinterDescriptionLabel: TLabel Left = 10 Height = 18 Top = 97 Width = 73 Caption = 'Description' ParentColor = False end object labPrinterName: TLabel Left = 10 Height = 18 Top = 12 Width = 40 Caption = 'Name' ParentColor = False OnChangeBounds = PrinterStateLabelChangeBounds end object btnProp: TButton Left = 416 Height = 29 Top = 6 Width = 93 Anchors = [] AutoSize = True Caption = 'Properties ...' OnClick = btnPropCLICK TabOrder = 0 end object cbPrintToFile: TCheckBox Left = 414 Height = 22 Top = 41 Width = 92 Anchors = [akRight, akBottom] Caption = 'Print to file' TabOrder = 1 end object cbPrinters: TComboBox Left = 120 Height = 31 Top = 7 Width = 287 Anchors = [akTop, akLeft, akRight] AutoComplete = False ItemHeight = 0 ItemWidth = 0 OnChange = cbPrintersCHANGE OnKeyPress = cbPrintersKEYPRESS Style = csDropDownList TabOrder = 2 end end object NbOpts: TNotebook Left = 6 Height = 1 Top = 174 Width = 518 Align = alClient Anchors = [akLeft] BorderSpacing.Around = 6 PageIndex = 0 TabOrder = 1 object pgCopies: TPage Caption = 'Copies' ClientWidth = 516 ClientHeight = 1 object gbPages: TGroupBox AnchorSideBottom.Control = pgCopies AnchorSideBottom.Side = asrBottom Left = 8 Height = 1 Top = 7 Width = 262 Anchors = [akTop, akLeft, akBottom] BorderSpacing.Around = 6 Caption = ' Select pages ' ClientHeight = 1 ClientWidth = 258 TabOrder = 0 object Bevel1: TBevel AnchorSideTop.Control = edRange AnchorSideTop.Side = asrBottom Left = 18 Height = 3 Top = 105 Width = 230 BorderSpacing.Top = 6 Shape = bsTopLine Style = bsRaised end object labPage: TLabel AnchorSideTop.Control = Bevel1 AnchorSideTop.Side = asrBottom Left = 14 Height = 18 Top = 120 Width = 39 BorderSpacing.Top = 12 Caption = 'Pages' ParentColor = False end object edRange: TEdit AnchorSideLeft.Control = rbRange AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = rbRange AnchorSideTop.Side = asrCenter AnchorSideRight.Control = gbPages AnchorSideRight.Side = asrBottom Left = 93 Height = 23 Top = 76 Width = 159 Anchors = [akTop, akLeft, akRight] BorderSpacing.Left = 15 BorderSpacing.Right = 6 TabOrder = 0 end object edPageSet: TComboBox AnchorSideTop.Control = labPage AnchorSideTop.Side = asrCenter AnchorSideRight.Control = gbPages AnchorSideRight.Side = asrBottom Left = 104 Height = 31 Top = 114 Width = 148 Anchors = [akTop, akRight] AutoComplete = False AutoSelect = True BorderSpacing.Right = 6 ItemHeight = 0 ItemIndex = 0 Items.Strings = ( 'All pages' 'Odd pages' 'Even pages' ) ItemWidth = 0 Style = csDropDownList TabOrder = 1 Text = 'All pages' end object rbCurrentPage: TRadioButton AnchorSideTop.Control = rbAllPage AnchorSideTop.Side = asrBottom Left = 14 Height = 22 Top = 28 Width = 108 AllowGrayed = True BorderSpacing.Around = 2 Caption = 'Current page' DragCursor = crDefault Enabled = False TabOrder = 2 TabStop = False end object rbRange: TRadioButton AnchorSideTop.Control = rbSelection AnchorSideTop.Side = asrBottom Left = 14 Height = 22 Top = 76 Width = 64 AllowGrayed = True BorderSpacing.Around = 2 Caption = 'Range' DragCursor = crDefault TabOrder = 4 TabStop = False end object rbAllPage: TRadioButton Left = 14 Height = 22 Top = 0 Width = 43 AllowGrayed = True BorderSpacing.Around = 6 Caption = 'All ' Checked = True DragCursor = crDefault State = cbChecked TabOrder = 3 end object rbSelection: TRadioButton AnchorSideTop.Control = rbCurrentPage AnchorSideTop.Side = asrBottom Left = 14 Height = 22 Top = 52 Width = 83 AllowGrayed = True BorderSpacing.Around = 2 Caption = 'Selection' DragCursor = crDefault Enabled = False TabOrder = 5 TabStop = False end end object gbCopies: TGroupBox AnchorSideLeft.Control = gbPages AnchorSideLeft.Side = asrBottom AnchorSideRight.Control = pgCopies AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = pgCopies AnchorSideBottom.Side = asrBottom Left = 276 Height = 1 Top = 7 Width = 234 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Around = 6 Caption = ' Copies ' ClientHeight = 1 ClientWidth = 230 TabOrder = 1 object imgCollate: TImage AnchorSideTop.Control = lanNumCopies AnchorSideTop.Side = asrBottom Left = 6 Height = 37 Top = 30 Width = 93 AutoSize = True BorderSpacing.Top = 6 Proportional = True end object lanNumCopies: TLabel Left = 6 Height = 18 Top = 6 Width = 114 Caption = 'Number of copies' ParentColor = False end object edCopies: TSpinEdit AnchorSideLeft.Control = lanNumCopies AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = lanNumCopies AnchorSideTop.Side = asrCenter Left = 126 Height = 20 Top = 5 Width = 50 BorderSpacing.Left = 6 TabOrder = 0 end object cbCollate: TCheckBox AnchorSideTop.Control = edCopies AnchorSideTop.Side = asrBottom Left = 119 Height = 22 Top = 31 Width = 68 AllowGrayed = True BorderSpacing.Around = 6 Caption = 'Collate' DragCursor = crDefault OnClick = cbReverseCLICK TabOrder = 2 end object cbReverse: TCheckBox AnchorSideTop.Control = cbCollate AnchorSideTop.Side = asrBottom Left = 119 Height = 22 Top = 59 Width = 74 AllowGrayed = True BorderSpacing.Around = 6 Caption = 'Reverse' DragCursor = crDefault OnClick = cbReverseCLICK TabOrder = 1 end end end object pgAdvance: TPage Caption = 'Advanced' ClientWidth = 516 ClientHeight = 1 object labTask: TLabel Left = 7 Height = 16 Top = 10 Width = 82 Caption = 'Delayed task' ParentColor = False end object PrioLabel: TLabel AnchorSideTop.Control = labTask AnchorSideTop.Side = asrBottom Left = 7 Height = 16 Top = 52 Width = 44 BorderSpacing.Top = 20 BorderSpacing.Around = 6 Caption = 'Priority' ParentColor = False end object cbTasktime: TComboBox Left = 215 Height = 29 Top = 7 Width = 200 AutoComplete = False ItemHeight = 0 ItemIndex = 0 Items.Strings = ( 'Immediate' 'Never (suspending)' 'during the day' 'evening' 'night' 'Weekend' 'After close of business' 'After midnight' 'At time' ) ItemWidth = 0 OnChange = cbTasktimeCHANGE OnKeyPress = cbPrintersKEYPRESS Style = csDropDownList TabOrder = 1 Text = 'Immediate' end object edTimeTask: TEdit Left = 423 Height = 23 Top = 9 Width = 83 DragCursor = crDefault MaxLength = 8 TabOrder = 0 Text = '23:00:00' end object edPriority: TSpinEdit AnchorSideTop.Control = PrioLabel AnchorSideTop.Side = asrCenter Left = 127 Height = 20 Top = 50 Width = 50 TabOrder = 3 end object tkbPriority: TTrackBar AnchorSideLeft.Control = edPriority AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = PrioLabel AnchorSideTop.Side = asrCenter AnchorSideRight.Control = pgAdvance AnchorSideRight.Side = asrBottom Left = 183 Height = 38 Top = 41 Width = 320 Frequency = 10 Max = 100 OnChange = tkbPriorityCHANGE Position = 10 TabStop = False TickMarks = tmBoth BorderSpacing.Around = 6 DragCursor = crDefault TabOrder = 2 end end end object BtnPanel: TPanel Left = 6 Height = 41 Top = 170 Width = 518 Align = alBottom Anchors = [akLeft, akBottom] AutoSize = True BorderSpacing.Around = 6 BevelOuter = bvNone ClientHeight = 41 ClientWidth = 518 FullRepaint = False TabOrder = 2 TabStop = True object btnCancel: TButton Left = 457 Height = 29 Top = 6 Width = 55 Align = alRight AutoSize = True BorderSpacing.Around = 6 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 0 end object btnPrint: TButton Left = 410 Height = 29 Top = 6 Width = 41 Align = alRight AutoSize = True BorderSpacing.Around = 6 Caption = 'Print' Default = True ModalResult = 1 OnClick = btnPrintCLICK TabOrder = 1 end object btnReduc: TButton Left = 6 Height = 29 Top = 6 Width = 60 Align = alLeft AutoSize = True BorderSpacing.Around = 6 Caption = 'More ...' OnClick = btnReducCLICK TabOrder = 2 end object btnPreview: TButton Left = 344 Height = 29 Top = 6 Width = 60 Align = alRight AutoSize = True BorderSpacing.Around = 6 Caption = 'Preview' ModalResult = 6 TabOrder = 3 end end object panLabels: TPanel Left = 6 Height = 22 Top = 149 Width = 518 Align = alTop BorderSpacing.Around = 6 BevelOuter = bvNone ClientHeight = 22 ClientWidth = 518 TabOrder = 3 object labCUPS: TLabel AnchorSideTop.Side = asrBottom Left = 8 Height = 16 Top = 3 Width = 233 Caption = 'CUPS (Common Unix Printing System)' ParentColor = False end object labCUPSServer: TLabel AnchorSideLeft.Side = asrBottom Left = 248 Height = 16 Top = 3 Width = 93 Caption = 'labCUPSServer' ParentColor = False end end end