Herausfinden, wie viel Tabellen in einer Datenbank sind?

[smart]

Wie kann man herausfinden, wie viele Tabellen in einer Datenbank sind?

[alzaimar]

mit ADOConnection.GetTableNames.

[smart]

Vielen Dank für den Tipp, aber dann bekomme ich immer diese Fehlermeldung:

Delphi-Quellcode:

[Fehler] U_Main.pas(550): Undefinierter Bezeichner: 'ADOConnection'
[Fataler Fehler] Test.dpr(8): Verwendete Unit 'Main.pas' kann nicht compiliert werden

Ich möchte aus ein DB- File herausfinden, wie viele Tabellen enthalten sind und diese in eine TListBox darstellen.

[smart]

Ich habe selbst eine Lösung gefunden:

Delphi-Quellcode:

var
Tables: TStringList;
i: integer;
begin
ListBox3.Clear;
Tables := TStringList.Create;
  try
    ABSDatabase1.GetTablesList(Tables);
     for i:=0 to tables.Count-1 do
       ListBox3.Items.Add(Tables[i]);
    finally
   Tables.free;

Heike.