Hvordan kan man fange EIdsocketError # 10054 (IdFTP)?

Hejsa Eksperter.

Hvordan fanger man de meddelelser der kommer fra IdFTP, jeg har søgt på nettet og har ikke rigtigt kunne finde noget.

Jeg bruger følgende kode til at forbinde til min FTP :

<-----------KODE START----------->

//Connecting To FTP
Procedure ConnectToFtp;
begin
try
  Form2.IdFTP1.Host := HOSTBuff;
  Form2.IdFTP1.Username := USERBuff;
  Form2.IdFTP1.Password := PASSBuff;

  if Form2.IdFTP1.Connected Then Form2.IdFTP1.Disconnect;
  Form2.IdFTP1.Connect;
  Application.ProcessMessages;
  except
    on E: Exception do begin
      Application.MessageBox(PChar('Der er opstået en fejl i forbindelsen til serveren. Fejl: ' + E.Message), 'Fejl', MB_OK or MB_ICONERROR);
    end;
  end;
end;

<-----------KODE SLUT----------->

og når jeg skal disconnecte så bruger jeg :

IdFTP1.Disconnect;

Men når jeg disconnecter så får jeg følgende fejl / besked :

EIdSocketError : Socket Error # 10054 - Connection reset by peer

Kan man fange denne besked og lade være med at få den vist?

Det samme gælder for : Connection closed gracefully.

Mange tak på forhånd.

Mok