有关数据插入有关问题

有关数据插入问题.varsqlstr:stringfloatstr:stringbeginfloatstr: 1.1 sqlstr: insertintotable1(co

有关数据插入问题.
var
  sqlstr:string;
  floatstr:string;
begin
floatstr:= '1.1 ';
sqlstr:= 'insert   into   table1   (   col   )   values(   '+floatstr+ '   ) ';
end;

执行后查看access数据库内容,该插入值变为 '1 ',如floatstr值为1.5的话,数据库内为 '2 ',怎样解决可以使插入值就为 '1.1 '


[解决办法]
col 是什么类型?如果是数字 在下面默认的字段大小是长整型,将其改为双精度型