我用的是fr252,请问在Text editor(既insert rectangle object组件)中如何写代码?
比如:
在Text editor窗口分上下两个子窗口,我在上面的窗口中写入:[hsl]
下下面的窗口中写入:
begin
if ADOQuery1.DF_GF0='' then
qfje:='0'
else
qfje:=ADOQuery1.DF_GF0;
hsl:=ADOQuery1.DF_GF0/(qfje+ADOQuery1.DF_GF0)*100;
end这样程序运行时报错如下:
an error occured during calculating
[hsl]
Report:frReport1
Objec:Memo22
could not convert variant of type(String) into type(Double)
请问这段代码该怎么写?
比如:
在Text editor窗口分上下两个子窗口,我在上面的窗口中写入:[hsl]
下下面的窗口中写入:
begin
if ADOQuery1.DF_GF0='' then
qfje:='0'
else
qfje:=ADOQuery1.DF_GF0;
hsl:=ADOQuery1.DF_GF0/(qfje+ADOQuery1.DF_GF0)*100;
end这样程序运行时报错如下:
an error occured during calculating
[hsl]
Report:frReport1
Objec:Memo22
could not convert variant of type(String) into type(Double)
请问这段代码该怎么写?
解决方案 »
- Delphi的Flash控件怎么响应单击事件啊
- 这个什么错误啊!!(546): Identifier redeclared: 'Tfrm_gate.SpeedButton2Click'
- 如何把OleVariant数据保存到文件中???
- 多线程为何总提示我缺.RES文件了?
- 如何在新弹出窗口中显示原窗口中的数据?
- 如何使用WriteProcessMemory函数设置EDIT框中的内容
- 超简单的问题~~~
- Animate控件的大小
- 请问怎样控制LISTVIEW中的图标之间的间隙?
- 有没有利用TREEVIEW控件将数据库中的数据按照 ID\PID 关系显示的实例
- 一个很基础的小问题,请各位帮忙了!
- 请教,一个连接数据库的奇怪问题?
if [ADOQuery1.DF_GF0]='' then
qfje:='0'
else
qfje:=[ADOQuery1.DF_GF0];
hsl:=[ADOQuery1.DF_GF0]/(qfje+[ADOQuery1.DF_GF0])*100;
end少了括号
我按你说的加上 括号后还是报同样的错误。
改成[ADOQuery1."DF_GF0"]再试试
DF_GF0 是字段,但加双引号后还是报同样的错误。
试试