Holaa AdrianMex...
Agregar 40 campos string a una tabla:
Código Delphi
[-]
ABSTable1.Close;
intHasta := 40;
for i := 1 to intHasta do
begin
strCampo := IntToStr(i);
ABSTable1.RestructureFieldDefs.Add(strCampo,aftString,10,False);
end;
ABSTable1.RestructureTable(absLog);
ABSTable1.Open;
Me cuentas...