with SQLConnection1 do
begin
  Connected:=False;
  ConnectionName:='';
  DriverName:='MSSQL';
  GetDriverFunc:='getSQLDriverMSSQL';
  LibraryName:='dbexpmss.dll';
  VendorLib:='oledb';
  Params.Values['HostName']:='MS-SQL Server 名稱';
  Params.Values['DataBase']:='資料庫名稱';
  Params.Values['User_Name']:='登入ID';
  Params.Values['Password']:='登入密碼';
  Params.Values['MSSQL TransIsolation']:='ReadCommited';
  Params.Values['OS Authentication']:='False';
  Connected:=True;
end;