Hi,
die Namen der Tabellen kannst du einfach über die Methode GetTableNames() der ADOConnection ermitteln. So ziemlich alles was das Herz begehrt erhält man über die
ADO Extensions (ADOX):
Delphi-Quellcode:
uses
ADOX;
procedure GetViews(views: Views; s: TStrings);
var
i: Integer;
v: View;
begin
for i := 0 to Pred(views.Count) do
begin
v := views.Item[i];
s.Values[v.Name] := VarToStr(v.Get_Command.CommandText);
end;
end;
Grüße vom marabu