可以做到:
你自己做一个PopuMenu,在里面添加一行菜单项目:原来的菜单(&O),并且在其Click代码种添加一句
exit;即可!然后在Memo的OnContextPopup事件中添加如下的代码:
var
  p:tpoint;
begin
  GetCursorPos(p);
  PopupMenu1.Popup(p.x,p.y);
  handled:=true/false;//根据需要进行处理!需要显示原来菜单的话,用false!否则true;
end;