Ich habe zwei Eventhandler hinzugefügt um besser zu erkennen was während des Connects passiert.
Delphi-Quellcode:
procedure Auth(Sender: TObject; Authentication: TIdAuthentication; var Handled: Boolean);
procedure AuthSelect(Sender: TObject; var AuthenticationClass: TIdAuthenticationClass; AuthInfo: TIdHeaderList);
...
IdHTTP1.OnAuthorization := Auth;
IdHTTP1.OnSelectAuthorization := AuthSelect;
Wenn
OnSelectAuthorization ausgelöst wird
ist AuthenticationClass
TIdDigestAuthentication,
AuthInfo hat den Inhalt:
Digest algorithm="MD5", realm="Forbidden", qop="auth", opaque="1f4ffff678e1ac3ca5a49a44001fb374", nonce="1b2a0979d3adff70d59e1d11f6315df1"
Jedoch wird
OnAuthorization erst gar nicht ausgelöst!