anchor.diff:      if AMenuCmd='_plugins' then
       begin
         mnuPlugins:= mi;
  -      TAppMenuProps(mi.Tag).CommandString:= 'plugins';
  +      MenuProps.CommandString:= 'plugins';
         UpdateMenuPlugins;
       end
       else
  
positive.code:     end
      else
      begin
        TAppMenuProps(mi.Tag).CommandCode:= -1;
        TAppMenuProps(mi.Tag).CommandString:= AMenuCmd;
        if (AMenuCmd<>'0') and (AMenuCmd<>'') then
          mi.OnClick:= @MenuMainClick;
      end;
  
negative.code:   begin
      mi:= TMenuItem.Create(Self);
      mi.Caption:= AMenuCaption;
      MenuProps:= TAppMenuProps.Create;
      MenuProps.TagString:= AMenuTagString;
      mi.Tag:= PtrInt(MenuProps);
  
      Num:= StrToIntDef(AMenuCmd, 0); //command code
      if Num>0 then
  