Delphi 6 FormatSetting uLkJson.pas

Question

I have a problem in a project that I have taken on. uLkJSON.pas is used, but the problem is that the TFormatSetting function is not present in the Delphi 6 version of the SysUtils unit. Can this be updated?

The problem occurs at the point:

uses windows,
  SysUtils,
{$IFNDEF KOL}
  classes,
{$ELSE}
  kol,
{$ENDIF}
  variants;

type
  TlkJSONtypes = (jsBase, jsNumber, jsString, jsBoolean, jsNull,
    jsList, jsObject);

class function TlkJSON.GenerateText(obj: TlkJSONbase): string;
var
{$IFDEF HAVE_FORMATSETTING}
  fs: TFormatSettings;
{$ENDIF}

Answer 1

等待大神答复