DELPHI技巧:DELPHI存储过程调用方法计算机二级考试

文章作者 100test 发表时间 2009:05:16 19:19:22
来源 100Test.Com百考试题网

　　2009年上半年计算机技术与软件专业技术资格（水平）考试日期：2009年11月14、15日。另外，部分考试科目从2009年上半年开始将采用新修编的考试-大纲，具体见： 2009年全国计算机软考考试-大纲汇总　2009年计算机软考冲刺辅导
　　首先，我们使用一种简单的方式，即通过控件的方式来定义存储过程和数据源。
　　新建一个单元，命名为：DataMConn，在加入一个ADO单元下的ADOStoredProc，这里命名为ADOSPTempAbove ,再加入Data Access单元下的一个DataSource，这里命名为DataSourceAbove，设置DataSourceAbove的DataSet属性为ADOSPTempAbove，当然这个属性也可以在程序中指定。
　　下面，可以在另一个单元中添加一个DataGrid，这里的命名为dgAbove。下面的代码加了详细注释。
　　With DataMConn.ADOSPTempAbove do
　　begin
　　ProcedureName := ’GetAbove’. //指定存储过程名称
　　Parameters.Clear. //清除原有参数
　　//以下创建了两个新的参数，关于如何传递表名做为参数请参我在 数据库 分类的高级应用中写的文章。
　　Parameters.CreateParameter(’@tableName’,ftString,pdinput,20,0).
　　Parameters.CreateParameter(’@strDate’,ftString,pdinput,20,0).
　　//以下为参数赋值
　　Parameters.ParamByName(’@tableName’).Value := tempTableName.
　　Parameters.ParamByName(’@strDate’).Value := strDate.
　　try
　　Open. //返回结果集用open，否则用EexcProc；
　　except
　　begin
　　ShowMessage(’打开表错误’).
　　Exit.
　　end.
　　end.
　　//如果没有在控件属性中设置DataSourceAbove的DataSet属性，可以在这里设置：
　　//DataSourceAbove.DatSet := DataMConn.ADOSPTempAbove
　　dgAbove.DataSource := DataMConn.DataSourceAbove.
　　end.
　　注意：　ftString 需要引用DB单元。

　　特别推荐：

　　2009年9月全国计算机等级考试时间及科目预告

　　2009年上半年全国计算机等级考试参考答案请进入计算机考试论坛

　　2009年全国计算机等级考试报名信息汇总

　　2009年NCRE考试有新变化

　　2009年全国计算机等级考试-大纲

　　2009年上半年全国计算机二级考试试题及答案

　　2009年上半年全国计算机等级考试试题答案汇总