delphi - Højrekliksmenu - Udvikleren.dk - Programmering, webdesign og grafik

Tags: delphi

Bruger #3530 @ 12.08.03 20:58

Hej,
jeg vil gerne spørge hvordan koden skal se ud til at få en popupmenu frem alt efter hvor musen er, når den højreklikker:

Kode

procedure TForm1.FormContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
PopupMenu1.Popup(60,70);
end;

dette åbner bare menuen 60 pixel inde og 70 nede men hvordan bruger man så MousePos ??
//Xyber

4 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 1 karma

Bruger #2416 @ 12.08.03 21:07

Hejsa!

Kode

procedure TForm1.FormContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
PopupMenu1.Popup(MousePos.x,MousePos.y);
end;

Dette skulle kunne gøre det

---
Hilsen Anders

Bruger #3530 @ 12.08.03 21:25

Hejsa!

Kode

procedure TForm1.FormContextPopup(Sender: TObject; MousePos: TPoint;
  var Handled: Boolean);
begin
PopupMenu1.Popup(MousePos.x,MousePos.y);
end;

Dette skulle kunne gøre det

---
Hilsen Anders

Men JEg har fundet ud af at Form'en har sin helt egen property der hedder PopupMenu som bare kan skrives derfra.

//Xyber

Bruger #3530 @ 12.08.03 21:25

//Xyber

Bruger #2416 @ 12.08.03 22:01

Ja, det er nok nemmere

Tænkte ikke ligeså meget over det, skrev bare lige en hurtig løsning på koden

---
Hilsen Anders

Højrekliksmenu