anchor.diff:   else if (item = 'VYL')  then Self.MenuVylClick(SenderPnl, SenderOR)
    else if (item = 'ZAV>') then Self.MenuZAVEnableClick(SenderPnl, SenderOR)
    else if (item = 'ZAV<') then Self.MenuZAVDisableClick(SenderPnl, SenderOR)
  - else if (item = 'ZRUŠ REDUKCI') then Self.MenuAdminREDUKClick(SenderPnl, SenderOR);
  + else if (item = 'ZRUŠ REDUKCI') then Self.MenuAdminREDUKClick(SenderPnl, SenderOR)
  + else if (item = 'POL+') then Self.MenuAdminPolPlusCLick(SenderPnl, SenderOR)
  + else if (item = 'POL-') then Self.MenuAdminPolMinusCLick(SenderPnl, SenderOR)
  + else if (item = 'NEPOL') then Self.MenuAdminNepolCLick(SenderPnl, SenderOR);
   end;
   
   ////////////////////////////////////////////////////////////////////////////////
  
positive.code:  Self.Change();
  end;
  
  ////////////////////////////////////////////////////////////////////////////////
  
  //vytvoreni menu pro potreby konkretniho bloku:
  
negative.code:    Result := Result + '-,';
     if (Self.intentionalLocked) then Result := Result + '*ZRUŠ REDUKCI,';
    end;
  
   if (RCSi.simulation) then
    begin
     Result := Result + '-,';
     if (Self.Poloha <> TVyhPoloha.plus) then
       Result := Result + '*POL+,';
     if (Self.Poloha <> TVyhPoloha.minus) then
       Result := Result + '*POL-,';
     if (Self.Poloha <> TVyhPoloha.none) then
       Result := Result + '*NEPOL,';
    end;
  end;
  
  ////////////////////////////////////////////////////////////////////////////////
  