如何通过存储过程把SQL的数据传递到DELPHI中?如何用delphi截获SQL的出错信息?

解决方案 »

  1.   

    ado下:
    try
        result := ADOStoredProc1.Parameters.ParamByName('res').Value;
      except
         On E:exception do
         ShowMessage(E.Message);
      end;
      

  2.   

    BDE下:
    try
        result := StoredProc1.ParamByName('res').Value;
      except
         On E:exception do
         ShowMessage(E.Message);
      end;
    //res为存储过程里类型为out的参数;否则无法传回值
      

  3.   

    adocheckroute.Close;
        adocheckroute.ParamByName('aaa').AsString :=www;
        adocheckroute.ParamByName('bbb').AsString :=xxx;
        adocheckroute.ParamByName('ccc').AsString :=yyy ;
        adocheckroute.Prepare ;
        adocheckroute.ExecProc ;