HTTP Negotiate/ Kerberos Authentication

To use Kerberos HTTP authentication, simply set the Login, Password, LoginDomain, and NegotiateAuth properties prior to calling any HTTP method (such as Download, QuickGetStr, SynchronousRequest, etc.)

Download Chilkat HTTP ActiveX

uses
    Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
    Dialogs, StdCtrls,
    CHILKATHTTPLib_TLB,
    OleCtrls;

...

procedure TForm1.Button1Click(Sender: TObject);
var
http: TChilkatHttp;
success: Integer;

begin
http := TChilkatHttp.Create(Self);

//  Any string unlocks the component for the 1st 30-days.
success := http.UnlockComponent('Anything for 30-day trial');
if (success <> 1) then
  begin
    ShowMessage(http.LastErrorText);
    Exit;
  end;

//  Set the login/password for HTTP NTLM Authentication:
http.Login := 'myLogin';
http.Password := 'myPassword';
http.LoginDomain := 'myLoginDomain';
//  Negotiate authentication allows the HTTP client
//  to dynamically select either Kerberos or NTLM, depending
//  on what the server supports.
http.NegotiateAuth := 1;

//  Download a .zip from chilkatsoft.com:
//  PS> This download URL doesn't actually require
//  authentication.  You'll want to replace this URL with your own.
success := http.Download('http://www.chilkatsoft.com/preRelease/ChilkatDotNet2.zip','ChilkatDotNet2.zip');
if (success <> 1) then
  begin
    ShowMessage(http.LastErrorText);
  end
else
  begin
    ShowMessage('Download Complete!');
  end;
end;