Пример - работает, но вот только не могу его подключить к своей программе:
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin
ADOConnection1.ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
ExtractFileDir(ParamSTR(0)) + '\database.mdb;' +
'Mode=ReadWrite;Persist Security Info=False';
ADOConnection1.DefaultDatabase:='database.mdb'
end;
При запуске программы выдает ошибку: