Einzelnen Beitrag anzeigen

Benutzerbild von GPRSNerd
GPRSNerd

Registriert seit: 30. Dez 2004
Ort: Ruhrpott
239 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Proxy-Einstellungen automatisch erkennen mit IDHttp

  Alt 15. Mär 2013, 23:18
Also müsste man schauen wie man an die Daten des Internet Explorers kommt.
http://www.delphipraxis.net/19756-pr...-abfragen.html
Die Funktionen zum Auslesen der Proxyeinstellungen nutze ich auch.
Ich biete dem User in meinem Programm, welches auch IdHTTP nutzt, drei Optionen für den Proxy:
1. Automatische Einstellungen (mit den Funktionen oben)
2. Manuelle Einstellungen
3. Kein Proxy

IdHTTP parametrisiere ich dann folgendermaßen:

Delphi-Quellcode:
    with IdHTTP do
    begin
      case ProxyTyp of
      1:
        begin
          if STGCommonUnit.GetProxyServer(STGCommonUnit.http, ProxyServerAuto, ProxyPortAuto) then
          begin
            ProxyParams.ProxyServer := ProxyServerAuto;
            ProxyParams.ProxyPort := ProxyPortAuto;
          end
          else
          begin
            ProxyParams.Clear;
          end;
        end;
      2:
        begin
          ProxyParams.ProxyServer := ProxyServer;
          ProxyParams.ProxyPort := ProxyPort;
          ProxyParams.ProxyUsername := ProxyUser;
          ProxyParams.ProxyPassword := ProxyPassword;
        end;
      else
        begin
          ProxyParams.Clear;
        end;
      end;
Stefan
  Mit Zitat antworten Zitat