第8章 存储过程 《数据库应用技术 知识——Delphi应用系统开发》课件 电子教案.ppt

的Connection选择ADOConnection1；DataSource组件 （Name属性设DataSource1） 的DataSet属性选择ADOStoredProc1；DBGrid组件（Name属性设为DBGrid1）的 DataSource属性选择DataSource1。这样各组件之间已经联系起来了，而且与数据库的 联系也已经建立。 第三步：在Object Inspector中单击ADOStoredProc1的ProcedureName属性，从列表 中选择已经创建的存储过程conproc，其实现代码如下。 CREATE PROCEDURE conproc AS select c_concode,c_people,f_area,d_jiaofangdate from con_relation where c_concode like 0405% //查看合同信息表中2004年5月份的合同中部分信息 第四步：CheckBox组件默认名为CheckBox1，默认Caption属性为CheckBox，添加 OnClick事件代码，可用于根据复选框的状态设置是否执行存储过程，代码如下。 procedure TForm1.CheckBox1Click(Sender: TObject); begin with ADOStoredProc1 do begin //根据复选框的状态设置是否执行存储过程 active:=CheckBox1.Checked ; if active then //复选框选中则设置数据源 DataSource1.DataSet :=ADOStoredProc1; end; end; Button组件名为Button1，Caption属性为“执行存储过程”，添加OnClick事件代码， 可以通过ADOQuery组件来使用存储过程，代码如下。 procedure TForm1.Button1Click(Sender: TObject); begin with ADOQuery1 do begin if active then close; SQL.clear; SQL.Add(Execute conproc;1); open; if active then DataSource1.DataSet :=ADOQuery1; end; end; 图8-6 调用存储过程结果 第五步：执行程序，当选中CheckBox1复选框时将显示存储过程的执行结果，当取消选中CheckBox1复选框时，将不显示任何的数据。单击“”按钮，也可以执行存储过程，显示界面如图8-6所示。 8.4 存储过程的参数 与存储过程相关的参数共有四种，即输入参数、输出参数、输入/输出参数和状态结果参数。在下面的章节里将详细介绍参数的种类以及怎样访问和创建参数。 8.4.1 参数类型 在执行数据库服务器上的存储过程时，应用程序往往需要和存储过程传递参数来交换信息。存储过程的参数大致分为四种类型，如表8-4所示。 表8-4 存储过程的参数 参数类型 含义 输入参数 需要应用程序向存储过程传递 输出参数 由存储过程向应用程序传递 输入/输出参数 应用程序和存储过程可互相传递 状态结果参数 由存储过程向应用程序传递的有关错误和状态的信息 存储过程具体使用哪些参数，和数据库服务器有关。像MS_SQL数据库服务器和Sybase数据库服务器上的存储过程一般会返回状态结果参数，而InterBase数据库服务器不支持返回状态结果参数。 存储过程的参数可通过StoredProc 组件的Params 属性来访问，它是Tparam对象。 如果在程序的设计期间用StoredProc 组件的StoredProcName 属性指定了相应的存储过程名后，系统会自动为每个参数创建一个Tparam对象，并自动加到Params 属性当中。 有些存储过程除了返回输出参数和状态结果参数外，还返回一个结果数据集，应用程序可以浏览数据集中的记录，但是必须分别来处理输出参数和结果数据集。 下面介绍上述四种参数的使用。 1．使用输入参数 应用程序使用输入参数向存储过程传递参数，这些数据实际上是传递给存储过程的SQL 语句。如果一个存储过程需要传递输入参数的话，就必须在该存储过程执行前给输入参数赋值。 如果使用 Query组件来执行存储过程，对于InterBase数据库服务器