liste aller tables aus ner firebird db

[Matthias-k]

hallo,

ich arbeite schon eine ganze zeit an ner lösung für folgendes problem:

und zwar brauche ich eine liste aller tabellen, die in einer datenbank sind.

nur leider bieten mir die zeos kompos keinerlei möglickeiten dafür!

wie kann ich diese liste erhalten?


mfg matthias

[mkinzler]

Über die Systemtabellen:

SQL-Code:

select RDB$RELATION_NAME from RDB$RELATIONS  where RDB$SYSTEM_FLAG = 0;

[Matthias-k]

thx, einwandfrei funktioniert.

[jensw_2000]

Ich benutze weder Zeos noch FB, aber generell sollte dein TZeosDatabase eine Nachfahre von TDatabase sein.
Wenn das so ist, dann hat dein Database-Objekt auch eine Methode namens GetTablenames.

Delphi-Quellcode:

Procedure Test123;
  var SL:TStringList;
begin
 
  SL:=TStringList.Create;
  try
    MyZeosDatabase.GetTablenames(SL);
    Memo1.lines.add('Folgende Tabellen sind vorhanden:');
    Memo1.lines.Addstrings(SL);
  finally
    SL.free;
  end;
end;