Delphi8 VCL模式下怎么动态连接Access数据库？

Question

在D8里我现在只会用ODBC设定数据源，然后用BDE的Query连接。
以前D7里面ADO组件多好？设定ConnectString就可以了，很容易动态连接各个Access文件！
现在可怎么做啊！

Answer 1

.NET有自己的组件哦下面是连接SQL SERVER 的，供参考
function TCommonDB.ConnStr: string;
begin
  Result :='Persist Security Info=False;data source=abc;initial catalog=mydatabase;User ID=sa2;password=548706aYt_;';
end;function TCommonDB.GetAreaList: DataSet;
var
  myConnection:SqlConnection;
  myAdapter :SqlDataAdapter;
begin
myConnection := SqlConnection.Create(ConnStr);
  myAdapter :=SqlDataAdapter.Create('Select * from Area', myConnection);
  myConnection.Open;
  Result :=DataSet.Create;
  myAdapter.Fill(Result);
  myConnection.Close;
end;