anchor.diff:  end;
   
   procedure TBlkPrejezd.SaveData(ini_tech:TMemIniFile;const section:string);
  +var i: Integer;
   begin
    inherited SaveData(ini_tech, section);
   
  
positive.code:  Self.PrjStav := Self._def_prj_stav;
   Self.PrjStav.shs := TList<TBlk>.Create();
   Self.PrjStav.rcsModules := TList<Cardinal>.Create();
  end;//ctor
  
  destructor TBlkPrejezd.Destroy();
  begin
   Self.PrjStav.shs.Free();
   Self.PrjStav.rcsModules.Free();
   inherited;
  end;//dtor
  
  
negative.code: var oblr:TOR;
      defaultModule:Cardinal;
      module:Cardinal;
      i, notracks: Integer;
      track: TBlkPrjTrack;
  begin
   inherited LoadData(ini_tech, section, ini_rel, ini_stat);
  
  