delphi使用存储过程
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使用存储过程相关推荐
- delphi 调用带有返回值的sql SERver 2008 存储过程
存储过程内容如下: SET ANSI_NULLS ON GO SET QUOTED_IDENTIFIER ON GO -- ====================================== ...
- delphi 执行长时间存储过程 显示进度_项目管理_十大管理体系之「项目进度管理」知识整理及心得分享...
项目进度管理 项目进度管理在项目是项目管理三大要素之一,在项目管理中占有非常重要的地位.往往很多项目要求进度节点是一个固定期限,无法修改,所以进度把控就显得尤为重要.什么是进度管理,在你写projec ...
- Delphi开发中增删改查操作以及存储过程的调用方式
1.SQL实现增删改 tryif not DTM.Conn.InTransaction thenDTM.Conn.StartTransaction;//插入制式机型Init;A('insert int ...
- DELPHI存储过程调用
网上对该问题的帖子很多,但是经常不是很全面,笔者在使用时也遇到了很多实际问题,比如参数不存在啊.类型没有引用啊等等.下面我尽量细致地来通过例子实现一下,如果还有不正确的地方,希望得到高手指点,有兴趣的 ...
- delphi通过odac调用oracle 过程参数为数组,delphi,odac执行存储过程的正确和简单方法...
--插入记录 function ft_addTable(PTableName string, PTableId out integer) return integer; 错误的方法 var OraSt ...
- SQLStoredProc调用数据库存储过程
delphi 中用SQLStoredProc控件可调用数据存储过程. 下图为oracle 11g中写的存储过程IN表示输入参数,OUT表示输出参数,也可能用IN OUT表出输入输出参数.这里存储过程名 ...
- 详解MariaDB数据库的存储过程
1.什么是存储过程 很多时候,SQL语句都是针对一个或多个表的单条语句.但是也有时候有的查询语句需要进行多次联表查询才能完成,此时就需要用到存储过程了. 存储过程(Stored Procedure)是 ...
- Delphi 原生ADO(二)
我发现很多朋友在开发数据库时都使用 Delphi 自带的 ADO 组 件 或 Diamond ADO,其实在 Delphi 中使用原生 ADO 接口也是十分方便和有效的.我使用原生 ADO 开发项目已 ...
- Delphi:ClientDataset+TDataSetProvider的数据保存问题
看到一篇介绍ClientDataSet和TDataSetProvider,非常精彩,特此保存. ==================================================== ...
最新文章
- 何恺明团队新作:只用普通ViT,不做分层设计也能搞定目标检测
- 使用Vue时localhost:8080中localhost换成ip地址后无法显示页面的问题
- 1119 Pre- and Post-order Traversals (30 分)【难度: 难 / 知识点: 树的构建】
- C++中随机函数rand()和srand()的用法
- C语言面向对象编程(三):虚函数与多态
- 知识点总结(基础篇)
- QT的QMenuBar类的使用
- 2018-2019-2 20189215 《网络攻防技术》第九周作业
- MVC如何添加Model
- javaone_JavaOne 2012:向上,向上和向外:使用Akka扩展软件
- 干货分享|安全测试起航之旅 1
- 【clickhouse】clickhouse Exception: Table is in readonly mode
- 智乃的树旋转(easy version)(思维+暴力)
- mencoder使用
- XCode9 拖入文件 不自动添加 compile sources
- 用C语言如何编程一道选择题,使用C语言编写一道简单的编程题
- 自己制作一个小程序需要多少钱
- Windows任务管理器命令行查进程
- 2020测试工具索引
- OpenCV Python 人脸识别签到系统(超详细注释)
热门文章
- js导入,导出exel表格
- Maven 中央仓库地址
- boost::function和boost:bind取代虚函数
- Java8 lambda支持
- DHCP_SNOOPING_ DAI_IPSG实验
- 5_jfoenix_运行jfoenix官方演示,切换片段,部署
- 通过DataWorks数据集成归档日志服务数据至MaxCompute进行离线分析
- can not open file Permission denied at securecrt_linux_crack.pl line 57
- 关于宁波一些眼科流传的营养针
- Flink运行出现Assigned key must not be null