我有一个数据库是KUCUN.DB,字段分别为PRONAME(类型A),KUCUNNUM(类型N),我想把另一个库的数据进行计算,将结果保存到数据库里。代码如下:
但是执行是会报“type mismatch in expression"NewNum := KuCunQuery.Fields[1].Value+ChuRuKuQuery.Fields[1].Value-ChuRuKuQuery.Fields[2].Value;
try
KuCunQuery.Close;
KuCunQuery.SQL.Clear;
KuCunQuery.Params.Clear;
KuCunQuery.SQL.Add('update kucun set KuCunNum=:pNum');
KuCunQuery.Prepare;
KuCunQuery.ParamByName('pNum').asinteger := newnum;
KuCunQuery.ExecSQL;
except
end;但是我用如下代码又可以执行:
try
KuCunQuery.Close;
KuCunQuery.SQL.Clear;
KuCunQuery.Params.Clear;
KuCunQuery.SQL.Add('update kucun set KuCunNum=12');
KuCunQuery.ExecSQL;
except
end;请高手帮忙解决一下
但是执行是会报“type mismatch in expression"NewNum := KuCunQuery.Fields[1].Value+ChuRuKuQuery.Fields[1].Value-ChuRuKuQuery.Fields[2].Value;
try
KuCunQuery.Close;
KuCunQuery.SQL.Clear;
KuCunQuery.Params.Clear;
KuCunQuery.SQL.Add('update kucun set KuCunNum=:pNum');
KuCunQuery.Prepare;
KuCunQuery.ParamByName('pNum').asinteger := newnum;
KuCunQuery.ExecSQL;
except
end;但是我用如下代码又可以执行:
try
KuCunQuery.Close;
KuCunQuery.SQL.Clear;
KuCunQuery.Params.Clear;
KuCunQuery.SQL.Add('update kucun set KuCunNum=12');
KuCunQuery.ExecSQL;
except
end;请高手帮忙解决一下
解决方案 »
- 怎么计算出两个日期段之间的所有日期,分不多,不好意思
- delphi中我想实现对窗体按钮权限的控制,该如何做?
- 高分挑战绝顶高手,如何实现象QQ上的远程协助功能?
- 一个关于单元改写的问题
- 拨号连接设置问题,如何修改拨号连接的常规选项-->配置-->去掉启用硬件流控制属性,用程序实现。急!急!急!急!急!急!急!急!
- 关于删除多条记录的问题,谢谢大家
- 用Delphi连SQLServer为什么为IP地址连常超时,而用服务器名却没事?
- 我想判断三列值的比较判断条件后的背景颜色变化?DBGrid!!!!!
- DELPHI中SQL的通配符查询!
- 关于String类型的问题?(不够就加分)
- delphi数据库数据导入导出问题
- 江湖救急!谁有FLAT 控件组 发个
2、newnum;按照你写的意思,这个必须为整型;
3、
“KuCunQuery.SQL.Clear;
KuCunQuery.Params.Clear;
KuCunQuery.SQL.Add('update kucun set KuCunNum=:pNum');
KuCunQuery.Prepare;
KuCunQuery.ParamByName('pNum').asinteger := newnum; ”
为什么要浪费这么多代码啊?
KuCunQuery.SQL.text:='update kucun set KuCunNum='+inttostr(newnum);
这么一句话,不就OK了吗?