devart unidac 存储过程 (输入、输出参数)
博客专区 > vga 的博客 > 博客详情
devart unidac 存储过程 (输入、输出参数)
vga 发表于3年前
devart unidac 存储过程 (输入、输出参数)
  • 发表于 3年前
  • 阅读 49
  • 收藏 0
  • 点赞 0
  • 评论 1

【腾讯云】如何购买服务器最划算?>>>   

摘要: devart unidac 存储过程 (输入、输出参数)

procedure TForm2.btn1Click(Sender: TObject);

var

  usp: TUniStoredProc;

begin

  usp := TUniStoredProc.Create(nil);

  usp.Connection := UniConnection1;

  usp.StoredProcName := 'GetAImage_ID';

  usp.PrepareSQL();

  usp.ParamByName('pUSER_ID').AsInteger := 1024;

  usp.ParamByName('pProcess').AsInteger := 3;

  usp.ParamByName('pSteps').AsString := '1';

  usp.ParamByName('pBatch_ID').AsInteger := 1;

  usp.ParamByName('pFrom_ID').AsInteger := 1;

  usp.ParamByName('pTo_ID').AsInteger := 1;


  usp.ExecProc;


  Caption := usp.ParamByName('pSteps').AsString;  // 输出参数

  usp.Free;

end;


共有 人打赏支持
粉丝 18
博文 315
码字总数 19199
评论 (1)
vga
实际测试表明 这样的效率 不如 直接用查询语句
×
vga
如果觉得我的文章对您有用,请随意打赏。您的支持将鼓励我继续创作!
* 金额(元)
¥1 ¥5 ¥10 ¥20 其他金额
打赏人
留言
* 支付类型
微信扫码支付
打赏金额:
已支付成功
打赏金额: