[f00rd]

А можно и легче:
(PopupMenu1.PopupComponent as TEdit).Clear;

или на любой случай:
(((Sender as TMenuItem).GetParentMenu as TPopupMenu).PopupComponent as TEdit).Clear;