Скачать: CL | DM;

tIdFtp и try...except   Найти похожие ветки 

← →
VladimirVladimirovich   (2006-08-12 12:41) [0]

Имею:

Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EIdNotConnected with message "Not Connected".

Делаю:

 ftp.ReadTimeout:=150;
 try
  FTP.Connect(false);
 except
  on EIdNotConnected do Status.SimpleText:=FTP.Host+": ftp server not found";
 end;

Висит секунд 10 на каждом хосте, если там нет ftp сервера, но при этом, без try...except он сразу выдает ошибку - Not connected. Что не так делаю? Пробовал джописывать except on EIdNotConnected do ... ftp.abort(); - но безрезультатно.

Заранее благодарю.

---

← →
VladimirVladimirovic   (2006-08-12 12:45) [1]

После того как повисит сообщает от socket:

Debugger Exception Notification
---------------------------
Project Project1.exe raised exception class EIdSocketError with message "Socket Error # 10060
Connection timed out."

---

← →
VladimirVladimirovic   (2006-08-12 13:09) [2]

Всё, разобрался.

---

← →
VladimirVladimirovic   (2006-08-12 13:20) [3]

Другой вопрос возник. Постояно пишет Not connected, причем сразу же. Timeout стоит 1000 м.сек. FTP серверов брал несколько к ним таймаут <100.

 try
  ftp.Host:=edit1.text;
  FTP.Connect(false);
 except
  on EIdConnectException do label1.caption:=ftp.Host+" connection refused!";
  on EIdNotConnected do label1.caption:=ftp.Host+" not connected!";
  on EIdSocketError do label1.caption:=ftp.Host+" time out!";
 end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c