DoPopup perform the popup method
Source position: menus.pp line 401
protected procedure TPopupMenu.DoPopup(
Sender: TObject
); virtual;