Listar la estructura de una DB

[*Caro*]

Empezado por afunez2007

Aunque la ultima parte de saber el tipo de datos y el tamaño, no lo he podido conseguir, se podra hacer con TTable?

Hola afunez2007, si tiene que ser sobre el DataSet (TTable, TQuery.....) :

Código Delphi [-]
var
 tipo : TFieldType;
 TipoDato : String;
 Size : Integer;
begin
 ...............................................................
 tipo := Query1.Fields[IndiceDelCampo].DataType;
 Case tipo Of
  ftString : TipoDato := 'Character or string field';
  ftInteger : TipoDato := '32-bit integer field';
  ftBoolean : TipoDato := 'Boolean field';
  ftFloat : TipoDato := 'Floating-point numeric field';
  ftCurrency : TipoDato := 'Floating-point numeric field';
  ftDate : TipoDato := 'Date field';
  ftTime : TipoDato := 'Time field';
  ftDateTime : TipoDato := 'Date and time field';
  ftAutoInc : TipoDato := 'Auto-incrementing 32-bit integer counter field';
  ftBlob : TipoDato := 'Binary Large OBject field';
  ................................................................ 
  // Y hay muchos mas
 end;
 Size := Query1.Fields[IndiceDelCampo].DataSize;
 ....................................................

Saluditos