TIdHTTP предоставя OnProxyAuthorization за момента, в който механизъм за прокси удостоверяване поиска от приложението да предостави профил. Обратното извикване получава обект TIdAuthentication и резултат Handled:

procedure TForm1.IdHTTP1ProxyAuthorization(Sender: TObject;
  Authentication: TIdAuthentication; var Handled: Boolean);
begin
  Authentication.Username := 'PROXY_USER';
  Authentication.Password := 'PROXY_PASSWORD';
  Handled := True;
end;

Използвайте модула IdAuthentication за типа и задайте този метод на събитието OnProxyAuthorization на HTTP компонента. Заменете стойностите-заместители с профила, който логиката за идентификационни данни на приложението предоставя.

Връщането на Handled=true позволява на механизма за удостоверяване да продължи с тези стойности. Върнете false, когато потребителят отмени или приложението откаже да предостави идентификационни данни.

Крайната точка на прокси сървъра все още принадлежи в конфигурацията ProxyParams на компонента. Обратното извикване участва в обмена на избраната схема; то не трябва само да изчислява заглавие Basic или NTLM.

Подобни статии