Auslesen von Feldname, Feldtypen, deren Größe und default werte einer Tabelle

[erich.wanker]

Hallo,

in Delphi xe4, mit libmysql.dll für die ZConnection zeige ich mir alle Tabellen einer Datenbank in einem DBGrid mit folgendem SQL Statement an

Delphi-Quellcode:

Z_TABELLEN.SQL.Clear;
Z_TABELLEN.SQL.append('show tables');
Z_TABELLEN.Open;

Die Felder lasse ich mir in einem 2. DBGrid anzeigen

Delphi-Quellcode:

tabellenname := Z_TABELLEN.FieldByName('tables_in_'+MainModule.UniMainModule.ZConnection1.Database).AsString;

Z_FELDER.SQL.Clear;
Z_FELDER.SQL.append('SELECT COLUMN_NAME, DATA_TYPE FROM  INFORMATION_SCHEMA.COLUMNS WHERE  TABLE_SCHEMA = "'+MainModule.UniMainModule.ZConnection1.Database+'"  AND TABLE_NAME = "' + tabellenname + '"');
Z_FELDER.Open;

Somit bekomme ich Feldnamen und feldtyp (varchar, int date..) in meiner 2. DBGrid

ist es möglich - auch die Größe (varchar = 200) oder (int = 6) und die default-werte darzustellen?

Vielen Dank für Infos
Erich