在存储过程里return -1,在DELPHI里如何取得这个值??????

解决方案 »

  1.   

    DM1.ClientDataSet1.Close;
      dm1.ClientDataSet1.CommandText:='';
      if ComboBox2.Text='买入' then
       dm1.ClientDataSet1.CommandText:='Execute Sp_buy :_Account,:_Stock_Code,:_Price,:_Amount,:@state output'
      else
      if ComboBox2.Text='卖出' then   dm1.ClientDataSet1.CommandText:='Execute Sp_sale :_Account,:_Stock_Code,:_Price,:_Amount,:@state output';  dm1.ClientDataSet1.Params.ParamByName('_Account').value:=Main_Form.account;
      dm1.ClientDataSet1.Params.ParamByName('_Stock_Code').value:=Stock_InterCode[ComboBox1.ItemIndex];
      dm1.ClientDataSet1.Params.ParamByName('_Price').value:=edit2.Text;
      dm1.ClientDataSet1.Params.ParamByName('_Amount').value:=edit1.Text;
      dm1.ClientDataSet1.Params.ParamByName('@state').ParamType:=ptoutput;
      dm1.ClientDataSet1.Params.ParamByName('@state').DataType:=ftinteger;  DM1.ClientDataSet1.Execute;  if dm1.ClientDataSet1.Params.ParamByName('@state').Value=1 then
       showmessage('可支配资金不足,买单提交失败!')
      else  if dm1.ClientDataSet1.Params.ParamByName('@state').Value=2 then
        showmessage('股票可支配量不足,卖单提交失败!')
      else
       showmessage('提交成功!');
    end;
      

  2.   

    我没有定义@State,只是直接用return返回一个值,可以取得到吗?????
      

  3.   

    在存储过程中定义变量时加入output即:
    @state int output
    并对其赋值即可
      

  4.   

    直接用return返回一个值,可以取得到吗?????
      

  5.   

    没有定义@State,只是直接用return返回一个值,可以取得到吗?????