printf.dfm

极具实用价值的文件管理系统

inherited fmPrint: TfmPrint
  Left = 191
  Top = 117
  Caption = 'Print'
  ClientHeight = 560
  ClientWidth = 710
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnlTitle: TCycPanel
    Width = 710
  end
  inherited lblTitle: TCycLabel
    Width = 116
    Caption = 'Preview and print image '
  end
  inherited pnlFooter: TPanel
    Top = 513
    Width = 710
    inherited pnlFooterLine: TCycPanel
      Width = 710
    end
    inherited btnOK: TCycSpeedButton
      Left = 503
      Caption = '&Print'
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000120B0000120B00001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
        DADAAD00000000000DADD0888888888080DA000000000000080D0888888BBB88
        000A088888877788080D00000000000008800888888888808080D00000000008
        0800AD0FFFFFFFF08080DAD0F00000F0000AADA0FFFFFFFF0DADDADA0F00000F
        0ADAADAD0FFFFFFFF0ADDADAD000000000DAADADADADADADADAD}
      NumGlyphs = 1
    end
    inherited btnCancel: TCycSpeedButton
      Left = 607
    end
    object btnPageSetting: TCycSpeedButton
      Left = 376
      Top = 12
      Width = 113
      Height = 24
      Caption = 'Page &Setting'
      Flat = True
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        04000000000080000000120B0000120B00001000000010000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
        DADAADADADADADADADADD00ADADADA00DADAA010ADADA080ADADDA010ADA080A
        DADAADA010A080ADADADDADA01080ADADADAADADA080ADADADADDADA08010ADA
        D0DA000080A010AD030D00000ADA010003300DA00DADA003300DDAD00ADAD033
        30DAAD000DAD003330ADDADADA0033000ADAADADADA0000DADAD}
      OnClick = btnPageSettingClick
    end
  end
  object gbxSetting: TGroupBox
    Left = 0
    Top = 43
    Width = 274
    Height = 470
    Align = alLeft
    Caption = 'Setting'
    TabOrder = 1
    object lblPagePosition: TCycLabel
      Left = 8
      Top = 26
      Width = 67
      Height = 13
      Caption = 'Page position:'
      Transparent = True
    end
    object lblUnit: TCycLabel
      Left = 8
      Top = 58
      Width = 100
      Height = 13
      Caption = 'Unit of measurement:'
      Transparent = True
    end
    object cbxPagePosition: TComboBox
      Left = 87
      Top = 23
      Width = 176
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 0
      Text = 'Top-left'
      Items.Strings = (
        'Top-left'
        'Top-center'
        'Top-right'
        'Middle-left'
        'Center'
        'Middle-right'
        'Bottom-left'
        'Bottom-center'
        'Bottom-right')
    end
    object gbxMargins: TGroupBox
      Left = 10
      Top = 81
      Width = 254
      Height = 135
      Caption = 'Margins'
      TabOrder = 1
      object lblTop: TCycLabel
        Left = 16
        Top = 23
        Width = 22
        Height = 13
        Caption = 'Top:'
        Transparent = True
      end
      object lblBottom: TCycLabel
        Left = 16
        Top = 50
        Width = 36
        Height = 13
        Caption = 'Bottom:'
        Transparent = True
      end
      object lblLeft: TCycLabel
        Left = 16
        Top = 77
        Width = 21
        Height = 13
        Caption = 'Left:'
        Transparent = True
      end
      object lblRight: TCycLabel
        Left = 16
        Top = 104
        Width = 28
        Height = 13
        Caption = 'Right:'
        Transparent = True
      end
      object edtTop: TMaskEdit
        Left = 68
        Top = 22
        Width = 73
        Height = 21
        TabOrder = 0
        Text = '0'
      end
      object btnTop: TUpDown
        Left = 141
        Top = 22
        Width = 16
        Height = 21
        Associate = edtTop
        TabOrder = 1
      end
      object edtBottom: TMaskEdit
        Left = 68
        Top = 49
        Width = 73
        Height = 21
        TabOrder = 2
        Text = '0'
      end
      object btnBottom: TUpDown
        Left = 141
        Top = 49
        Width = 15
        Height = 21
        Associate = edtBottom
        TabOrder = 3
      end
      object edtLeft: TMaskEdit
        Left = 68
        Top = 76
        Width = 73
        Height = 21
        TabOrder = 4
        Text = '0'
      end
      object btnLeft: TUpDown
        Left = 141
        Top = 76
        Width = 15
        Height = 21
        Associate = edtLeft
        TabOrder = 5
      end
      object edtRight: TMaskEdit
        Left = 68
        Top = 103
        Width = 73
        Height = 21
        TabOrder = 6
        Text = '0'
      end
      object btnRight: TUpDown
        Left = 141
        Top = 103
        Width = 15
        Height = 21
        Associate = edtRight
        TabOrder = 7
      end
    end
    object gbxAdvanceOptions: TGroupBox
      Left = 10
      Top = 224
      Width = 254
      Height = 235
      Caption = 'Advance Options'
      TabOrder = 2
      object lblNumberOfCopy: TCycLabel
        Left = 16
        Top = 22
        Width = 129
        Height = 13
        Caption = 'Number of prints per image:'
        Transparent = True
      end
      object lblHeight: TCycLabel
        Left = 16
        Top = 80
        Width = 34
        Height = 13
        Caption = 'Height:'
        Transparent = True
      end
      object lblWidth: TCycLabel
        Left = 16
        Top = 105
        Width = 31
        Height = 13
        Caption = 'Width:'
        Transparent = True
      end
      object edtNumberOfCopy: TMaskEdit
        Left = 151
        Top = 20
        Width = 73
        Height = 21
        TabOrder = 0
        Text = '0'
      end
      object btnNumberOfCopy: TUpDown
        Left = 224
        Top = 20
        Width = 15
        Height = 21
        Associate = edtNumberOfCopy
        TabOrder = 1
      end
      object rdoFitPage: TRadioGroup
        Left = 16
        Top = 137
        Width = 225
        Height = 88
        ItemIndex = 0
        Items.Strings = (
          'Crop image to print page'
          'Shrink image to print page')
        TabOrder = 2
      end
      object chkFittopage: TCheckBox
        Left = 24
        Top = 136
        Width = 73
        Height = 17
        Caption = 'Fit to page'
        TabOrder = 3
      end
      object edtHeight: TMaskEdit
        Left = 68
        Top = 76
        Width = 73
        Height = 21
        TabOrder = 4
        Text = '0'
      end
      object btnHeight: TUpDown
        Left = 141
        Top = 76
        Width = 15
        Height = 21
        Associate = edtHeight
        TabOrder = 5
      end
      object edtWidth: TMaskEdit
        Left = 68
        Top = 104
        Width = 73
        Height = 21
        TabOrder = 6
        Text = '0'
      end
      object btnWidth: TUpDown
        Left = 141
        Top = 104
        Width = 15
        Height = 21
        Associate = edtWidth
        TabOrder = 7
      end
      object chkMaintainAspectRatio: TCheckBox
        Left = 16
        Top = 50
        Width = 153
        Height = 17
        Caption = 'Maintain aspect ratio'
        TabOrder = 8
      end
    end
    object edtUnit: TComboBox
      Left = 120
      Top = 55
      Width = 143
      Height = 21
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 3
      Text = 'inches'
      Items.Strings = (
        'inches'
        'millimeters')
    end
  end
  object gbxPreview: TGroupBox
    Left = 274
    Top = 43
    Width = 436
    Height = 470
    Align = alClient
    Caption = 'Preview'
    TabOrder = 2
    object pnlPage: TShape
      Left = 63
      Top = 51
      Width = 313
      Height = 366
    end
    object shpMargin: TShape
      Left = 109
      Top = 89
      Width = 217
      Height = 289
      Pen.Style = psDot
    end
    object imgPreview: TImage32
      Left = 126
      Top = 113
      Width = 184
      Height = 241
      BitmapAlign = baTopLeft
      Scale = 1.000000000000000000
      ScaleMode = smStretch
      TabOrder = 0
    end
  end
  object PrinterSetupDialog: TPrinterSetupDialog
    Left = 8
    Top = 476
  end
end