一个操作access数据库的问题？？？

Question

比如说：我有三个数据库，也就是三个access的文件，保存在一个目录下
当我窗体启动时，在我的dbgrid中能分别显示出我这三个数据库的名称/
同时双击大开谁，ado自动连接过去

Answer 1

sample,declare three variant.stand for the three database.ok

Answer 2

可以将三个数据库的名称存放在某个表中,程序在启动时将名称列表的数据读入到dbgrid中,再根据所选的名称去连结.//------------------------------------------------------------------
procedure tform1.pGetCurrentMach(database,path:string);
begin
    //-----------connect to access database
    AdoconAccess:=tadoconnection.Create(application);
    try
        AdoconAccess.Close;
        AdoconAccess.Provider:='Microsoft.Jet.OLEDB.4.0;Data Source='+(path+'\'+database)
                +';Persist Security Info=False';
        AdoconAccess.Connected:=true;
        AdoconAccess.Open;
    except
        showmessage('Failure to connect to access   database:BOM.DB'+path+'\'+database);
        exit;
    end;
end;