anchor.diff:      LTileLayout.RemoveAll;
       if LTileLayout.GetColumns <> 4 then
         LTileLayout.SetColumns(4);
  -    // 2Ϊӵİť
  -    for I := (AIndex * PAGE_MAX_CHIND) to  Min((AIndex + 1) * PAGE_MAX_CHIND, FIcons.Count) - 2 do
  +
  +    LStartIndex := AIndex * PAGE_MAX_CHIND;
  +    LEndIndex := Min((AIndex + 1) * PAGE_MAX_CHIND, FIcons.Count);
  +    LCurPageCount := LEndIndex - LStartIndex;
  +    OutputDebugString(PChar(Format('++++++++++++++++++++++++LCurPageCount=%d', [LCurPageCount])));
  +    for I := LStartIndex to LEndIndex - 1 do
       begin
         LItem := FIcons[I];
         if not FDlgBuilder.GetMarkup.IsValid then
  
positive.code:   begin
      LTabStyleDock.RemoveAll;
      InitRadios;
    end;
  end;
  
  
negative.code: procedure TAppsWindow.DoHandleMessage(var Msg: TMessage; var bHandled: BOOL);
  var
    R: TRect;
  //  LTrackMouse: TTrackMouseEvent;
  begin
    case Msg.Msg of
      WM_DROPFILES:
  