Question

Delphi 浮点型怎么定义？

cmdDest.CommandText :=
'insert into ITS_TXJL_EXT( ID , x , y , Dir , GpsTime ) ' +
' values ( SEC_GPSINFO_SID.nextval , :GpsId , :x , :y , :Speed , :Dir , :State , :GpsTime ) ' ;

cmdDest.Parameters.ParamByName('ID').DataType := ;(ID在数据库里面的类型是INT，这里应该是什么？)
cmdDest.Parameters.ParamByName('x').DataType := ;(X在数据库里面的类型是float，这里应该是什么？)

cmdDest.Parameters.ParamByName('y').DataType := ;(Y在数据库里面的类型是float，这里应该是什么？)

cmdDest.Parameters.ParamByName('Dir').DataType := ftString ;(字符型)
cmdDest.Parameters.ParamByName('GpsTime').DataType := ftDateTime ;(日期型)

Answer 1

cmdDest.Parameters.ParamByName('ID').value:= 就可以了吧 value是可以任何类型

你定义数据类型干嘛呀

如果你非要定义
DataType 是TFieldType类型
有以下类型：
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);

所以 int 就是ftInteger float 可以是ftFloat

Answer 2