u_data.dfm

此系统完成了单向复费率电能表的抄表以及编程

object DataM: TDataM
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 209
  Top = 182
  Height = 249
  Width = 516
  object ADOConnection1: TADOConnection
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 40
    Top = 16
  end
  object ADOT_Command: TADOTable
    Connection = ADOConnection1
    CursorType = ctStatic
    Left = 128
    Top = 16
  end
  object ADOQ1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 216
    Top = 16
  end
  object ADOQ2: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 24
    Top = 80
  end
  object DataS2: TDataSource
    DataSet = ADOQ2
    Left = 72
    Top = 80
  end
  object ADOQ3: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 152
    Top = 80
  end
  object DataS3: TDataSource
    DataSet = ADOQ3
    Left = 200
    Top = 80
  end
  object DataS4: TDataSource
    DataSet = ADOQ4
    Left = 312
    Top = 80
  end
  object ADOQ4: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 272
    Top = 80
  end
  object ADOQ5: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 264
    Top = 16
  end
  object ADOT1: TADOTable
    Connection = ADOConnection1
    Left = 352
    Top = 16
  end
  object ADOT2: TADOTable
    Connection = ADOConnection1
    Left = 416
    Top = 16
  end
end