TIdNTLMAuthentication

type TIdNTLMAuthentication = class(TIdAuthentication)

protected

  FNTLMInfo: string;

  FHost: string;

  FDomain: string;

  FUser: string;

  function DoNext; override;

  function GetSteps; override;

  procedure SetUserName(); override;

public

  constructor Create; override;

  function Authentication; override;

  function KeepAlive; override;

end;

TIdNTLMAuthentication

TIdAuthentication

TObject