代码如下:
  QueryMeasureIP.close;
  QueryMeasureIP.UnPrepare;
  QueryMeasureIP.sql.clear;
  QueryMeasureIp.sql.Add('declare @o_flag int ');
  QueryMeasureIP.sql.add('Exec p_measure_ip :type,:measure_id,:measure_ip,:port,:area_name,:bureau_name,:o_flag');
  QueryMeasureIP.ParambyName('type').value:='0';
  QueryMeasureIP.ParambyName('measure_id').value:='';
  QueryMeasureIP.ParambyName('measure_ip').value:='';
  QueryMeasureIP.ParambyName('port').value:=0;
  QueryMeasureIP.ParambyName('bureau_name').value:= CmbBureauName.Text;
  QueryMeasureIP.ParambyName('area_name').value:= CmbAreaName.Text;
  QueryMeasureIP.ParambyName('o_flag').value:=0;
  QueryMeasureIp.Prepared:=true;
  QueryMeasureIp.sql.Add('output');
  QueryMeasureIp.sql.Add('select @o_flag;');
  QueryMeasureIP.open;
  当两个文本的动态参数为空时,会返回表里的全部数据,但是为什么那两个动态参数不为空时,返回的是空表,把SQL语句在SQL客户端运行是正常的,使用的是ODBC连接,Delphi5