Komplette Tabellenstruktur finden

[backdraft]

Hallo,

ich möchte die Tabellenstruktur einer Datenbank visuell darstellen.

Also habe ich mir mit GetTableNames und dann pro Tabelle mit GetFieldNames die entsprechende Struktur geladen.

Was mir jetzt noch fehlt ist die Feldtypen und Feldlänge von den Feldern zu finden.

Gibt es dafür auche ine Funktion?

Danke Oliver

[shmia]

Du nimmst eine TQuery:

Delphi-Quellcode:

query1.SQL.Text := 'SELECT * FROM '+tablelist[i]+ ' WHERE 0=1';
query1.Open;
for j := 0 to query1.fields.count-1 do
begin
   feldname := query1.fields[j].FieldName;
end;

[Sir Rufo]

Hi, oder du nutzt Zeos DBO, da gibt es die Komp. TZSQLMetaData, die holt quasi alle Informationen aus der DB.