Delphi调用MSSQL存储过程返回的多个数据集的方法
2016-01-12 19:09
603 查看
var
aintf:_Recordset;
RecordsAffected:OleVariant;
begin
ADOStoredProc1.Close;
ADOStoredProc1.Open;
aintf:=ADOStoredProc1.Recordset;
ADOQuery1.Recordset:=aintf;
aintf:=aintf.NextRecordset(RecordsAffected);
ADOQuery2.Recordset:=aintf;
end;
此时,把存储过程中生成的二个数据集分别在adoquery1,adoquery2中,将adoquery1,adoquery2与DBGrid相连中,即可.
其实,把_Recordset放到MemTable中更好.
下面是普遍的方法:
aintf:=ADOStoredProc1.Recordset;
while Assigned(aintf) do
begin
//处理当前记录集.
aintf:=aintf.NextRecordset(RecordsAffected);//取下一个记录集
end;
aintf:_Recordset;
RecordsAffected:OleVariant;
begin
ADOStoredProc1.Close;
ADOStoredProc1.Open;
aintf:=ADOStoredProc1.Recordset;
ADOQuery1.Recordset:=aintf;
aintf:=aintf.NextRecordset(RecordsAffected);
ADOQuery2.Recordset:=aintf;
end;
此时,把存储过程中生成的二个数据集分别在adoquery1,adoquery2中,将adoquery1,adoquery2与DBGrid相连中,即可.
其实,把_Recordset放到MemTable中更好.
下面是普遍的方法:
aintf:=ADOStoredProc1.Recordset;
while Assigned(aintf) do
begin
//处理当前记录集.
aintf:=aintf.NextRecordset(RecordsAffected);//取下一个记录集
end;
相关文章推荐
- delphi R3下 跨进程获取DLL信息 NtQueryInformationProcess
- 用delphi写多屏幕程序
- Delphi 的接口机制——接口操作的编译器实现过程(2)
- Delphi 的接口机制——接口操作的编译器实现过程(1)
- ZEOSDBO+SQLite+Delphi7不常见异常信息的解决
- delphi 2010 导出sql server 数据到DBF乱码问题
- delphi IOS BLE 代理
- delphi BLE 后台
- Delphi IOS class_addMethod
- delphi下中文转UFT-8编码
- delphi IOS 后台状态保存
- delphi IOS 通知 TNotification
- Delphi 2010下载+完美破解
- Delphi类在实现接口时,可以任意的升降接口方法的可见度。
- 你还没成为Delphi QC的成员吗?(转红鱼儿)
- 判断字符是否是汉字,ByteType字符串中判断是否英文
- Delphi内嵌汇编语言BASM精要(转帖)
- Delphi项目构成之单元文件PAS
- Delphi中Interface接口的使用方法
- Delphi项目构成之项目文件DPR