Jak zrobić, aby po wciśnieciu LPM rozwijał się PopupMenu?
Chodzi mi o Delphi6.
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.
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 :) )