anchor.diff:  procedure TAppsWindow.ShowPage(AIndex: Integer);
   var
     LTileLayout: CTileLayoutUI;
  -  I: Integer;
  +  I, LCurPageCount, LStartIndex, LEndIndex: Integer;
     LVerticalLayout: CVerticalLayoutUI;
     LTitle: CLabelUI;
     LItem: TIconInfo;
  
positive.code:   begin
      Msg.Result := 1;
      Close;
    end;
  end;
  
  procedure TRichEditMenu.DoInitWindow;
  
negative.code:           SetWindowPos(Handle, HWND_NOTOPMOST, 0, R.Top, 0, 0,  SWP_NOREDRAW or SWP_NOSIZE);
        end;
  
  //    WM_MOUSEMOVE :
  //      begin
  //        if not FMouseTracking then
  //        begin
  //          LTrackMouse.cbSize := Sizeof(TTrackMouseEvent);
  //          LTrackMouse.hwndTrack := Handle;
  //          LTrackMouse.dwFlags := TME_LEAVE or TME_HOVER;
  //          LTrackMouse.dwHoverTime := 1;
  //          FMouseTracking := TrackMouseEvent(LTrackMouse);
  //        end;
  //      end;
  
      WM_NCMOUSELEAVE: FIsNcMouseEnter := False;
      WM_MOUSEHOVER, WM_NCMOUSEMOVE :
       begin
  
         if Msg.Msg = WM_NCMOUSEMOVE then
           FIsNcMouseEnter := True;
         if not FIsMouseHover then
  