Ya lo probe con un case pero me da el mismo error. Me dice:
Undeclared identifier: "ftString"
Undeclared identifier: "ftInteger"
etc...
No ara falta algun uses o algo? Es que no veo normal que los ejemplos que veo en internet y los que me decis vosotros vayan y ami no. Os escribo todo el codigo para que lo veais:
[i]case DM.T_Table1.FieldDefList.FieldDefs.DataType of
ftString : Tabla1.Cells[i,i+1] := 'String';
ftInteger : Tabla1.Cells[i,i+1] := 'Integer';
end;
Tambien he probado con esto y nada:
[i]if DM.T_Table1.Fields.DataType = ftString then
Tabla1.Cells[i,i+1] := 'String';
Gracias
__________________
Un buen programador no se mide por los programas que hace, sino por lo que ayuda a los demás programadores.
|