如何动态给DbExpress的SQLConnection填写数据库连接参数？

连接MS-SQL

  with SQLConnection1 do
  begin
    Connected:=False;
    LoginPrompt:=False;
    ConnectionName:='';
    DriverName:='MSSQL';
    GetDriverFunc:='getSQLDriverMSSQL';
    //LibraryName:='dbexpmss.dll';  //ole连接方式
    //VendorLib:='oledb';
    LibraryName := 'dbxmss.dll';  //dbx连接方式
    VendorLib := 'sqlncli10.dll';
    Params.Values['HostName']:='(local)';
    Params.Values['DataBase']:='jfgl_new';
    Params.Values['User_Name']:='sa';
    Params.Values['Password']:='xlinuxx';
    Params.Values['MSSQL TransIsolation']:='ReadCommited';
    Params.Values['OS Authentication']:='False';
    try
      Connected := True;
      //Showmessage('联接成功');
    except
      //showmessage('联接失败');
    end;
  end;