复件 datamodule.~dfm

个人朋友信息的管理

object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 192
  Top = 133
  Height = 185
  Width = 324
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;
      Data Source=Contack.mdb;
      Mode=Re' +'adWrite;
      Extended Properties="";
      Persist Security Info=False;
      Jet OLEDB:System database="";
      Jet OLEDB:Registry Path="";
      Jet OLEDB:Engine Type=5'
    Mode = cmReadWrite
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 24
    Top = 48
  end
  object ADODataSet1: TADODataSet
    Active = True
    Connection = ADOConnection1
    CursorType = ctStatic
    CommandText = 'Contact'
    CommandType = cmdTable
    Parameters = <>
    Left = 112
    Top = 48
  end
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 192
    Top = 48
  end
end