object DataModule1: TDataModule1
  OldCreateOrder = False
  Left = 306
  Top = 204
  Height = 180
  Width = 309
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 192
    Top = 48
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Contact.mdb;Mode=Re' +
      'adWrite;Persist Security Info=False;Jet OLEDB:Engine Type=5'
    LoginPrompt = False
    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
end