Hallo,
ich möchte einen HTTP-Zugriff ins Internet realisieren (Indy10 mit Delphi7), der über einen Proxyserver geht, welcher Authentifizierung verlangt. Folgendes Testprogramm habe ich entworfen, welches auf Buttonclick einfach den Inhalt einer geladenen Seite in einem Memo darstellen soll:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
| procedure TForm1.Button1Click(Sender: TObject);
var sResult: string;
begin
Memo1.Lines.Clear;
idHTTP.ProxyParams.ProxyServer := edPServer.Text;
idHTTP.ProxyParams.ProxyPort := StrToInt(edPPort.Text);
idHTTP.ProxyParams.ProxyUsername := edPUser.Text;
idHTTP.ProxyParams.ProxyPassword := edPPass.Text;
idHTTP.Intercept := nil;
try
sResult := idHTTP.Get('http://www.google.de/index.html');
except
On E: Exception do
begin
Memo1.Lines.Add('Fehler:');
Memo1.Lines.Add(E.Message);
end;
end;
if (sResult <> '') then Memo1.Text := sResult;
end; |
Ohne Proxy bzw. mit Proxy ohne Authentifizierung klappt das auch, nur mit der Authentifizierung läuft das Ganze in die Exception (Message="Could not load SSL library.")
Ich vermute mal, die Kommunikation zwischen Proxy und Client findet SSL-verschlüsselt statt, da ja hier Username und Passwort an den Proxyserver übergeben werden müssen.
Was ist dafür denn alles notwendig? Gibt es irgendwo vielleicht ein Beispielprogramm? In den Indy10Demos ist leider bei HTTP nur ein Server-Beispiel angegeben.
Danke,
Ralf
