《Delphi程序设计基础》全套教学课件.ppt

10.2 使用存储过程 组件名 属 性 属 性 值 说 明 ADOConnection1 ConnectionString 使用ConnectionString设置对话框设置该 属性，建立到数据库dbdemos.mdb的连 接。 ADOQuery1 Connection ADOConnection1 指定使用的数据连接组件。 DataSource1 DataSet ADOQuery1 指定使用的数据集。 DBGrid1 DataSource DataSource1 为表格指定数据源。 ReadOnly True 设置为只读 Button1 Caption 新建存储过程、 修改存储过程、 删除存储过程 Button2 Caption 执行存储过程 Memo1 Lines 为空 Label1 Caption 输入SQL命令 Label2 Caption 显示存储过程执 行结果 表10-3 各组件属性设置 10.2 使用存储过程 表10-3 各组件属性设置 10.2 使用存储过程 2. 使用和管理存储过程的SQL命令 （1） 创建存储过程 创建存储过程的简单语法如下： CREATE PROC[EDURE] procedure_name [;number] [{@parameter data_type} [VARYING] [=default] [OUTPUT] ][,...n] [WITH ????{RECOMPILE | ENCRYPTION | RECOMPILE,ENCRYPTION} ] [FOR REPLICATION] AS sql_statement [ ...n ] 10.2 使用存储过程 （2） 执行存储过程 　　直接执行存储过程可以使用EXECUTE命令来执行。在Memo1的编辑框中输入： EXEC oakland_authors 或 EXECUTE oakland_authors 　　点击按钮“执行存储过程”以执行存储过程oakland_authors，结果将显示在DBGrid1表格中。 （3） 修改存储过程 存储过程可以根据用户的要求或者基表定义的改变而改变。使用ALTER PROCEDURE语句可以更改先前通过执行 CREATE PROCEDURE 语句创建的过程，但不会更改权限，也不影响相关的存储过程或触发器。 10.2 使用存储过程 其语法形式如下： ALTERPROC[EDURE]procedure_name[;number] [{@parameterdata_type} [VARYING][=default][OUTPUT]][,...n] [ WITH????{RECOMPILE | ENCRYPTION | ECOMPILE,ENCRYPTION} ] [FOR REPLICATION] AS ????sql_statement [ ...n ] 下面对存储过程oakland_authors进行修改，使其能够显示出所有居住在加里福尼亚的作者，而不考虑其它地区居住的作者 。 10.2 使用存储过程 修改存储过程的代码如下： alter procedure oakland_authors with encryption as select au_fname, au_lname, address, city, zip from authors where state = 'ca' order by au_lname, au_fname 　（4） 删除存储过程 　　删除存储过程可以使用DROP命令，DROP命令可以将一个或者多个存储过程或者存储过程组从当前数据库中删除，其语法形式如下： drop procedure {procedure} [,…n] 　　 10.2 使用存储过程 　　如将存储过程oakland_authors从数据库中删除，则在Memo1的编辑框中输入以下代码： 　drop procedure oakland_authors 　　（5） 带参数的存储过程 　　存储过程使用两种类型的参数，一种是输入参数，另一种是输出参数。不使用OUTPUT保留字的参数是输入参数，使用OUTPUT保留字的参数是输出参数。输入参数是单向的，而输出参数是双向的，可以向调用者返回值。 本例的存储过程中使用了输入参数。 create procedure author_infor @lastname varchar (40) , @firstname varchar (20) as select au_lname,au_fname,phone from authors where au_fname=@firstname and au_lnam