ADO原生对象和Delphi数据显示控件如（TDBGrid）相连的问题！(100分)

我用CreateOleObject('ADODB.Recordset')建立了Recordset对象，获取数据后怎么才能在Delphi的DBGrid中显示呢？
欢迎讨论!

谁能解决这个问题，连同另一贴的分一起给：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1299504

var
datasource1:Tdatasource;
begin
datasource1:=Tdatasource.create(self);
datasource1.dataset:=Recordset;
dbgrid.datasource:=datasource1;

这些我早试过了，肯定不行的

为什么用如此低级的办法（起码我不明白），你用delphi内建的连接方式TADOCONNECTION和TADODATASET（只用TADODATASET也可）
控件连接数据库和建立数据集多好：
uses ADODB;
var
myconn:Tadoconnection;
nydataset:Tadodataset;
datasource1:Tdatasource;
begin
myconn:=Tadoconnection.create(self);
mydataset:=Tadodataset.create(self);
myconn.connectionstring:='XXXXXXXXXXXX';//根据不同数据库连接字串不同，在此不细说。
myconn.prompt:=false;//关闭连接提示对话框
myconn.connected:=true;//建立数据库连接
mydataset.connection:=myconn;
mydataset.commandtext:='select * from table1';
mydataset.open;

datasource1:=Tdatasource.create(self);
datasource1.dataset:=mydataset;
dbgrid.datasource:=datasource1;
end;
这样既可以做到在程序中控制数据库连接和数据集，又可以实现正常显示。如果不能编译，
适当做些调整应该可以通过。

我把源码已经发给你了，收到了吗？？？

多人接受答案了。