Delphi DLL Requires Chilkat v11.0.0+

Transition from Crypt2.LastJsonData to Crypt2.GetLastJsonData

Provides instructions for replacing deprecated LastJsonData method calls with GetLastJsonData. Delphi DLL

var
success: Boolean;
crypt2: HCkCrypt2;
jsonObj: HCkJsonObject;
jsonOut: HCkJsonObject;

begin
success := False;

crypt2 := CkCrypt2_Create();

//  ...
//  ...

//  ------------------------------------------------------------------------
//  The LastJsonData method is deprecated:

jsonObj := CkCrypt2_LastJsonData(crypt2);
if (CkCrypt2_getLastMethodSuccess(crypt2) = False) then
  begin
    Memo1.Lines.Add(CkCrypt2__lastErrorText(crypt2));
    Exit;
  end;

//  ...
//  ...

CkJsonObject_Dispose(jsonObj);

//  ------------------------------------------------------------------------
//  Do the equivalent using GetLastJsonData.
//  Your application creates a new, empty JsonObject object which is passed 
//  in the last argument and filled upon success.

jsonOut := CkJsonObject_Create();
CkCrypt2_GetLastJsonData(crypt2,jsonOut);
if (success = False) then
  begin
    Memo1.Lines.Add(CkCrypt2__lastErrorText(crypt2));
    Exit;
  end;

CkCrypt2_Dispose(crypt2);
CkJsonObject_Dispose(jsonOut);