ADO的AsFloat返回的值有什么问题?

heinsect 2003-10-20 11:38:12
在表中定义两个字段为:
TEngMon_Absence float DEFAULT 1 NOT NULL ,
TEngMon_NormalOT float DEFAULT 1 NOT NULL ,

在SQL2K中查表看到是1.0

Delphi中代码:
m_dfAbsenceDay := ADOQuery1.FieldByName('TEngMon_Absence').AsFloat;
m_dfNormalOT:= ADOQuery1.FieldByName('TEngMon_NormalOT' ).AsFloat;

edAbsence.Text := FormatFloat('0.00', m_dfAbsenceDay);
edNormalOT.Text := FormatFloat('0.00', m_dfNormalOT);

edAbsence.Text赋值时没问题,edNormalOT.Text赋值时出EConvertError异常:
''' is not a valid floating point value'

我自己重写过FormatFloat,用Format,临时变量值正确,交给result就出错。
?????????

...全文
58 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
heinsect 2003-10-21
  • 打赏
  • 举报
回复
ADO在Delphi中是不是有什么限制?
heinsect 2003-10-21
  • 打赏
  • 举报
回复
还是不行。我原来用
Format('%8.2g', [m_dfNormalOT] );
也试过,不行。

是不是其它地方的代码有问题,造成栈空间出错?
heinsect 2003-10-21
  • 打赏
  • 举报
回复
m_dfAbsenceDay: Double;
m_dfNormalOT: Double;
angle097113 2003-10-21
  • 打赏
  • 举报
回复
这样实现就可以了
edAbsence.Text := ADOQuery1.FieldByName('TEngMon_Absence').AsString;
edNormalOT.Text := ADOQuery1.FieldByName('TEngMon_NormalOT' ).AsString;
没有问题的!
很土 2003-10-20
  • 打赏
  • 举报
回复
ADO 的 AsFloat 应该没有问题, 除非是字段值为 Null;

问题可能出在 FormatFloat 的格式上, 你试试 FormatFloat('#.00', m_dfNormal0T);

m_dfNormal0T 是什么类型的?

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧