تحديد ظهور Popupmenu

var
  popupPoint : TPoint;
begin
  if Assigned(PopupMenu2) then
  begin
	popupPoint.X := MenuButton.Left + (MenuButton.Width DIV 2);
	popupPoint.Y := MenuButton.Top + (MenuButton.Height DIV 2);
	popupPoint := ClientToScreen(popupPoint);

	//سوف يتم عرض البوب اب منيو فى منتصف الزر
	PopupMenu2.Popup(popupPoint.X, popupPoint.Y);
  end;

بالتوفيق