CreateTable的问题(100分)

我用CreateTable生成一个dbase表，
有一个ftSmallint的字段，是这样写的：
Table1->FieldDefs->Add("S",ftSmallint,0,false),
可是程序运行后，发现生成的却是ftFloat型的。
百思不得其解，希望您的帮助。谢谢。

就DBASE本身，直到Visual DBase都没有提供Integer这种数据
类型。而N字段在Delphi中取回来或者是TFloatField或者是
TBCDField（这是由于N字段可能有小数，而Delphi本身没有必要
做的复杂到需要根据N字段的长度来分别生成Float, SmallInt,
Integer等各种不同的Field，如果Database的设置中Enable BCD=True
返回的就是TBCDField，否则是TFloatField)