strDeleteGoodsByGoodsNum = 'delete from Goods where G_inid=:INID and G_id in (select min(G_id) from Goods where G_inid=:INID group by G_inid)';AnAdoQuery.ConnectionString := ConnectionStr;
AnAdoQuery.DisableControls;
try
AnAdoQuery.Close;
AnAdoQuery.SQL.Clear;
AnAdoQuery.SQL.Add(Trim(strDeleteGoodsByGoodsNum));
AnAdoQuery.Parameters.ParamByName('INID').Value := GinID;
//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^有问题^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^//
for i:= 1 to j do
AnAdoQuery.ExecSQL;
//………………………………………………………………//
showmessage(IntToStr(j));
except
Application.MessageBox('未知错误','错误',MB_OK);
end;
AnAdoQuery.EnableControls;错误信息:
parameter对象被不正确的定义,提供了不一致或不完整的信息
AnAdoQuery.DisableControls;
try
AnAdoQuery.Close;
AnAdoQuery.SQL.Clear;
AnAdoQuery.SQL.Add(Trim(strDeleteGoodsByGoodsNum));
AnAdoQuery.Parameters.ParamByName('INID').Value := GinID;
//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^有问题^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^//
for i:= 1 to j do
AnAdoQuery.ExecSQL;
//………………………………………………………………//
showmessage(IntToStr(j));
except
Application.MessageBox('未知错误','错误',MB_OK);
end;
AnAdoQuery.EnableControls;错误信息:
parameter对象被不正确的定义,提供了不一致或不完整的信息
解决方案 »
- 此次事件D版被泄露知名ID
- 返回TADOQuery的结果
- ★求RGB转换为LAB的算法,200分★
- 因转行,特转让IC卡考勤机一台,另还有相应通讯接口源码和一套完成了大部分的人事考勤系统(基于Delphi7)!
- 如何在DELPHI窗口中自动创建数据库及别名和表,数据库的名称是根据edit.txt自己取的。
- adoquery的问题
- 大家,对delphi往excel写报表,有什么好的操作方法?
- DELPHI教程
- SETWINDOWSPOS为什么不能使我的FORM窗体为于所有窗体的最底层?高手在哪?
- ~~~~~~~~~~~~~~~~~~to awen800(我本楚狂人) 解决问题在送100~~~~~~~~~~~~~~~~~~
- 请关照!谢谢!
- =======热烈庆祝!!我的帖子被删!!!我的性欲降低!!!!!==== 分给性欲小于100的!!!!!========
AnAdoQuery.Parameters.ParamByName('INID').Value := GinID;
类型不配。。 AnAdoQuery.Parameters.ParamByName('INID').asguid := GinID;//好像是。。
try
AnAdoQuery.Close;
AnAdoQuery.SQL.Clear;
AnAdoQuery.SQL.Add(Trim(strDeleteGoodsByGoodsNum));
for i:= 1 to j do
AnAdoQuery.ExecSQL;
showmessage(IntToStr(j));
except
Application.MessageBox('未知错误','错误',MB_OK);
end;
这样绝对没有问题。
strDeleteGoodsByGoodsNum = 'delete from Goods where G_inid=:INID1 and G_id in (select min(G_id) from Goods where G_inid=:INID2 group by G_inid)';AnAdoQuery.Parameters.ParamByName('INID1').Value := GinID;
AnAdoQuery.Parameters.ParamByName('INID2').Value := GinID;
必须这样。(Delphi的问题)
另外,tadoquery有一个设置参数的属性设为true,好像是"*param"