Устанавливаешь соединение через AdoConnection. Например так:
Код:
AdoConnection1.ConnectionString := Format('Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=%s',[OpenDialog1.FileName]);
AdoConnection1.Open;
Затем открываешь нужную таблицу:
Код:
AdoQuery1.Connection := AdoConnection1;
AdoQuery.SQL.Text := 'select * from UserTable';
AdoQuery.Open;
или так:
Код:
AdoTable1.Connection := AdoConnection1;
AdoTable1.TableName := 'UserTable';
AdoTable1.Open;