anchor.diff:  begin
     AMenu.OwnerDraw:= false;
     AMenu.OnDrawItem:= nil;
  +  AMenu.OnMeasureItem:= nil;
   end;
   
   procedure TWin32MenuStyler.ResetForm(AForm: TForm; ARepaintEntireForm: boolean);
  
positive.code:       ARect.Right,
        ARect.Bottom);
    end;
  end;
  
  procedure TWin32MenuStyler.HandleMenuPopup(Sender: TObject);
  
negative.code:     procedure ApplyBackColor(h: HMENU; AReset: boolean);
      procedure HandleMenuDrawItem(Sender: TObject; ACanvas: TCanvas;
        ARect: TRect; AState: TOwnerDrawState);
      procedure HandleMenuMeasureItem(Sender: TObject; ACanvas: TCanvas;
        var AWidth, AHeight: Integer);
      procedure HandleMenuPopup(Sender: TObject);
    public
      procedure ApplyToMenu(AMenu: TMenu);
  