Einzelnen Beitrag anzeigen

MartinK

Registriert seit: 21. Jun 2009
Ort: Germering (Germany)
89 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#10

AW: Proxy-Einstellungen automatisch erkennen mit IDHttp

  Alt 22. Mär 2013, 11:13
Erneut Hallo
- getProxyServer gibt keinen Server und keinen Port zurück

- Ich denke mal ich muss die Authentication mit NTLM machen. Aber das ist nicht so leicht wie gesagt. Ich finde keine funktionierenden Beispiele was alles zu tun ist.
was ich aktuell mache und leider NICHT funktioniert (407 Proxy Authorisation required) ist

Delphi-Quellcode:
uses IdAuthenticationNTLM

//.....

procedure TForm1.IdHTTPSelectProxyAuthorization(Sender: TObject; var AuthenticationClass: TIdAuthenticationClass; AuthInfo: TIdHeaderList);
begin
  IDHTTP.ProxyParams.BasicAuthentication := False;
  AuthenticationClass := TIdNTLMAuthentication;
end;

//.....
procedure TForm1.Button1Click(Sender: TObject);
begin
  IdHTTP.HTTPOptions := IdHTTP.HTTPOptions + [hoKeepOrigProtocol] + [hoInProcessAuth];
  IdHTTP.ProxyParams.ProxyServer := eProxyServer.Text;
  IdHTTP.ProxyParams.ProxyPort := StrToInt(eProxyPort.Text);
  IdHTTP.ProxyParams.ProxyUsername := eUsername.Text;
  IdHTTP.ProxyParams.ProxyPassword := ePassword.Text;
  Memo1.text := IdHTTP.Get('http://www.google.de');
end;


lG Martin

PS: Seit nun fast 2 Wochen ohne Internet und Festnetzanschluss. Danke liebe Telekom für die "superflüssige Umstellung" von meinem vorherigen Provider
Martin Kuhn
  Mit Zitat antworten Zitat