AnyDAC
ContentsIndexHome
Example
var
  oTab: TADDatSTable;
....
  ADMetaInfoCommand1.CatalogName := 'Northwind';
  ADMetaInfoCommand1.SchemaName := 'dbo';
  ADMetaInfoCommand1.ObjectName := 'Employees';
  ADMetaInfoCommand1.MetaInfoKind := mkTableFields;
  ADMetaInfoCommand1.Define(oTab);
  ADMetaInfoCommand1.Open(oTab);
  ADMetaInfoCommand1.Fetch(oTab, True);