Delphi中TADOConnection控件和TADOStoredProc控件的使用调用存储过程
来源:互联网 发布:js姓名正则表达式 编辑:程序博客网 时间:2024/05/21 08:39
一、我们在Delphi中有时候要访问数据库操作调用存储过程来实现对数据库的增删改等操作。
那么在Delphi中如何使用TADOStoredProc控件呢?
之前没用过也是不知道该怎么写代码,在网上也查了很多例子,但是都没有实现,下面将自己
实现好的代码贴出来,希望对初学者有帮助。
向界面拖控件TADOConnection 和TADOStroceProc控件一次命名为adoCnt和adosp;
procedure TForm1.btnupdateClick(Sender: TObject);var return: string;begin adosp.Close; adosp.Parameters.Clear; adosp.ProcedureName:= 'history_qq_recorde';//存储过程名称 // Added by Administrator 2013-9-18 11:20:07 //参数1: 是存储过程函数的形参(表里面的字段名) //参数2: 是数据类型(注:是一个宏定义,可以按照ctrl点击进去查看) //参数3: 是输入输出方向(注:是一个宏定义同上) //参数4: 是数据类型的大小 //参数5: 是宏定义类型。 try adosp.Parameters.CreateParameter('begindate_in', ftString, pdInput, 20, fgUnassigned);//传入参数(数字代表长度) adosp.Parameters.CreateParameter('enddate_in', ftString, pdInput, 20, fgUnassigned); //传入参数 adosp.Parameters.CreateParameter('RESULT', ftInteger, pdoutput, 4, fgUnassigned); //返回值 //为参数赋值 adosp.Parameters[0].Value := '20200101'; adosp.Parameters[1].Value := '20200101'; adosp.Parameters[2].Value := 0; adosp.ExecProc; //执行 return :=adosp.Parameters.ParamByName('RESULT').Value;//返回结果值 ShowMessage(return); //ShowMessage(string(adosp.Parameters.ParamByName('RESULT').Value)); except ShowMessage('执行存储过程失败!'); adoCnt.Close; Exit; end;end;
0 0
- Delphi中TADOConnection控件和TADOStoredProc控件的使用调用存储过程
- Delphi 使用TADOStoredProc执行存储过程
- 存储过程和分页控件的使用
- delphi中调用oracle的存储过程
- delphi 中调用存储过程
- Delphi 调用控件的过程,初学者都想知道
- Delphi 中使用 VB 开发的控件
- Delphi中dxTreelist控件的使用
- Delphi中MsComm控件的安装使用
- Package之Delphi调用(TADOStoredProc)
- Delphi中基本控件之SaveDialog控件的使用总结
- Delphi中基本控件之TRichEdit控件的使用总结
- Delphi中如何使用TEdit控件和TListBox控件组合使用达到TComboBox控件一样的效果呢?
- Delphi中调用oracle的存储过程返回数据集
- Delphi中如何调用存储过程?
- delphi 中如何调用sql 存储过程
- Delphi使用AdoQuery调用Mysql存储过程
- asp.net分页控件AspNetPager的使用,使用传统分页和存储过程分页
- [计数dp] ural 1114. Boxes
- 2014找工作总结-机会往往留给有准备的人
- Link 标签 rel="Stylesheet"?
- 让页面回到最顶部和最底部
- select()函数以及FD_ZERO、FD_SET、FD_CLR、FD_ISSET
- Delphi中TADOConnection控件和TADOStoredProc控件的使用调用存储过程
- dxgrid cxGrid使用
- 动态修改CDockablePane上面的工具条CMFCToolBar的信息提示(续1)
- 一种隐藏在JPG图片EXIF中的后门
- c语言下的通用数据库接口(之sqlite消化,模拟c#,java的反射)
- 配置 MDM Provisioning Profile
- ExtJs实践——xtype名称与控件对应
- [算法] 定义一个函数,删除字符串中所有重复出现的字符。
- 对linux 0.11版本中switch_to()的理解