dm.~dfm

此程序是应朋友的 老婆单位的要求写的

object DataModule2: TDataModule2
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 363
  Top = 200
  Height = 515
  Width = 478
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Password="";Data Source=D:\sun\' +
      #24037#31243#31649#29702'\gcgl.mdb;Persist Security Info=True'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 56
    Top = 24
  end
  object AT_SJDW: TADOTable
    Connection = ADOConnection1
    TableName = 'sjdw_info'
    Left = 168
    Top = 24
  end
  object DS_SJDW: TDataSource
    DataSet = AT_SJDW
    Left = 224
    Top = 24
  end
  object AT_JFDW: TADOTable
    Connection = ADOConnection1
    TableName = 'JF_INFO'
    Left = 32
    Top = 112
  end
  object DS_JFDW: TDataSource
    DataSet = AT_JFDW
    Left = 88
    Top = 112
  end
  object DS_JLDW: TDataSource
    DataSet = AT_JLDW
    Left = 224
    Top = 112
  end
  object AT_JLDW: TADOTable
    Connection = ADOConnection1
    TableName = 'JLDW_INFO'
    Left = 176
    Top = 112
  end
  object AT_LHJGC: TADOTable
    Connection = ADOConnection1
    TableName = 'LHJGC_INFO'
    Left = 336
    Top = 24
  end
  object DS_LHJGC: TDataSource
    DataSet = AT_LHJGC
    Left = 400
    Top = 24
  end
  object DS_JZJCDW: TDataSource
    DataSet = AT_JZJCDW
    Left = 400
    Top = 112
  end
  object AT_JZJCDW: TADOTable
    Connection = ADOConnection1
    TableName = 'zjjcdw_info'
    Left = 336
    Top = 112
  end
  object AT_JZGC: TADOTable
    Connection = ADOConnection1
    TableName = 'zjdw_info'
    Left = 32
    Top = 184
  end
  object DS_JZGC: TDataSource
    DataSet = AT_JZGC
    Left = 88
    Top = 184
  end
  object DS_WWKTDW: TDataSource
    DataSet = AT_WWKTDW
    Left = 224
    Top = 184
  end
  object AT_WWKTDW: TADOTable
    Connection = ADOConnection1
    TableName = 'WWKTDW_INFO'
    Left = 168
    Top = 184
  end
  object AT_DKDW: TADOTable
    Connection = ADOConnection1
    TableName = 'DKDW_INFO'
    Left = 336
    Top = 184
  end
  object DS_DKDW: TDataSource
    DataSet = AT_DKDW
    Left = 400
    Top = 184
  end
  object AT_ZTSGDW: TADOTable
    Connection = ADOConnection1
    TableName = 'ZTSGDW'
    Left = 32
    Top = 272
  end
  object DS_ZTSGDW: TDataSource
    DataSet = AT_ZTSGDW
    Left = 88
    Top = 272
  end
  object DS_GCZGK: TDataSource
    DataSet = AT_GCZGK
    Left = 232
    Top = 272
  end
  object AT_GCZGK: TADOTable
    Connection = ADOConnection1
    TableName = 'PROJECT_INFO'
    Left = 168
    Top = 272
  end
  object AT_GCMC: TADOTable
    Connection = ADOConnection1
    TableName = 'PROJECT'
    Left = 328
    Top = 272
  end
  object DS_GCMC: TDataSource
    DataSet = AT_GCMC
    Left = 392
    Top = 272
  end
end