udm.dfm

此功能是集资对付系统,为一单位要求而做,此能实现了实时对付

object dm: Tdm
  OldCreateOrder = False
  Left = 260
  Top = 107
  Height = 495
  Width = 554
  object Atbl_Dzrq: TADOTable
    Connection = frmMain.AdoConconn
    TableName = #30331#35760#26085#26399
    Left = 96
    Top = 64
  end
  object Atbl_hqb: TADOTable
    Connection = frmMain.AdoConconn
    TableName = #27963#26399#21033#29575
    Left = 152
    Top = 64
  end
  object Atbl_Jzry: TADOTable
    Connection = frmMain.AdoConconn
    CursorType = ctStatic
    OnCalcFields = Atbl_JzryCalcFields
    IndexFieldNames = 'ID'
    TableName = #38598#36164#20154#21592
    Left = 224
    Top = 64
    object Atbl_JzryID: TIntegerField
      FieldName = 'ID'
    end
    object Atbl_Jzryxm: TWideStringField
      FieldName = 'xm'
      Size = 50
    end
    object Atbl_Jzryzz: TWideStringField
      FieldName = 'zz'
      Size = 50
    end
    object Atbl_Jzrysfz: TWideStringField
      FieldName = 'sfz'
      Size = 50
    end
    object Atbl_Jzryjzhm: TWideStringField
      FieldName = 'jzhm'
      Size = 50
    end
    object Atbl_Jzrycrsj: TDateTimeField
      FieldName = 'crsj'
    end
    object Atbl_Jzryje: TFloatField
      FieldName = 'je'
      DisplayFormat = '#,##0.00'
    end
    object Atbl_Jzryqx: TIntegerField
      FieldName = 'qx'
    end
    object Atbl_Jzrylxze: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'lxze'
      Calculated = True
    end
    object Atbl_Jzrydf1_lx: TFloatField
      FieldName = 'df1_lx'
    end
    object Atbl_Jzrydf2_lx: TFloatField
      FieldName = 'df2_lx'
    end
    object Atbl_Jzrydf3_lx: TFloatField
      FieldName = 'df3_lx'
    end
    object Atbl_Jzrydf4_lx: TFloatField
      FieldName = 'df4_lx'
    end
    object Atbl_Jzrydf5_lx: TFloatField
      FieldName = 'df5_lx'
    end
    object Atbl_Jzrydf6_lx: TFloatField
      FieldName = 'df6_lx'
    end
    object Atbl_Jzrydf1_sj: TDateTimeField
      FieldName = 'df1_sj'
    end
    object Atbl_Jzrydf1_bj: TFloatField
      FieldName = 'df1_bj'
    end
    object Atbl_Jzrydf1_ye: TFloatField
      FieldName = 'df1_ye'
    end
    object Atbl_Jzrydf1_ll: TFloatField
      FieldName = 'df1_ll'
    end
    object Atbl_Jzrydf2_sj: TDateTimeField
      FieldName = 'df2_sj'
    end
    object Atbl_Jzrydf2_bj: TFloatField
      FieldName = 'df2_bj'
    end
    object Atbl_Jzrydf2_ye: TFloatField
      FieldName = 'df2_ye'
    end
    object Atbl_Jzrydf2_ll: TFloatField
      FieldName = 'df2_ll'
    end
    object Atbl_Jzrydf3_sj: TDateTimeField
      FieldName = 'df3_sj'
    end
    object Atbl_Jzrydf3_bj: TFloatField
      FieldName = 'df3_bj'
    end
    object Atbl_Jzrydf3_ye: TFloatField
      FieldName = 'df3_ye'
    end
    object Atbl_Jzrydf3_ll: TFloatField
      FieldName = 'df3_ll'
    end
    object Atbl_Jzrydf4_sj: TDateTimeField
      FieldName = 'df4_sj'
    end
    object Atbl_Jzrydf4_bj: TFloatField
      FieldName = 'df4_bj'
    end
    object Atbl_Jzrydf4_ye: TFloatField
      FieldName = 'df4_ye'
    end
    object Atbl_Jzrydf4_ll: TFloatField
      FieldName = 'df4_ll'
    end
    object Atbl_Jzrydf5_sj: TDateTimeField
      FieldName = 'df5_sj'
    end
    object Atbl_Jzrydf5_bj: TFloatField
      FieldName = 'df5_bj'
    end
    object Atbl_Jzrydf5_ye: TFloatField
      FieldName = 'df5_ye'
    end
    object Atbl_Jzrydf5_ll: TFloatField
      FieldName = 'df5_ll'
    end
    object Atbl_Jzrydf6_sj: TDateTimeField
      FieldName = 'df6_sj'
    end
    object Atbl_Jzrytpdf: TFloatField
      FieldName = 'tpdf'
    end
    object Atbl_JzrytBj: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'tBj'
      Calculated = True
    end
    object Atbl_JzrytYe: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'tYe'
      Calculated = True
    end
  end
  object Atbl_tmp: TADOTable
    Connection = frmMain.AdoConconn
    CursorType = ctStatic
    TableName = #20020#26102#24211
    Left = 280
    Top = 64
  end
  object Atbl_Nlx: TADOTable
    Connection = frmMain.AdoConconn
    TableName = #24180#21033#29575#34920
    Left = 360
    Top = 64
  end
  object Atbl_Wd: TADOTable
    Connection = frmMain.AdoConconn
    TableName = #32593#28857#20195#30721
    Left = 424
    Top = 64
  end
  object ds_Dzrq: TDataSource
    DataSet = Atbl_Dzrq
    Left = 104
    Top = 136
  end
  object ds_hqb: TDataSource
    DataSet = Atbl_hqb
    Left = 176
    Top = 136
  end
  object ds_Jzry: TDataSource
    DataSet = Atbl_Jzry
    Left = 232
    Top = 136
  end
  object ds_tmp: TDataSource
    DataSet = Atbl_tmp
    Left = 296
    Top = 136
  end
  object ds_Nlx: TDataSource
    DataSet = Atbl_Nlx
    Left = 360
    Top = 136
  end
  object ds_Wd: TDataSource
    DataSet = Atbl_Wd
    Left = 432
    Top = 136
  end
  object aQry_General: TADOQuery
    Connection = frmMain.AdoConconn
    Parameters = <>
    Left = 64
    Top = 240
  end
end