(Delphi DLL) Set Default NTLM Protocol Version (v1 or v2)

Demonstrates how to set the default NTLM protocol version.

Chilkat for Delphi Downloads Chilkat non-ActiveX DLL for Delphi Chilkat ActiveX DLL for Delphi * The examples here use the non-ActiveX DLL.

uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Global;

...

procedure TForm1.Button1Click(Sender: TObject);
var
glob1: HCkGlobal;
glob2: HCkGlobal;

begin
// The default NTLM protocol version used Chilkat-wide, for any 
// operations involving NTLM can be set like this:

glob1 := CkGlobal_Create();

// Choose 1 or 2:
CkGlobal_putDefaultNtlmVersion(glob1,1);

// That is all.  The variable named "glob1"
// does not need to be kept in existence. 

// For example:
glob2 := CkGlobal_Create();
// Should show the value 1.
Memo1.Lines.Add('New NTLM default version: ' + IntToStr(CkGlobal_getDefaultNtlmVersion(glob2)));

// The Chilkat global object follows the singleton design pattern.
// There is only one instance of the global object within Chilkat.
// When your program creates a new instance, such as glob1 or glob2,
// they are reallly just references to the same singleton object
// within Chilkat.

CkGlobal_Dispose(glob1);
CkGlobal_Dispose(glob2);

end;