anchor.diff:      function GetText(aIndex: Integer): TStringArray;
   
       procedure LoadConsts(aConstPath: string);
  -    procedure LoadText(aTextPath: string; TranslationID: integer);
  +    procedure LoadText(aTextPath: string; TranslationID: integer; aCodePage: Word);
       procedure AddMissingConsts;
       procedure SaveTextLibraryConsts(aFileName: string);
       procedure SaveTranslation(aTextPath: string; TranslationID: integer);
  
positive.code: interface
  uses
    Classes, Controls, Dialogs, ExtCtrls, FileCtrl, Forms, Graphics, Math, KromUtils,
    StdCtrls, StrUtils, SysUtils, Windows, KM_ResLocales;
  
  
  type
  
negative.code: end;
  
  
  procedure TTextManager.LoadText(aTextPath: string; TranslationID: Integer; aCodePage: Word);
  var
    SL: TStringList;
    firstDelimiter, topId: Integer;
  