Выбор таблицы БД в ADO

[nickel-j]

Здравствуйте!
При запуске программы автоматичесмки подключается выбранная база данных и с помощью ADOTable выбранная заранее таблица выводится в DBGrid. Я хочу реализовать возможность выбора базы данных через OpenDialog, затем вытащить из этой базы имена таблиц и выбрать, какую открывать. Пока это выглядит так

  openDialog := TOpenDialog.Create(self);
  openDialog.InitialDir := GetCurrentDir;
  openDialog.Options := [ofFileMustExist];
  openDialog.Filter :=
    'MS Access files|*.mdb';
  // Показ диалог открытия файла
  if openDialog.Execute
  then //ShowMessage('File : '+openDialog.FileName)
   begin
    ADOConnection1.Connected:=false;
    ADOConnection1.ConnectionString:=openDialog.FileName;
//Пользователь заранее вводит имя таблицы
    ADOTable1.TableName:=Edit4.Text; 
    ADOConnection1.Connected:=true;
    ADOTable1.Active:=true
   end
  else ShowMessage('Открытие файла остановлено');

  // Освобождение диалога
  openDialog.Free;
end;

Т.е. для открытия пользователь должен знать имя таблицы, хранящейся в БД, что ни разу не эстетично=) Можно ли как-то изъять имена таблиц и вывести их например в выпадающий список?

[Stilet]

Используй TADOConnection.GetTableNames
В Хелпе кстати пример есть.

[nickel-j]

Спасибо, разобрался.
P.S.: в моей крякнутой делфе нет хэлпа)

[ermik_8810]

не подскажете а как доступ к полю таблицы получить? то есть мне надо вытащить поля и значения полей (записи)?