customerpropertyfrm.dfm

供水营销打印程序源码

        end
        object edtAreaID: TcxDBLookupComboBox
          Left = 120
          Top = 24
          Width = 97
          Height = 23
          DataBinding.DataField = 'AreaID'
          DataBinding.DataSource = dasProperty
          Properties.DropDownListStyle = lsFixedList
          Properties.KeyFieldNames = 'AreaID'
          Properties.ListColumns = <
            item
              FieldName = 'Areaname'
            end>
          Properties.ListOptions.GridLines = glVertical
          Properties.ListOptions.ShowHeader = False
          Properties.ListSource = dmInvPrint.dsArea
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 1
        end
        object edtBookID: TcxDBLookupComboBox
          Left = 232
          Top = 24
          Width = 97
          Height = 23
          DataBinding.DataField = 'BookID'
          DataBinding.DataSource = dasProperty
          Properties.DropDownListStyle = lsFixedList
          Properties.KeyFieldNames = 'BookID'
          Properties.ListColumns = <
            item
              FieldName = 'Bookname'
            end>
          Properties.ListOptions.GridLines = glVertical
          Properties.ListOptions.ShowHeader = False
          Properties.ListSource = dmInvPrint.dsBook
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 2
        end
        object edtPayID: TcxDBLookupComboBox
          Left = 8
          Top = 64
          Width = 97
          Height = 23
          DataBinding.DataField = 'PayID'
          DataBinding.DataSource = dasProperty
          Properties.DropDownListStyle = lsFixedList
          Properties.KeyFieldNames = 'PayID'
          Properties.ListColumns = <
            item
              FieldName = 'Payname'
            end>
          Properties.ListOptions.GridLines = glVertical
          Properties.ListOptions.ShowHeader = False
          Properties.ListSource = dmInvPrint.dsPaymode
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 3
        end
        object edtUsingID: TcxDBLookupComboBox
          Left = 120
          Top = 64
          Width = 305
          Height = 23
          DataBinding.DataField = 'UsingID'
          DataBinding.DataSource = dasProperty
          Properties.DropDownListStyle = lsFixedList
          Properties.KeyFieldNames = 'UsingID'
          Properties.ListColumns = <
            item
              FieldName = 'Usingname'
            end
            item
              FieldName = 'sPrice'
            end
            item
              FieldName = 'wPrice'
            end>
          Properties.ListOptions.GridLines = glVertical
          Properties.ListOptions.ShowHeader = False
          Properties.ListSource = dmInvPrint.dsUsager
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 4
        end
        object chkSewageflag: TcxDBCheckBox
          Left = 4
          Top = 96
          Width = 133
          Height = 21
          DataBinding.DataField = 'Sewageflag'
          DataBinding.DataSource = dasProperty
          Properties.DisplayUnchecked = 'False'
          Properties.ReadOnly = False
          Properties.Caption = #26159#21542#25910#21462#25490#27745#36153'(&S)'
          Style.Shadow = False
          TabOrder = 5
        end
        object cxDBSpinEdit1: TcxDBSpinEdit
          Left = 136
          Top = 112
          Width = 57
          Height = 23
          DataBinding.DataField = 'SewagePercent'
          DataBinding.DataSource = dasProperty
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 6
        end
        object edtCopier: TcxDBLookupComboBox
          Left = 232
          Top = 112
          Width = 97
          Height = 23
          DataBinding.DataField = 'Copier'
          DataBinding.DataSource = dasProperty
          Properties.DropDownListStyle = lsFixedList
          Properties.KeyFieldNames = 'CopiID'
          Properties.ListColumns = <
            item
              FieldName = 'Name'
            end>
          Properties.ListOptions.GridLines = glVertical
          Properties.ListOptions.ShowHeader = False
          Properties.ListSource = dmInvPrint.dsCopier
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 7
        end
        object chkLogoutflag: TcxDBCheckBox
          Left = 4
          Top = 136
          Width = 181
          Height = 21
          DataBinding.DataField = 'Logoutflag'
          DataBinding.DataSource = dasProperty
          Properties.DisplayUnchecked = 'False'
          Properties.OnEditValueChanged = chkLogoutflagPropertiesEditValueChanged
          Properties.Caption = #27880#38144#24403#21069#23458#25143#30340#22522#26412#36164#26009'(&L)'
          TabOrder = 8
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #29992#27700#20449#24687
      ImageIndex = 2
      object GroupBox3: TGroupBox
        Left = 8
        Top = 0
        Width = 433
        Height = 169
        TabOrder = 0
        object Label14: TLabel
          Left = 8
          Top = 11
          Width = 66
          Height = 12
          Caption = #19978#26399#27700#37327'(&B)'
          FocusControl = edtDegreebuf
        end
        object Label15: TLabel
          Left = 120
          Top = 11
          Width = 66
          Height = 12
          Caption = #26412#26399#21051#24230'(&C)'
          FocusControl = edtCurrQty
        end
        object Label16: TLabel
          Left = 280
          Top = 11
          Width = 66
          Height = 12
          Caption = #19978#26399#21051#24230'(&C)'
          FocusControl = edtPriorQty
        end
        object Label17: TLabel
          Left = 8
          Top = 51
          Width = 66
          Height = 12
          Caption = #20943#20813#27700#37327'(&D)'
          FocusControl = edtDerate
        end
        object Label18: TLabel
          Left = 120
          Top = 51
          Width = 66
          Height = 12
          Caption = #26412#26399#27700#37327'(&Q)'
          FocusControl = edtQty
        end
        object edtDegreebuf: TcxDBMaskEdit
          Left = 8
          Top = 24
          Width = 97
          Height = 23
          DataBinding.DataField = 'Degreebuf'
          DataBinding.DataSource = dasProperty
          Properties.Alignment.Horz = taRightJustify
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 0
        end
        object edtCurrQty: TcxDBMaskEdit
          Left = 120
          Top = 24
          Width = 145
          Height = 23
          DataBinding.DataField = 'CurrQty'
          DataBinding.DataSource = dasProperty
          Properties.Alignment.Horz = taRightJustify
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 1
        end
        object edtPriorQty: TcxDBMaskEdit
          Left = 280
          Top = 24
          Width = 145
          Height = 23
          DataBinding.DataField = 'PriorQty'
          DataBinding.DataSource = dasProperty
          Properties.Alignment.Horz = taRightJustify
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 2
        end
        object edtDerate: TcxDBMaskEdit
          Left = 8
          Top = 64
          Width = 97
          Height = 23
          DataBinding.DataField = 'Derate'
          DataBinding.DataSource = dasProperty
          Properties.Alignment.Horz = taRightJustify
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 3
        end
        object edtQty: TcxDBMaskEdit
          Left = 120
          Top = 64
          Width = 305
          Height = 23
          DataBinding.DataField = 'Qty'
          DataBinding.DataSource = dasProperty
          Properties.Alignment.Horz = taRightJustify
          Properties.ReadOnly = False
          Style.Shadow = True
          TabOrder = 4
        end
      end
    end
  end
end