델파이로 mssql 데이터베이스 연결

var
 msConnection : TMSConnection;

begin

   msConnection := TMSConnection.Create(nil);

   with msConnection do
   begin
     try

       DisConnect;

       Authentication := auServer;
       Username       := id;
       Password       := pw;
       Server         := serverip;
       Database       := dbname;

       Connect;

      except
        on E : Exception do
        begin
          DisConnect;
          exit;
        end;
      end;
   end;
end;