我问大家一个问题,我在做一个过磅的程序。获取过磅时的重量的方法是从另一台服务器的表中取的。那个服务器的数是一个软件实时更新的。
等到车停好后,过磅的仪表对应的数字不变化时我就开始取那个存过磅数的表的当前数。问题是这样的,有时取的数是正确的,有时只会出现“0”,但仪器上显示不是这个数。不知道为会什么。
请大家帮我想想这是怎么回事或给我一个解决问题的思路,万分感谢!
主要取数据代码如下:
stj := ' where D_CBANGNAME=''' + Bid + ''''; //bid指取表中对应几号磅的值
sql := 'select D_QUSHU from BENGID' + stj;
ADO_comm.Close;
ADO_comm.sql.Text := sql;
ADO_comm.Open; //取出重量
ed_mz.Text := formatfloat('0.##', strtofloat(ADO_comm.FieldByName('D_QUSHU').AsString) / 1000); //显示在ed_mz上,精确两位小数
等到车停好后,过磅的仪表对应的数字不变化时我就开始取那个存过磅数的表的当前数。问题是这样的,有时取的数是正确的,有时只会出现“0”,但仪器上显示不是这个数。不知道为会什么。
请大家帮我想想这是怎么回事或给我一个解决问题的思路,万分感谢!
主要取数据代码如下:
stj := ' where D_CBANGNAME=''' + Bid + ''''; //bid指取表中对应几号磅的值
sql := 'select D_QUSHU from BENGID' + stj;
ADO_comm.Close;
ADO_comm.sql.Text := sql;
ADO_comm.Open; //取出重量
ed_mz.Text := formatfloat('0.##', strtofloat(ADO_comm.FieldByName('D_QUSHU').AsString) / 1000); //显示在ed_mz上,精确两位小数
解决方案 »
- SetFileTime修改文件时间,修改后的结果与我传入的不同
- 散分!!!!爽
- 求一个登陆用户名
- 请教各位大虾,我的OCX控件运行出现如下提示,清一下缓存就好,是用ASP调用OCX控件
- 为什么打印机不打报表,而是空走纸呀
- 哪里有大富翁离線BBS(delphibbs.chm文件)下載?怎麼從WWW.DELPHIBBS.COM上下載281M的大富翁离線BBS不能使用!!!
- 如何在程序运行中,从一图标文件读入图标,改变窗体图标?
- 图像文件较大时,存入数据库后,再读出会失真,甚至一团黑
- quickReport的一个问题
- CopyFile函数可以把本机上的文件拷贝到另外一台机器上吗?
- Delphi中怎样获取图片的属性
- 這句錯在哪里????String(ActiveControl.ClassName())<>'TDBMemo'
记得这个问题你在大富翁上也提过了吧
一样没结