[[Delphius]]

Empezado por JoysticK

Alguien me puede indicar el codigo para extraer la lista de tablas contenida en una base de datos Access ? Estoy utilizando una TADOTable para acceder a la table pero necesito saber cuantas tablas existen en una base datos...

Hola JoysticK,
El TADOConnection tiene un método que te permite obtener la lista de tablas.
Concretamente el método es GetTableName.

Un ejemplo de su uso:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var lista: TStringList;
    i: integer;
begin
  lista := TstringList.Create;
  Adoconnection1.GetTableNames(lista);
  for i := 0 to lista.Count - 1 do
    ShowMessage(lista[i]);
  lista.Free;
end;

Saludos,