with adoProc do
  begin
    ProcedureName := 'HOCRM_SCF1_Update';
    Parameters.Clear;
    Parameters.CreateParameter('P1', ftstring, pdInput, 4000,thexml); //   用户输入参数
    Parameters.CreateParameter('SCF01', ftstring, pdOutput, 20, scf01);      // 存储过程返回参数
    Parameters.CreateParameter('SCF04', ftstring, pdOutput, 20, SCF04);      // 存储过程返回参数
    Prepared := True;
    ExecProc;
    SCF01 := vartostr(Parameters.ParamByName('SCF01').Value) ;
    SCF04 := vartostr(Parameters.ParamByName('SCF04').Value) ;
  end;

------------------------------------------------------------------------

with sp1 do
  begin
    Close;
    ProcedureName:='sp_zyyf_saveoneffckd2';
    Parameters.Refresh;
    Parameters.ParamByName('@kh').Value:=kh;
    Parameters.ParamByName('@zyhstr').Value:=zyhstr;
    Parameters.ParamByName('@rq').Value:=rq;
    Parameters.ParamByName('@czbh').Value:=czbh;
    Parameters.ParamByName('@cxsc').Value:=cxsc;
    Parameters.ParamByName('@pzh').Value:=pzh;
    ExecProc;
    pzh:= Parameters.ParamByName('@pzh').Value;
  end;

本文转自鹅倌51CTO博客,原文链接:http://blog.51cto.com/kaixinbuliao/1786924 ,如需转载请自行联系原作者

delphi使用存储过程相关推荐

  1. delphi 调用带有返回值的sql SERver 2008 存储过程

    存储过程内容如下: SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO -- ====================================== ...

  2. delphi 执行长时间存储过程 显示进度_项目管理_十大管理体系之「项目进度管理」知识整理及心得分享...

    项目进度管理 项目进度管理在项目是项目管理三大要素之一,在项目管理中占有非常重要的地位.往往很多项目要求进度节点是一个固定期限,无法修改,所以进度把控就显得尤为重要.什么是进度管理,在你写projec ...

  3. Delphi开发中增删改查操作以及存储过程的调用方式

    1.SQL实现增删改 tryif not DTM.Conn.InTransaction thenDTM.Conn.StartTransaction;//插入制式机型Init;A('insert int ...

  4. DELPHI存储过程调用

    网上对该问题的帖子很多,但是经常不是很全面,笔者在使用时也遇到了很多实际问题,比如参数不存在啊.类型没有引用啊等等.下面我尽量细致地来通过例子实现一下,如果还有不正确的地方,希望得到高手指点,有兴趣的 ...

  5. delphi通过odac调用oracle 过程参数为数组,delphi,odac执行存储过程的正确和简单方法...

    --插入记录 function ft_addTable(PTableName string, PTableId out integer) return integer; 错误的方法 var OraSt ...

  6. SQLStoredProc调用数据库存储过程

    delphi 中用SQLStoredProc控件可调用数据存储过程. 下图为oracle 11g中写的存储过程IN表示输入参数,OUT表示输出参数,也可能用IN OUT表出输入输出参数.这里存储过程名 ...

  7. 详解MariaDB数据库的存储过程

    1.什么是存储过程 很多时候,SQL语句都是针对一个或多个表的单条语句.但是也有时候有的查询语句需要进行多次联表查询才能完成,此时就需要用到存储过程了. 存储过程(Stored Procedure)是 ...

  8. Delphi 原生ADO(二)

    我发现很多朋友在开发数据库时都使用 Delphi 自带的 ADO 组 件 或 Diamond ADO,其实在 Delphi 中使用原生 ADO 接口也是十分方便和有效的.我使用原生 ADO 开发项目已 ...

  9. Delphi:ClientDataset+TDataSetProvider的数据保存问题

    看到一篇介绍ClientDataSet和TDataSetProvider,非常精彩,特此保存. ==================================================== ...

最新文章

  1. 何恺明团队新作:只用普通ViT,不做分层设计也能搞定目标检测
  2. 使用Vue时localhost:8080中localhost换成ip地址后无法显示页面的问题
  3. 1119 Pre- and Post-order Traversals (30 分)【难度: 难 / 知识点: 树的构建】
  4. C++中随机函数rand()和srand()的用法
  5. C语言面向对象编程(三):虚函数与多态
  6. 知识点总结(基础篇)
  7. QT的QMenuBar类的使用
  8. 2018-2019-2 20189215 《网络攻防技术》第九周作业
  9. MVC如何添加Model
  10. javaone_JavaOne 2012:向上,向上和向外:使用Akka扩展软件
  11. 干货分享|安全测试起航之旅 1
  12. 【clickhouse】clickhouse Exception: Table is in readonly mode
  13. 智乃的树旋转(easy version)(思维+暴力)
  14. mencoder使用
  15. XCode9 拖入文件 不自动添加 compile sources
  16. 用C语言如何编程一道选择题,使用C语言编写一道简单的编程题
  17. 自己制作一个小程序需要多少钱
  18. Windows任务管理器命令行查进程
  19. 2020测试工具索引
  20. OpenCV Python 人脸识别签到系统(超详细注释)

热门文章

  1. js导入,导出exel表格
  2. Maven 中央仓库地址
  3. boost::function和boost:bind取代虚函数
  4. Java8 lambda支持
  5. DHCP_SNOOPING_ DAI_IPSG实验
  6. 5_jfoenix_运行jfoenix官方演示,切换片段,部署
  7. 通过DataWorks数据集成归档日志服务数据至MaxCompute进行离线分析
  8. can not open file Permission denied at securecrt_linux_crack.pl line 57
  9. 关于宁波一些眼科流传的营养针
  10. Flink运行出现Assigned key must not be null