Gпомгите отловить ошибку

  • Автор темы BESS
  • Дата начала
B

BESS

#1
Код:
procedure TForm1.FormCreate(Sender: TObject);  
begin  
IdFTP1.IOHandler:=IdIOHandlerSocket2;  
idftp1.Passive:=true;  
IdIOHandlerSocket2.SocksInfo.Assign(IdSocksInfo1);  
with IdSocksInfo1 do  
begin  
Version:=svSocks5;  
Host:='192.168.101.198';  
Authentication:=saNoAuthentication;  
{Username:=''; 
Password:='';}  
Port:=1080;  
end;  
end;  
procedure TForm1.Button1Click(Sender: TObject);  
begin  
with IdFTP1 do  
begin  
Username:='login';  
Password:='password';  
Host:='777.777.777.777';  
Port:=21;  
Connect;  
if Connected then Button1.Caption:='yes';  
end;  
end;

у меня ошибку пишет socket error # 10065 no route to host
во время коннекта


в чем дело помогите разобраться и исправить