qm_pgopt.dfm

一个管理系统

object QMPageSetupForm: TQMPageSetupForm
  Left = 410
  Top = 162
  BorderStyle = bsDialog
  Caption = 'Page Setup'
  ClientHeight = 293
  ClientWidth = 409
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object bbCancel: TButton
    Left = 312
    Top = 260
    Width = 70
    Height = 23
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 2
  end
  object btnSaveDefault: TButton
    Left = 16
    Top = 260
    Width = 97
    Height = 22
    Caption = '&Save'
    TabOrder = 3
    OnClick = btnSaveDefaultClick
  end
  object PageControl1: TPageControl
    Left = 8
    Top = 8
    Width = 393
    Height = 241
    ActivePage = TabSheet1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '&Paper'
      object GroupBox3: TGroupBox
        Left = 8
        Top = 120
        Width = 233
        Height = 86
        Caption = '&Margin(cm)'
        TabOrder = 1
        object Label2: TLabel
          Left = 5
          Top = 30
          Width = 42
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Left:'
          FocusControl = edtLeft
        end
        object Label3: TLabel
          Left = 112
          Top = 30
          Width = 47
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Right:'
          FocusControl = edtRight
        end
        object Label4: TLabel
          Left = 5
          Top = 56
          Width = 42
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Top:'
          FocusControl = edtTop
        end
        object Label5: TLabel
          Left = 112
          Top = 56
          Width = 47
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Bottom:'
          FocusControl = edtBottom
        end
        object edtRight: TEdit
          Tag = 4
          Left = 161
          Top = 24
          Width = 61
          Height = 20
          MaxLength = 5
          TabOrder = 1
          OnExit = edtLengthExit
        end
        object edtLeft: TEdit
          Tag = 3
          Left = 49
          Top = 24
          Width = 61
          Height = 20
          MaxLength = 5
          TabOrder = 0
          OnExit = edtLengthExit
        end
        object updLeft: TUpDown
          Tag = 3
          Left = 92
          Top = 26
          Width = 16
          Height = 16
          Min = -32768
          Max = 32767
          Position = 0
          TabOrder = 4
          Wrap = False
          OnChangingEx = updLengthChangingEx
        end
        object updRight: TUpDown
          Tag = 4
          Left = 204
          Top = 26
          Width = 16
          Height = 16
          Min = -32768
          Max = 32767
          Position = 0
          TabOrder = 5
          Wrap = False
          OnChangingEx = updLengthChangingEx
        end
        object edtTop: TEdit
          Tag = 5
          Left = 49
          Top = 50
          Width = 61
          Height = 20
          MaxLength = 5
          TabOrder = 2
          OnExit = edtLengthExit
        end
        object updTop: TUpDown
          Tag = 5
          Left = 92
          Top = 52
          Width = 16
          Height = 16
          Min = -32768
          Max = 32767
          Position = 0
          TabOrder = 6
          Wrap = False
          OnChangingEx = updLengthChangingEx
        end
        object edtBottom: TEdit
          Tag = 6
          Left = 161
          Top = 50
          Width = 61
          Height = 20
          MaxLength = 5
          TabOrder = 3
          OnExit = edtLengthExit
        end
        object updBottom: TUpDown
          Tag = 6
          Left = 204
          Top = 52
          Width = 16
          Height = 16
          Min = -32768
          Max = 32767
          Position = 0
          TabOrder = 7
          Wrap = False
          OnChangingEx = updLengthChangingEx
        end
      end
      object GroupBox1: TGroupBox
        Left = 8
        Top = 5
        Width = 369
        Height = 108
        Caption = 'T&ype'
        TabOrder = 0
        object Label1: TLabel
          Left = 8
          Top = 24
          Width = 54
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = 'Si&ze:'
          FocusControl = cbxPaperNames
        end
        object Label7: TLabel
          Left = 8
          Top = 80
          Width = 54
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Height:'
          FocusControl = edtLength
        end
        object Label8: TLabel
          Left = 8
          Top = 54
          Width = 54
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Width:'
          FocusControl = edtWidth
        end
        object Label6: TLabel
          Left = 138
          Top = 80
          Width = 12
          Height = 12
          Caption = 'cm'
        end
        object Label9: TLabel
          Left = 138
          Top = 54
          Width = 12
          Height = 12
          BiDiMode = bdRightToLeft
          Caption = 'cm'
          ParentBiDiMode = False
        end
        object Label10: TLabel
          Left = 186
          Top = 54
          Width = 116
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Number of columns:'
          FocusControl = edtColumns
        end
        object Label11: TLabel
          Left = 186
          Top = 80
          Width = 116
          Height = 12
          Alignment = taRightJustify
          AutoSize = False
          Caption = '&Column space:'
          FocusControl = edtColumnSpace
        end
        object cbxPaperNames: TComboBox
          Left = 64
          Top = 18
          Width = 165
          Height = 20
          Style = csDropDownList
          ItemHeight = 12
          TabOrder = 0
          OnChange = cbxPaperNamesChange
        end
        object cbDefaultSize: TCheckBox
          Left = 236
          Top = 20
          Width = 123
          Height = 17
          Caption = 'D&efault papersize'
          TabOrder = 3
          OnClick = cbDefaultSizeClick
        end
        object edtLength: TEdit
          Tag = 1
          Left = 64
          Top = 74
          Width = 68
          Height = 20
          MaxLength = 5