CreateOleObject('ADODB.Connection');要用ado连数据库,这一句写在哪里呀

Question

为什么这样写，delphi5/6已经封装了ado阿
Var AdoConn:TadoConnection;
begin
   AdoConn:=TadoConnection.create(self);
   with AdoConn do try
      loginprompt:=false;
      connectionstring:='....';
      open;
      .....
   finally
      free;
   end;
end;

Answer 1

直接用ADO面板上的控件不就可以了吗？

Answer 2

如果不使用Delphi封装好了的ADO控件，要直接使用原生com的话，可以这样写：
var
　ADOConn : variant;
　ADORS : variant;
begin
　ADOConn:=CreateOleObject('ADODB.Connection');
　ADOConn.Open('Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=c:\test.mdb;'); 
　　//连接数据库，这里使用的是access数据库的连接字符串
　ADORS:=CreateOleObject('ADODB.RecordSet');
　ADORS.ActiveConnection:=ADOConn;
　ADORS.Open('Select * from table1',ADOConn,adOpenStatic,adLockOptimistic,adCmdText);
　　//打开表table1获取数据集
　Edit1.Text:=VarToStr(ADORS.Fields['Field1'].Value);
　　//Edit文本框填充Field1字段值
end;