各位先辈： 我想把SQL SERVER中查询的数据赋值给adoquery's Parameter，不知是否可行？ 我的代码是： with adoquery1 do begin close; sql.Clear; sql.Add('declare @tt decimal(15,2)'); sql.Add('select @tt=max(ivc_amt) from apmt'); sql.Add('set big=@tt'); edit2.text:=ADOQUERY1.Parameters.ParamValues['big']; open end; 在执行时出现错误： 谁有解决办法，可以SHOW一SHOW

如果你不用StoredProcure的話，是否可用下面的方法

with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add('select max(ivc_amt) ivc_amt from apmt');
  Active := True;
  Edit2.Text := FloatToStr(ADOQuery1.FieldByName('ivc_amt').Value);
end

Ian

I630521： 谢谢你！ 你的方法是可行的。但apmt中没有数据时，运行就有错误出现： 请问是否有更好的办法？ 多谢各位！

不好意思，沒注意到！

with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add('select max(ivc_amt) ivc_amt from apmt');
  Active := True;
  if not ADOQuery1.FieldByName('ivc_amt').IsNull then
    Edit2.Text := FloatToStr(ADOQuery1.FieldByName('ivc_amt').Value)
  else
    Edit2.Text := '';
end

Ian

Hi l630521 您好插個花:

with ADOQuery1 do
begin
  Close;
  SQL.Clear;
  SQL.Add('select max(ivc_amt) ivc_amt from apmt');
  Active := True;
  Edit2.Text := ADOQuery1.FieldByName('ivc_amt').AsString;
end
強制轉型

我不是高手, 高手是正在銀幕前微笑的人. 發表人 - miles 於 2004/07/09 11:45:11

------


我不是高手, 高手是正在銀幕前微笑的人.

Wscken & I630521: 谢谢你们！ 问题完全解决了。