anchor.diff:      FPaintManager.SendNotify(Msg.pSender, 'TrayMenuItemClick');
   end;
   
  +
  +
   end.
  
positive.code: 
  procedure TRichEditMenu.DoInitWindow;
  var
    LSize: TSize;
    LP: TPoint;
  begin
    inherited;
    LSize := InitSize;
    GetCursorPos(LP);
    MoveWindow(Handle, LP.X, LP.Y, LSize.cx, LSize.cy, False);
  end;
  
  
negative.code:     constructor Create(APaintManager: CPaintManagerUI);
    end;
  
  
  
  var
    AppsWindow: TAppsWindow;
  
  implementation
  
  function GetScreenSize: TSize;
  begin
    Result.cx := GetSystemMetrics(SM_CXSCREEN);
    Result.cy := GetSystemMetrics(SM_CYSCREEN);
  end;
  
  { TAppsWindow }
  
  