请问做三层时,可不可以直接从中间层返回ado的recordset对象? 可以的。这样让VB也可以容易使用DELPHI写的应用服务器。当然,这不是推荐方式:) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 请问halfdream(哈欠):具体是怎么实现的呢?因为返回的类型没有recordset这种? 何必呢,如果用ado接口作就不用midas了吧!自己控制更放心!呵呵 ado 和MIDAS根本不是同一回事情。 请问VSaber(☆浪人☆) :用ado做接口,有没有具体实现的方法? 在中间层填写Provider的DataRequest事件function TYYJXC.Provider1DataRequest(Sender: TObject; Input: OleVariant): OleVariant;begin Provider1.DataSet.Close; TADODataSet(Provider1.DataSet).CommandText := Input; Provider1.DataSet.Open; Result := TADODataSet(Provider1.DataSet).Recordset;end;在客户端写函数...ADODataSet1.Recordset := ClientDataSet1.DataRequest('select * from customer'); 深圳的哥们都进来啊。。。。有点事情想问一下 怎样移除了一个已安装的组件 用CoolTrayIcon怎么实现启动最小化到系统托盘????? 如何实现不存盘编译 Delphi 8 注册码!(...晕~~~~(估计作者是个Java Fans)) 讨论:在grid上多选数据,并打印的思路 数据库备份与恢复! 各位在做三层开发时出现 RPC服务器不可用。 祝大家新年好! 请问:在使用socket连接时,如果服务器名称错误,该如何处理这个异常? 怎样找到当前系统windows目录路径或者program files路径 急急急、快进来看看!!!
如果用ado接口作就不用midas了吧!
自己控制更放心!呵呵
Input: OleVariant): OleVariant;
begin
Provider1.DataSet.Close;
TADODataSet(Provider1.DataSet).CommandText := Input;
Provider1.DataSet.Open;
Result := TADODataSet(Provider1.DataSet).Recordset;
end;
在客户端写函数
...
ADODataSet1.Recordset := ClientDataSet1.DataRequest('select * from customer');