如何探知字段的类型(100分)

各位朋友:
请问在程序中动态选择了一个字段后,怎样探知这个字段的
字段类型和在其Table中在第几个.

TField.DataType
TField.FieldNo

你可以先提供，字段在数据库存中字段号
如：i:=1;
case table.fields.fieldkind of
fkdata: .....
.............
end;

fieldkind=>type TFieldKind = (fkData, fkCalculated, fkLookup, fkInternalCalc, fkAggregate);
datetype=>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);
gxg8816和sunqingyong说的不是一回事，看你要哪个。

谢谢