[ecfisa]

Hola ingabraham.

No parece haber ninguna cosa extraña en tu código, todo es correcto.

falta alguna uses, x que no me reconoce esto.

Puede ser que no tengas incluida la unit DB, ya que TFieldType está definido allí.

Ayuda de Delphi:

Unit

DB

Delphi syntax:

type TFieldType = (ftUnknown, ftString, ftSmallint, ftInteger, ftWord, ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime, ftBytes, ftVarBytes, ftAutoInc, ftBlob, ftMemo, ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString, ftLargeint, ftADT, ftArray, ftReference, ftDataSet, ftOraBlob, ftOraClob, ftVariant, ftInterface, ftIDispatch, ftGuid, ftTimeStamp, ftFMTBcd);

Fijate si falta la unit DB en la cláusula uses, por ahí es eso...

Saludos.