ich habe auch die
indy und die overbyte ics componenten. Geht es damit besser?
mit ics habe ich folgendes gemacht:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
WSocket1.Proto := '
tcp';
WSocket1.Port := '
80';
WSocket1.addr := '
google.de';
WSocket1.socksPort := '
3541';
WSocket1.socksserver:= '
98.206.11.111';
WSocket1.Connect;
end;
procedure TForm1.WSocket1Error(Sender: TObject);
begin
showmessage('
fehler');
end;
procedure TForm1.WSocket1SessionConnected(Sender: TObject; ErrCode: Word);
begin
Memo1.Lines.Add('
Session connected to remote host.');
end;
procedure TForm1.WSocket1SocksConnected(Sender: TObject; ErrCode: Word);
begin
Memo1.Lines.Add('
Session connected to socks server.');
end;
procedure TForm1.WSocket1SocksError(Sender: TObject; Error: Integer;
Msg:
string);
begin
Memo1.Lines.Add('
Socks error #' + IntToStr(Error) + '
' + Msg);
end;
end.
problem ist, dass auch dann wenn der socks ungültig ist (egal welche
ip/port ich eingebe) immer erscheint das es durch den socks zum host connected hat, ansonsten wäre es genaus das was ich suche.