codebookfrm.dfm

供水营销打印程序源码

inherited frmCodeBook: TfrmCodeBook
  Left = 416
  Top = 268
  Caption = 'frmCodeBook'
  PixelsPerInch = 96
  TextHeight = 12
  object Label5: TLabel [0]
    Left = 10
    Top = 48
    Width = 66
    Height = 12
    Caption = #34920#20876#32534#21495'(&C)'
  end
  inherited PageControl: TPageControl
    inherited TabSheet1: TTabSheet
      inherited Panel1: TPanel
        inherited grdBrowse: TDBGridEh
          DataSource = dmInvPrint.dsBook
          Columns = <
            item
              Alignment = taCenter
              EditButtons = <>
              FieldName = 'BookID'
              Footers = <>
              Title.Caption = #32534#21495
            end
            item
              EditButtons = <>
              FieldName = 'Bookname'
              Footers = <>
              Title.Caption = #34920#20876#21517#31216
              Width = 132
            end
            item
              DropDownBox.ListSource = dmInvPrint.dsCopier
              EditButtons = <>
              FieldName = 'Copier'
              Footers = <>
              KeyList.Strings = (
                'CopiID')
              LookupDisplayFields = 'Name'
              Visible = False
            end
            item
              EditButtons = <>
              FieldName = 'Period'
              Footers = <>
              Title.Caption = #25220#34920#21608#26399
              Width = 50
            end
            item
              EditButtons = <>
              FieldName = 'Address'
              Footers = <>
              Title.Caption = #22320#22336#21015#34920
              Width = 128
            end
            item
              EditButtons = <>
              FieldName = 'Modifydate'
              Footers = <>
              Title.Caption = #20462#25913#26102#38388
              Width = 64
            end
            item
              EditButtons = <>
              FieldName = 'Description'
              Footers = <>
              Title.Caption = #22791#27880
              Width = 256
            end>
        end
      end
    end
    inherited TabSheet2: TTabSheet
      inherited Panel2: TPanel
        object Label1: TLabel
          Left = 114
          Top = 8
          Width = 66
          Height = 12
          Caption = #34920#20876#32534#21495'(&C)'
          FocusControl = edtBookID
        end
        object Label2: TLabel
          Left = 202
          Top = 8
          Width = 66
          Height = 12
          Caption = #34920#20876#21517#31216'(&N)'
          FocusControl = edtAreaname
        end
        object Label3: TLabel
          Left = 114
          Top = 46
          Width = 66
          Height = 12
          Caption = #22320#22336#21015#34920'(&L)'
          FocusControl = edtAddress
        end
        object Label4: TLabel
          Left = 10
          Top = 84
          Width = 42
          Height = 12
          Caption = #22791#27880'(&M)'
          FocusControl = edtDescription
        end
        object Label6: TLabel
          Left = 10
          Top = 46
          Width = 66
          Height = 12
          Caption = #25220#34920#21608#26399'(&P)'
          FocusControl = edtPeriod
        end
        object Label7: TLabel
          Left = 10
          Top = 8
          Width = 66
          Height = 12
          Caption = #25152#23646#21306#22495'(&A)'
          FocusControl = edtAreaID
        end
        object edtBookID: TcxDBMaskEdit
          Left = 112
          Top = 20
          Width = 81
          Height = 23
          DataBinding.DataField = 'BookID'
          DataBinding.DataSource = dmInvPrint.dsBook
          Style.Shadow = True
          TabOrder = 1
        end
        object edtAreaname: TcxDBMaskEdit
          Left = 200
          Top = 20
          Width = 97
          Height = 23
          Anchors = [akLeft, akTop, akRight]
          DataBinding.DataField = 'Bookname'
          DataBinding.DataSource = dmInvPrint.dsBook
          Style.Shadow = True
          TabOrder = 2
        end
        object edtAddress: TcxDBMaskEdit
          Left = 112
          Top = 58
          Width = 185
          Height = 23
          Anchors = [akLeft, akTop, akRight]
          DataBinding.DataField = 'Address'
          DataBinding.DataSource = dmInvPrint.dsBook
          Style.Shadow = True
          TabOrder = 4
        end
        object edtDescription: TcxDBMaskEdit
          Left = 8
          Top = 96
          Width = 289
          Height = 23
          Anchors = [akLeft, akTop, akRight]
          DataBinding.DataField = 'Description'
          DataBinding.DataSource = dmInvPrint.dsBook
          Style.Shadow = True
          TabOrder = 5
        end
        object edtPeriod: TcxDBMaskEdit
          Left = 8
          Top = 58
          Width = 97
          Height = 23
          DataBinding.DataField = 'Period'
          DataBinding.DataSource = dmInvPrint.dsBook
          Style.Shadow = True
          TabOrder = 3
        end
        object edtAreaID: TcxDBLookupComboBox
          Left = 8
          Top = 20
          Width = 97
          Height = 23
          DataBinding.DataField = 'AreaID'
          DataBinding.DataSource = dmInvPrint.dsBook
          Properties.KeyFieldNames = 'AreaID'
          Properties.ListColumns = <
            item
              FieldName = 'Areaname'
            end>
          Properties.ListSource = dmInvPrint.dsArea
          Style.Shadow = True
          TabOrder = 0
        end
      end
    end
  end
end