MTS的数据库连接问题？？？

我在使用MTS数据模块时，想让ADOConnection动态配置，先建立了一个文本文件，让后用程序从文本文件中读入数据库配置信息，代码如下：
var
  provider: string;
  MyReadIniFile:TReadIniFile;
  userid:       string;
  serip:        string;
  dbname:       string;
  filename:     string;
  Password:     string;
begin
  //数据库连接
  filename:=GetCurrentDir()+'\'+'dbconfig.ini';
  MyReadIniFile:=TReadIniFile.Create;
  MyReadIniFile.LoadFile(filename);
  userid:=MyReadIniFile.ReadUserId();
  dbname:=MyReadIniFile.ReadDbName();
  serip:=MyReadIniFile.ReadSerIp();
  Password:=MyReadIniFile.ReadPassword();
  provider:='Provider=SQLOLEDB.1;'+'Password='+Password+';Persist Security Info=True'+';'+
            'User ID='+userid+';'+'Initial Catalog='+dbname+';'+
            'Data Source='+serip;  ADOConnection1.ConnectionString:=provider;
  ADOConnection1.Connected:=True;
end;
我不知道该把这段代码放到数据模块的什么事件中，如果这种方法不行的话，请问有什么别的方法？？？