Ukrycie komunikatu o błędzie przy próbie połączenia ftp

Witam
Staram się ukryć komunikat o błędzie w przypadku nieudanego połączenia ftp w delphi ten sam sposób działa bardzo dobrze w c++ niestety już nie.

while(Form1->IdFTP1->Connected() == false)
{
    try
    {
        Form1->IdFTP1->Connect();
    }
    catch(...)
    {
        Sleep(60000);
	Form1->IdFTP1->Connect();
    }
}

while(Form1.IdFTP1.Connected <> true) do
begin
  try
    Form1.IdFTP1.Connect();
  except
    on exception do
    begin
      Sleep(60000);
      Form1.IdFTP1.Connect();
    end;
  end;
end;

Wywal linijkę Rofm1->IdFTP1->Connect() z bloku catch. Jak to się nie powiedzie i rzuci wyjątkiem to nie zostanie on złapany.

Dzięki wszystko działa.