pagesetup.dfm

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· DFM 代码 · 共 342 行

object frmPageSetup: TfrmPageSetup
  Left = 121
  Top = 95
  BorderStyle = bsToolWindow
  Caption = '页面设置'
  ClientHeight = 290
  ClientWidth = 433
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object bbOk: TBitBtn
    Left = 351
    Top = 48
    Width = 75
    Height = 25
    Caption = '确定'
    Default = True
    ModalResult = 1
    TabOrder = 0
    OnClick = bbOkClick
  end
  object Cancel: TBitBtn
    Left = 352
    Top = 96
    Width = 75
    Height = 25
    Caption = '取消'
    ModalResult = 2
    TabOrder = 1
  end
  object GroupBox2: TGroupBox
    Left = 7
    Top = 9
    Width = 163
    Height = 85
    Caption = '缩放比例'
    TabOrder = 2
    object Label1: TLabel
      Left = 120
      Top = 16
      Width = 14
      Height = 20
      Caption = '%'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -16
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 118
      Top = 41
      Width = 40
      Height = 13
      AutoSize = False
      Caption = '页宽'
    end
    object Label3: TLabel
      Left = 118
      Top = 63
      Width = 40
      Height = 13
      AutoSize = False
      Caption = '页高'
    end
    object rbZoom: TRadioButton
      Left = 5
      Top = 17
      Width = 67
      Height = 17
      Caption = '缩放到：'
      Checked = True
      TabOrder = 0
      TabStop = True
      OnClick = rbZoomClick
    end
    object ceZoom: TCSpinEdit
      Left = 74
      Top = 13
      Width = 42
      Height = 22
      TabStop = True
      MaxValue = 400
      MinValue = 10
      ParentColor = False
      TabOrder = 1
      Value = 100
    end
    object rbAdjust: TRadioButton
      Left = 5
      Top = 39
      Width = 64
      Height = 17
      Caption = '调整到：'
      TabOrder = 2
      OnClick = rbZoomClick
    end
    object cePageWidth: TCSpinEdit
      Left = 74
      Top = 35
      Width = 42
      Height = 22
      TabStop = True
      Enabled = False
      MaxValue = 10
      ParentColor = False
      TabOrder = 3
      Value = 1
    end
    object cePageHeight: TCSpinEdit
      Left = 74
      Top = 57
      Width = 42
      Height = 22
      TabStop = True
      Enabled = False
      MaxValue = 10
      ParentColor = False
      TabOrder = 4
      Value = 1
    end
  end
  object GroupBox1: TGroupBox
    Left = 181
    Top = 9
    Width = 65
    Height = 85
    Caption = '纸张方向'
    TabOrder = 3
    object rbHorizontal: TRadioButton
      Left = 5
      Top = 16
      Width = 47
      Height = 17
      Caption = '横向'
      TabOrder = 0
    end
    object rbVertical: TRadioButton
      Left = 5
      Top = 32
      Width = 47
      Height = 17
      Caption = '纵向'
      Checked = True
      TabOrder = 1
      TabStop = True
    end
  end
  object GroupBox4: TGroupBox
    Left = 258
    Top = 9
    Width = 87
    Height = 85
    Caption = '居中'
    TabOrder = 4
    object cbCenterHor: TCheckBox
      Left = 9
      Top = 20
      Width = 71
      Height = 17
      Caption = '横向居中'
      TabOrder = 0
    end
    object cbCenterVer: TCheckBox
      Left = 9
      Top = 41
      Width = 71
      Height = 17
      Caption = '纵向居中'
      TabOrder = 1
    end
  end
  object GroupBox3: TGroupBox
    Left = 7
    Top = 110
    Width = 338
    Height = 86
    Caption = '页边距(单位:厘米)'
    TabOrder = 5
    object Label6: TLabel
      Left = 9
      Top = 20
      Width = 48
      Height = 13
      Caption = '上边距：'
    end
    object Label7: TLabel
      Left = 9
      Top = 42
      Width = 48
      Height = 13
      Caption = '左边距：'
    end
    object Label8: TLabel
      Left = 9
      Top = 64
      Width = 36
      Height = 13
      Caption = '页眉：'
    end
    object Label9: TLabel
      Left = 184
      Top = 18
      Width = 48
      Height = 13
      Caption = '下边距：'
    end
    object Label10: TLabel
      Left = 184
      Top = 41
      Width = 48
      Height = 13
      Caption = '右边距：'
    end
    object Label11: TLabel
      Left = 184
      Top = 64
      Width = 36
      Height = 13
      Caption = '页脚：'
    end
    object seTop: TSDEdit
      Left = 67
      Top = 16
      Width = 60
      Height = 21
      Color = clWhite
      TabOrder = 0
      Text = 'seTop'
      OnChange = seTopChange
      OnEnter = seTopEnter
      SplitSymbol = ' | '
    end
    object seBottom: TSDEdit
      Left = 251
      Top = 15
      Width = 60
      Height = 21
      Color = clWhite
      TabOrder = 1
      Text = 'seBottom'
      OnChange = seTopChange
      OnEnter = seTopEnter
      SplitSymbol = ' | '
    end
    object seLeft: TSDEdit
      Left = 67
      Top = 38
      Width = 60
      Height = 21
      Color = clWhite
      TabOrder = 2
      Text = 'seLeft'
      OnChange = seTopChange
      OnEnter = seTopEnter
      SplitSymbol = ' | '
    end
    object seRight: TSDEdit
      Left = 251
      Top = 37
      Width = 60
      Height = 21
      Color = clWhite
      TabOrder = 3
      Text = 'seRight'
      OnChange = seTopChange
      OnEnter = seTopEnter
      SplitSymbol = ' | '
    end
    object seTopt: TSDEdit
      Left = 67
      Top = 60
      Width = 60
      Height = 21
      Color = clWhite
      TabOrder = 4
      Text = 'seTopt'
      OnChange = seTopChange
      OnEnter = seTopEnter
      SplitSymbol = ' | '
    end
    object seBottomb: TSDEdit
      Left = 251
      Top = 59
      Width = 60
      Height = 21
      Color = clWhite
      TabOrder = 5
      Text = 'seBottomb'
      OnChange = seTopChange
      OnEnter = seTopEnter
      SplitSymbol = ' | '
    end
  end
  object GroupBox5: TGroupBox
    Left = 7
    Top = 214
    Width = 337
    Height = 65
    Caption = '页眉/页脚'
    TabOrder = 6
    object Label15: TLabel
      Left = 10
      Top = 20
      Width = 36
      Height = 13
      Caption = '页眉：'
    end
    object Label16: TLabel
      Left = 10
      Top = 43
      Width = 36
      Height = 13
      Caption = '页脚：'
    end
    object eCaption: TEdit
      Left = 52
      Top = 15
      Width = 277
      Height = 21
      TabOrder = 0
      Text = 'eCaption'
    end
    object eEnd: TEdit
      Left = 52
      Top = 38
      Width = 277
      Height = 21
      TabOrder = 1
      Text = 'eEnd'
    end
  end
end