anchor.diff:    M := TKMemoryStream.Create;
     M.LoadFromFile(aFileName);
   
  -  //Convert old AnsiString into new Cardinal format
  +  //Convert old AnsiString into new [0..2] Byte format
     M.ReadBytes(cmp);
  +  Assert(Length(cmp) = 3);
     fCampaignId[0] := cmp[0];
     fCampaignId[1] := cmp[1];
     fCampaignId[2] := cmp[2];
  
positive.code: {$I KaM_Remake.inc}
  interface
  uses
    {$IFDEF WDC}AnsiStrings, {$ENDIF}
    Classes, KromUtils, Math, SysUtils,
    KM_CommonClasses, KM_Pics, KM_Points, KM_ResTexts, KM_ResLocales;
  
  
negative.code: 
  
  { TKMCampaign }
  constructor TKMCampaign.Create;
  begin
    inherited;
  
  