подключение базы access к pascal

Не как подключение к базе через from среда lazarus побывал
не как выдает ошибки и не добавляет данные в базу генерирует исключение

procedure TForm3.ODBCConnection1AfterConnect(Sender: TObject); begin ODBCConnection1 := ODBCConnection1.Create(nil); ODBCConnection1.Connected:=true; ODBCConnection1.DatabaseName:='C:\Users\ПК\Desktop\проект\.db'; ODBCConnection1.UserName:='admin'; ODBCConnection1.Password:=''; ODBCConnection1.Connected:=true; ODBCConnection1 := ODBCConnection1.Create(nil); – rod rold 2 минуты назад   Править   Удалить
procedure TForm3.DataSource1DataChange(Sender: TObject; Field: TField); begin ODBCConnection1.Connected:=true; //ODBCConnection1.Connected = new(nil); ODBCConnection1.DatabaseName:='C:\Users\ПК\Desktop\проект\Microsoft Access ACCDE Database (.accde).db'; ODBCConnection1 := ODBCConnection1.Create(nil); ODBCConnection1.Create(nil); end; 
uses
  Classes, SysUtils, dbf, DB, odbcconn, Forms, Controls, Graphics, Dialogs,
  StdCtrls;

    ODBCConnection1: TODBCConnection;
    procedure Button1Click(Sender: TObject);
    procedure DataSource1DataChange(Sender: TObject; Field: TField);
    procedure ODBCConnection1AfterConnect(Sender: TObject);