Question

ACCESS数据库、delphi、 not a valid floating point

ACCESS数据库 ，建立了一个表，内部有个文本字段（载入的是浮点型数据，当文本载入的）；
当我在程序中select查询表格时，将这个文本字段转为浮点型数据时，在中文xp SP3下已经自己下载的英文XP系统下都运行的蛮好的；为什么到国外客户那边会出现“
1.65 is not a valid floating point ”的报错呢，实在搞不懂；
Delphi写的带数据库的程序。
哪位大侠知道或遇到这个情况啊，非常感谢；此用户也是XP SP3.

Answer 1

convert 或CAST 转换一下就行了吧！

追问

不明白，可否具体些？
a:=ComboBox17.text;//'非空';
with ADOQ_SYS do //TADOQuery控制，ACCESS数据库
begin
close;
SQL.Text:='select type,power_DC_MAX from inverter_info where data_type='''+a+'''';
Open;
if (not Eof) then
begin

Answer 2

这个有时候和环境有关系，我以前碰到过这个问题，最后没有办法，只好将程序在英文的系统下重新编辑一次就可以了，其实代码什么都不用改，尤其是数据库，更得在英文状态下创建或编辑，程序里你不用动什么地方就可以了

Answer 3

你不贴代码,如何给清楚点

追问

//前一部分代码在楼上
if (not Eof) then
begin
Label96.Caption:=Fields[1].AsString; //"1.65"
Power_erding:=(strtofloat(Fields[1].AsString))*1000;//*出错，
//内容“1.65 is not a valid floating point ”
end;
Close;
end;
//此代码中文XP可以使用；国外客户使用出现bug（亦是XP SP3）

追答

方法一，你在提取 fields[1] 的时候，看看access中支持的 函数
cdbl 之列 直接放到 select 中
方法二：

Power_erding:=(strtofloat(Fields[1].AsString))*1000;//
改成
:=Fieldsvalues[1]*1000

或者

strtofloat(vartostr(fieldvalues[]))*1000

追问

继续追问：这个和我所做处理有什么区别啊,另外方法一 没理解明白

追答

另一个方法就是在你提数据的时候就把类型转换好