Во время соединениия с фтп соообщение Socket Error 11004

[Alex_79]

Добрый день! Я написал фтп клиент на Delphi 7 используя компоненту IdFTP, но столкнулся с такой проблемой. Я специально сделал ошибку в имени хоста фтп сервера. Во время соединения с фтп сервером появляется ошибка Socket Error 11004. Конструкция try...except в этом случае не помогает, т.е. я не могу перехватить эту ошибку и сам её обработать. Я хотел обработать такую ситуацию когда запускается фтп клиент, а фтп сервер не доступен. Что можно сделать?

try
MainForm.IdFTP1.Username:=User;
MainForm.IdFTP1.Password:=Password;
MainForm.IdFTP1.Host:=Host;
MainForm.IdFTP1.Connect();
except
if not MainForm.IdFTP1.Connected then Exit;
end;