codeusagerfrm.dfm

供水营销打印程序源码

inherited frmCodeUsager: TfrmCodeUsager
  Caption = 'frmCodeUsager'
  PixelsPerInch = 96
  TextHeight = 12
  object Label4: TLabel [0]
    Left = 121
    Top = 46
    Width = 66
    Height = 12
    Caption = #27700#36153#21333#20215'(&W)'
    FocusControl = edtPayID
  end
  inherited PageControl: TPageControl
    inherited TabSheet1: TTabSheet
      inherited Panel1: TPanel
        inherited grdBrowse: TDBGridEh
          DataSource = dmInvPrint.dsUsager
          Columns = <
            item
              Alignment = taCenter
              EditButtons = <>
              FieldName = 'UsingID'
              Footers = <>
              Title.Caption = #32534#21495
            end
            item
              EditButtons = <>
              FieldName = 'Usingname'
              Footers = <>
              Title.Caption = #29992#27700#24615#36136
              Width = 128
            end
            item
              DisplayFormat = #65509',0.00;-'#65509',0.00'
              EditButtons = <>
              FieldName = 'sPrice'
              Footers = <>
              Title.Caption = #27700#36153#21333#20215
              Width = 42
            end
            item
              DisplayFormat = #65509',0.00;-'#65509',0.00'
              EditButtons = <>
              FieldName = 'wPrice'
              Footers = <>
              Title.Caption = #27745#27700#21333#20215
              Width = 42
            end
            item
              EditButtons = <>
              FieldName = 'Modifydate'
              Footers = <>
              Title.Caption = #20462#25913#26102#38388
              Width = 65
            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 = 9
          Top = 8
          Width = 42
          Height = 12
          Caption = #32534#21495'(&C)'
          FocusControl = edtPayID
        end
        object Label2: TLabel
          Left = 113
          Top = 8
          Width = 66
          Height = 12
          Caption = #29992#27700#24615#36136'(&U)'
          FocusControl = edtUsingname
        end
        object Label3: TLabel
          Left = 9
          Top = 46
          Width = 66
          Height = 12
          Caption = #27700#36153#21333#20215'(&W)'
          FocusControl = edtsPrice
        end
        object Label5: TLabel
          Left = 113
          Top = 46
          Width = 66
          Height = 12
          Caption = #27745#27700#21333#20215'(&S)'
          FocusControl = edtwPrice
        end
        object Label6: TLabel
          Left = 9
          Top = 84
          Width = 42
          Height = 12
          Caption = #22791#27880'(&M)'
          FocusControl = edtDescription
        end
        object edtPayID: TcxDBMaskEdit
          Left = 8
          Top = 20
          Width = 97
          Height = 23
          DataBinding.DataField = 'UsingID'
          DataBinding.DataSource = dmInvPrint.dsUsager
          Style.Shadow = True
          TabOrder = 0
        end
        object edtUsingname: TcxDBMaskEdit
          Left = 112
          Top = 20
          Width = 185
          Height = 23
          Anchors = [akLeft, akTop, akRight]
          DataBinding.DataField = 'Usingname'
          DataBinding.DataSource = dmInvPrint.dsUsager
          Style.Shadow = True
          TabOrder = 1
        end
        object edtsPrice: TcxDBCurrencyEdit
          Left = 8
          Top = 58
          Width = 97
          Height = 23
          DataBinding.DataField = 'sPrice'
          DataBinding.DataSource = dmInvPrint.dsUsager
          Style.Shadow = True
          TabOrder = 2
        end
        object edtwPrice: TcxDBCurrencyEdit
          Left = 112
          Top = 58
          Width = 97
          Height = 23
          DataBinding.DataField = 'wPrice'
          DataBinding.DataSource = dmInvPrint.dsUsager
          Style.Shadow = True
          TabOrder = 3
        end
        object edtDescription: TcxDBMaskEdit
          Left = 8
          Top = 96
          Width = 289
          Height = 23
          Anchors = [akLeft, akTop, akRight]
          DataBinding.DataField = 'Description'
          DataBinding.DataSource = dmInvPrint.dsUsager
          Style.Shadow = True
          TabOrder = 4
        end
      end
    end
  end
end