anchor.diff:      procedure FillRCSModules();
   
     public
  +   tracks: TObjectList<TBlkPrjTrack>;
  +
       constructor Create(index:Integer);
       destructor Destroy(); override;
   
  
positive.code: var oblr:TOR;
      defaultModule:Cardinal;
      module:Cardinal;
  begin
   inherited LoadData(ini_tech, section, ini_rel, ini_stat);
  
  
negative.code: implementation
  
  uses TBloky, GetSystems, ownStrUtils, TJCDatabase, TCPServerOR, RCS, UPO,
       Graphics, TCPORsRef, Prevody, Diagnostics, appEv;
  
  constructor TBlkPrejezd.Create(index:Integer);
  begin
  