[Delphi] Botton i jego menu

Wiesz jak mozna dodac menu kontekstowe do bottona np.
jak klimam lewym przyciskiem myszy na Botton to pokaze sie menu,
takie jak PopupMenu noi co bendziesz taki bystry i mi powiesz! :|

daj na forme buttona i popupmenu. Dodaj coś do popup menu ( items )
i zaznacz teraz buttona i w object inspektor (properties ) poszukaj "popupmenu" ( pisze na czerwono :-)) potem z rozwiniętej listy wybierz "popupmenu1"
i gotowe
:-)

Ale jemu chodziło po kliknięciu lewym ,a nie prawym.

sorka nie doczytałem

Noto co dasie tak czy nie bo ja jusz niewiem [krzyk]

a ja wieeeeeeeeeeeeeeeeeeem:PPPPPPPP
są trzy możliwości:

po pierwsze primo: w popupmenu jest trackbutton (albo jakoś tak) i zmień na left

po drugie primo: w onclick buttonu dajesz:
var p:tpoint;
begin
getcursorpos(p);
popupmenu1.popup(p.x,p.y);
end;

po trzecie primo: patrz punkt pierwszy;)

Super to dziala jestes super koles oto mi wlasnie chodzilo :-)

<font color="green">po drugie primo: w onclick buttonu dajesz:
var p:tpoint;
begin
getcursorpos(p);
popupmenu1.popup(p.x,p.y);
end;

          </span>

[cya]