Как сделать обработчик для ситуации когда соединение не удалось?
Использовал
пример FTP-client.
на соединение там вроде предусмотрен обработчик:
Код:
begin
ConnectButton.Enabled:=false;
if IdFTP1.Connected
then
try
if TransferrignData
then IdFTP1.Abort;
IdFTP1.Quit;
finally
CurrentDirEdit.Text:='/';
DirectoryListBox.Items.Clear;
ConnectButton.Caption:='Connect';
ConnectButton.Enabled:=true;
ConnectButton.Default:=true;
end
else
with IdFTP1 do try
//Username:=UserIDEdit.Text;
//Password:=PasswordEdit.Text;
//Host:=FtpServerEdit.Text;
Connect;
Self.ChageDir(CurrentDirEdit.Text);
finally
ConnectButton.Enabled:=true;
if Connected
then
begin
ConnectButton.Caption:='Disconnect';
ConnectButton.Default:=false;
end;
end;
end;
Я тестил с отключённым интернетом, но после 10 секунд выпадает ошибка. Нужно чтобы при неудачном подключении просто ничего не выполнялось.