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:Database Password="";
      Jet OLEDB:Engine Type=5'
      Jet OLEDB:Database Locking Mode=1;
      Jet OLEDB:Global Partial Bulk Ops=2;
      Jet OLEDB:Global Bulk Transactions=1;
      Jet OLEDB:New Database Password="";
      Jet OLEDB:Create System Database=false;
      Jet OLEDB:Encrypt Database=False;
      Jet OLEDB:Don't Copy Locale on Compact=False;
      Jet OLEDB:Compact Without Replica Repair=False;
      Jet OLEDB:SFP=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
  object DataSource1: TDataSource
    DataSet = ADODataSet1
    Left = 192
    Top = 48
  end
end