[Delphi] PopupMenu

Jak zrobić, aby po wciśnieciu LPM rozwijał się PopupMenu?

Chodzi mi o Delphi6.

W OnMouseDown (OnMouseUp):

PopupMenu1.Popup(Point(X, Y))
czy też:
PopupMenu1.Popup(X, Y)

Nie pamiętam składni.

1. wsadź na formę komponent TPopUpMenu
2. stwórz jakieś menu - w Popup'ie

na formie - OnMouseDown:

begin
if (Button = mbRight) then
PopupMenu1.Popup(mouse.CursorPos.X, mouse.CursorPos.Y);
end;

albo prościej:

Events - na formie (2 zakładka w OI[Object Inspector]) właściwość
PopupMenu - wybierz nazwę PopUp'a

Dzieki Wam!

chyba w popup menu jest lefttract albo coś takiego

chyba w popup menu jest lefttract albo coś takiego

Jest zdaje się trackbutton, ale nie działa to tak, jak miało być w pytaniu (właściwie sam ni wiem, co to daje :) )