Why Gemfury? Push, build, and install  RubyGems npm packages Python packages Maven artifacts PHP packages Go Modules Debian packages RPM packages NuGet packages

Repository URL to install this package:

Details    
lazarus / usr / share / lazarus / 1.6 / components / printers / unix / udlgselectprinter.lfm
Size: Mime:
object dlgSelectPrinter: TdlgSelectPrinter
  Left = 330
  Height = 441
  Top = 111
  Width = 563
  ActiveControl = btnProp
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Printing'
  ClientHeight = 441
  ClientWidth = 563
  OnCreate = dlgSelectPrinterCREATE
  OnShow = dlgSelectPrinterSHOW
  Position = poScreenCenter
  LCLVersion = '1.5'
  object PrinterGroupbox: TGroupBox
    Left = 6
    Height = 137
    Top = 6
    Width = 551
    Align = alTop
    BorderSpacing.Around = 6
    Caption = ' Printer '
    ClientHeight = 118
    ClientWidth = 547
    TabOrder = 0
    object labState: TLabel
      Left = 96
      Height = 17
      Top = 49
      Width = 57
      Caption = 'labState'
      ParentColor = False
    end
    object labLocation: TLabel
      Left = 96
      Height = 17
      Top = 73
      Width = 80
      Caption = 'labLocation'
      ParentColor = False
    end
    object labComment: TLabel
      Left = 96
      Height = 17
      Top = 97
      Width = 87
      Caption = 'labComment'
      ParentColor = False
    end
    object ImgPrn: TImage
      Left = 96
      Height = 17
      Top = 12
      Width = 17
    end
    object PrinterNameLabel: TLabel
      Left = 250
      Height = 17
      Top = 8
      Width = 40
      Anchors = []
      Caption = 'Name'
      ParentColor = False
    end
    object PrinterStateLabel: TLabel
      Left = 10
      Height = 17
      Top = 49
      Width = 36
      Caption = 'State'
      ParentColor = False
      OnChangeBounds = PrinterStateLabelChangeBounds
    end
    object PrinterLocationLabel: TLabel
      Left = 10
      Height = 17
      Top = 73
      Width = 59
      Caption = 'Location'
      ParentColor = False
    end
    object PrinterDescriptionLabel: TLabel
      Left = 10
      Height = 17
      Top = 97
      Width = 78
      Caption = 'Description'
      ParentColor = False
    end
    object labPrinterName: TLabel
      Left = 10
      Height = 17
      Top = 12
      Width = 40
      Caption = 'Name'
      ParentColor = False
      OnChangeBounds = PrinterStateLabelChangeBounds
    end
    object btnProp: TButton
      AnchorSideLeft.Control = cbPrinters
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = cbPrinters
      AnchorSideRight.Side = asrBottom
      Left = 442
      Height = 29
      Top = 7
      Width = 99
      Anchors = [akTop, akRight]
      AutoSize = True
      Caption = 'Properties ...'
      OnClick = btnPropCLICK
      TabOrder = 0
    end
    object cbPrintToFile: TCheckBox
      AnchorSideRight.Side = asrBottom
      Left = 438
      Height = 24
      Top = 39
      Width = 101
      Anchors = [akRight, akBottom]
      Caption = 'Print to file'
      TabOrder = 1
    end
    object cbPrinters: TComboBox
      AnchorSideRight.Control = btnProp
      Left = 120
      Height = 31
      Top = 7
      Width = 316
      Anchors = [akTop, akLeft, akRight]
      BorderSpacing.Right = 6
      ItemHeight = 0
      OnChange = cbPrintersCHANGE
      OnKeyPress = cbPrintersKEYPRESS
      Style = csDropDownList
      TabOrder = 2
    end
  end
  object NbOpts: TPageControl
    Left = 6
    Height = 217
    Top = 177
    Width = 551
    ActivePage = pgCopies
    Align = alClient
    Anchors = [akLeft]
    BorderSpacing.Around = 6
    TabIndex = 0
    TabOrder = 1
    object pgCopies: TTabSheet
      Caption = 'Copies'
      ClientHeight = 186
      ClientWidth = 547
      object gbPages: TGroupBox
        AnchorSideBottom.Control = pgCopies
        AnchorSideBottom.Side = asrBottom
        Left = 8
        Height = 173
        Top = 7
        Width = 262
        Anchors = [akTop, akLeft, akBottom]
        BorderSpacing.Around = 6
        Caption = ' Select pages '
        ClientHeight = 154
        ClientWidth = 258
        TabOrder = 0
        object Bevel1: TBevel
          AnchorSideTop.Control = edRange
          AnchorSideTop.Side = asrBottom
          Left = 8
          Height = 2
          Top = 110
          Width = 240
          BorderSpacing.Top = 6
          Shape = bsTopLine
          Style = bsRaised
        end
        object labPage: TLabel
          AnchorSideTop.Control = Bevel1
          AnchorSideTop.Side = asrBottom
          Left = 8
          Height = 17
          Top = 124
          Width = 40
          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 = 90
          Height = 27
          Top = 77
          Width = 162
          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 = 27
          Top = 119
          Width = 148
          Anchors = [akTop, akRight]
          BorderSpacing.Right = 6
          ItemHeight = 0
          ItemIndex = 0
          Items.Strings = (
            'All pages'
            'Odd pages'
            'Even pages'
          )
          Style = csDropDownList
          TabOrder = 1
          Text = 'All pages'
        end
        object rbCurrentPage: TRadioButton
          AnchorSideTop.Control = rbAllPage
          AnchorSideTop.Side = asrBottom
          Left = 8
          Height = 24
          Top = 26
          Width = 113
          BorderSpacing.Around = 2
          Caption = 'Current page'
          DragCursor = crDefault
          Enabled = False
          TabOrder = 2
        end
        object rbRange: TRadioButton
          AnchorSideTop.Control = rbSelection
          AnchorSideTop.Side = asrBottom
          Left = 8
          Height = 24
          Top = 78
          Width = 67
          BorderSpacing.Around = 2
          Caption = 'Range'
          DragCursor = crDefault
          TabOrder = 4
        end
        object rbAllPage: TRadioButton
          Left = 8
          Height = 24
          Top = 0
          Width = 47
          Caption = 'All '
          Checked = True
          DragCursor = crDefault
          TabOrder = 3
          TabStop = True
        end
        object rbSelection: TRadioButton
          AnchorSideTop.Control = rbCurrentPage
          AnchorSideTop.Side = asrBottom
          Left = 8
          Height = 24
          Top = 52
          Width = 88
          BorderSpacing.Around = 2
          Caption = 'Selection'
          DragCursor = crDefault
          Enabled = False
          TabOrder = 5
        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 = 173
        Top = 7
        Width = 265
        Anchors = [akTop, akLeft, akRight, akBottom]
        BorderSpacing.Around = 6
        Caption = ' Copies '
        ClientHeight = 154
        ClientWidth = 261
        TabOrder = 1
        object imgCollate: TImage
          AnchorSideTop.Control = lanNumCopies
          AnchorSideTop.Side = asrBottom
          Left = 6
          Height = 37
          Top = 29
          Width = 93
          AutoSize = True
          BorderSpacing.Top = 6
          Proportional = True
        end
        object lanNumCopies: TLabel
          Left = 6
          Height = 17
          Top = 6
          Width = 120
          Caption = 'Number of copies'
          ParentColor = False
        end
        object edCopies: TSpinEdit
          AnchorSideLeft.Control = lanNumCopies
          AnchorSideLeft.Side = asrBottom
          AnchorSideTop.Control = lanNumCopies
          AnchorSideTop.Side = asrCenter
          Left = 132
          Height = 27
          Top = 1
          Width = 60
          BorderSpacing.Left = 6
          TabOrder = 0
        end
        object cbCollate: TCheckBox
          AnchorSideTop.Control = edCopies
          AnchorSideTop.Side = asrBottom
          Left = 119
          Height = 24
          Top = 34
          Width = 74
          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 = 24
          Top = 64
          Width = 79
          AllowGrayed = True
          BorderSpacing.Around = 6
          Caption = 'Reverse'
          DragCursor = crDefault
          OnClick = cbReverseCLICK
          TabOrder = 1
        end
      end
    end
    object pgAdvance: TTabSheet
      Caption = 'Advanced'
      ClientHeight = 186
      ClientWidth = 547
      object labTask: TLabel
        Left = 7
        Height = 14
        Top = 10
        Width = 63
        Caption = 'Delayed task'
        ParentColor = False
      end
      object PrioLabel: TLabel
        AnchorSideTop.Control = labTask
        AnchorSideTop.Side = asrBottom
        Left = 7
        Height = 14
        Top = 50
        Width = 35
        BorderSpacing.Top = 20
        BorderSpacing.Around = 6
        Caption = 'Priority'
        ParentColor = False
      end
      object cbTasktime: TComboBox
        Left = 215
        Height = 21
        Top = 7
        Width = 200
        ItemHeight = 0
        ItemIndex = 0
        Items.Strings = (
          'Immediate'
          'Never (suspending)'
          'during the day'
          'evening'
          'night'
          'Weekend'
          'After close of business'
          'After midnight'
          'At time'
        )
        OnChange = cbTasktimeCHANGE
        OnKeyPress = cbPrintersKEYPRESS
        Style = csDropDownList
        TabOrder = 1
        Text = 'Immediate'
      end
      object edTimeTask: TEdit
        Left = 423
        Height = 21
        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 = 21
        Top = 47
        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 = 38
        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 = 0
    Height = 41
    Top = 400
    Width = 563
    Align = alBottom
    Anchors = [akLeft, akBottom]
    AutoSize = True
    BevelOuter = bvNone
    ClientHeight = 41
    ClientWidth = 563
    FullRepaint = False
    TabOrder = 2
    TabStop = True
    object btnCancel: TButton
      Left = 477
      Height = 29
      Top = 6
      Width = 80
      Align = alRight
      AutoSize = True
      BorderSpacing.Around = 6
      Cancel = True
      Caption = 'Cancel'
      Constraints.MinWidth = 80
      ModalResult = 2
      TabOrder = 0
    end
    object btnPrint: TButton
      Left = 391
      Height = 29
      Top = 6
      Width = 80
      Align = alRight
      AutoSize = True
      BorderSpacing.Around = 6
      Caption = 'Print'
      Constraints.MinWidth = 80
      Default = True
      ModalResult = 1
      OnClick = btnPrintCLICK
      TabOrder = 1
    end
    object btnReduc: TButton
      Left = 6
      Height = 29
      Top = 6
      Width = 80
      Align = alLeft
      AutoSize = True
      BorderSpacing.Around = 6
      Caption = 'More ...'
      Constraints.MinWidth = 80
      OnClick = btnReducCLICK
      TabOrder = 2
    end
    object btnPreview: TButton
      Left = 305
      Height = 29
      Top = 6
      Width = 80
      Align = alRight
      AutoSize = True
      BorderSpacing.Around = 6
      Caption = 'Preview'
      Constraints.MinWidth = 80
      ModalResult = 6
      TabOrder = 3
    end
  end
  object panLabels: TPanel
    Left = 6
    Height = 22
    Top = 149
    Width = 551
    Align = alTop
    BorderSpacing.Around = 6
    BevelOuter = bvNone
    ClientHeight = 22
    ClientWidth = 551
    TabOrder = 3
    object labCUPS: TLabel
      AnchorSideTop.Side = asrBottom
      Left = 8
      Height = 17
      Top = 3
      Width = 251
      Caption = 'CUPS (Common Unix Printing System)'
      ParentColor = False
    end
    object labCUPSServer: TLabel
      AnchorSideLeft.Control = labCUPS
      AnchorSideLeft.Side = asrBottom
      Left = 265
      Height = 17
      Top = 3
      Width = 100
      BorderSpacing.Around = 6
      Caption = 'labCUPSServer'
      ParentColor = False
    end
  end
end