Socks прокси в программе в делфи

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by Vasa2, 16 Dec 2011.

  1. Vasa2

    Vasa2 Banned

    Joined:
    19 Nov 2010
    Messages:
    41
    Likes Received:
    1
    Reputations:
    -5
    Здравствуйте форумчане, хочу осуществить Socks прокси в программе, делаю это так:

    PHP:
    begin
    if RadioButton1.Checked=true then IdSocksInfo1.Version:=svSocks4;
    if 
    RadioButton2.Checked=true then IdSocksInfo1.Version:=svSocks5;
    IdSocksInfo1.Host:=Copy(Edit2.Text,1,Pos(':',Edit2 .Text)-1);
    IdSocksInfo1.Port:=StrToInt(Copy(Edit2.Text,Pos(':',Edit2.Text)+1,Length(Edit2.Text)));
    IdSocksInfo1.Authentication:= saNoAuthentication;
    IdSSLIOHandlerSocket1.SocksInfo:=IdSocksInfo1;
    IdTCPClient.IOHandler:=IdSSLIOHandlerSocket1;
    end;
    Но при использовании IdTCPClient выдает ошибку, подскажите в чем дело?

    Заранее спасибо.
     
  2. Chrome~

    Chrome~ Elder - Старейшина

    Joined:
    13 Dec 2008
    Messages:
    937
    Likes Received:
    162
    Reputations:
    27
    Какую именно ошибку выдает, мы должны догадываться сами?
     
  3. Vasa2

    Vasa2 Banned

    Joined:
    19 Nov 2010
    Messages:
    41
    Likes Received:
    1
    Reputations:
    -5
    Вот скрин

    [​IMG]
     
    #3 Vasa2, 16 Dec 2011
    Last edited: 16 Dec 2011
  4. cheater_man

    cheater_man Member

    Joined:
    13 Nov 2009
    Messages:
    651
    Likes Received:
    44
    Reputations:
    7
    Code:
    IdHTTP1.ReadTimeout:=60000;
    IdHTTP1.ConnectTimeout:=60000;
    IdSocksInfo1.Version:=svSocks5;
    IdSocksInfo1.Host:=ip;
    IdSocksInfo1.Port:=strtoint(port);
    IdSocksInfo1.Authentication:= saNoAuthentication;
    IdSSLIOHandlerSocketOpenSSL1.TransparentProxy:=IdSocksInfo1;
    IdHTTP1.IOHandler:=IdSSLIOHandlerSocketOpenSSL1;
    
     
  5. Vasa2

    Vasa2 Banned

    Joined:
    19 Nov 2010
    Messages:
    41
    Likes Received:
    1
    Reputations:
    -5
    Так у меня же IdTCPClient а не IdHTTP
     
  6. Vasa2

    Vasa2 Banned

    Joined:
    19 Nov 2010
    Messages:
    41
    Likes Received:
    1
    Reputations:
    -5
    Ауууу, тут есть знающие люди. Подскажите как соксы осуществить
     
  7. cheater_man

    cheater_man Member

    Joined:
    13 Nov 2009
    Messages:
    651
    Likes Received:
    44
    Reputations:
    7