anchor.diff:      property Enabled: Boolean read fEnabled write fEnabled;
   
       procedure SaveToPath(aPath: String);
  -    procedure ParseSaveStreamAndSaveAsText(aPath: String);
  +//    procedure ParseSaveStreamAndSaveAsText(aPath: String);
       procedure SaveAsText(aPath: String);
       procedure LoadFromPath(aPath: String);
       procedure LoadFromPathAndParseToDict(aPath: String);
  
positive.code: 
      procedure LoadHeader(aLoadStream: TKMemoryStream);
  
      procedure ParseSaveStream; overload;
      procedure ParseSaveStream(aLoadStream: TKMemoryStream); overload;
    public
      constructor Create;
      destructor Destroy; override;
  
negative.code: 
  var
    I, K, CountInTick: Integer;
    Tick, tickStreamSize: Cardinal;
  begin
    for I := 0 to fSavedTicksCnt - 1 do
    begin
      aLoadStream.Read(tickStreamSize); // load tick stream size and omit it, we don't use it here
  
      aLoadStream.Read(Tick);
      aLoadStream.Read(CountInTick);
  
  