我用delphi7,执行到SQL.Add();就卡住,也不报错。比较诡异,一直没问题,突然出现这个。求解释!代码如下
withqryBasedobeginClose;SQL.Clear;SQL.Add('select*fromPDSHGZB_VwhereFDIDin('+FDstr+')...
with qryBase do
begin
Close;
SQL.Clear;
SQL.Add('select * from PDSHGZB_V where FDID in('+FDstr+') and PDRQ >= :begin and PDRQ <=:end ');
Parameters.ParamByName('begin').Value:= Trunc(dtStart.Date);
Parameters.ParamByName('end').Value:= Trunc(dtEnd.Date);
Open;
end;
如何要避免这种情况,代码继续运行,很简单,直接在sql里把所有参数设置好就行。我只是奇怪,为什么今天delphi7 ADOQuery 的SQL.Add()中用:begin 和:end这个的参数,程序就在这里卡住,不继续下走,也不报错。 展开
begin
Close;
SQL.Clear;
SQL.Add('select * from PDSHGZB_V where FDID in('+FDstr+') and PDRQ >= :begin and PDRQ <=:end ');
Parameters.ParamByName('begin').Value:= Trunc(dtStart.Date);
Parameters.ParamByName('end').Value:= Trunc(dtEnd.Date);
Open;
end;
如何要避免这种情况,代码继续运行,很简单,直接在sql里把所有参数设置好就行。我只是奇怪,为什么今天delphi7 ADOQuery 的SQL.Add()中用:begin 和:end这个的参数,程序就在这里卡住,不继续下走,也不报错。 展开
6个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询