Petit exemple pour afficher un menu popup.
Creez une fenetre.
Clic droit sur la fenetre, puis evenement puis mousedown (soit un clic de souris)

maintenant entrez le code :

PUBLIC SUB Form_MouseDown()

&nbsp 'Defini nos variables pour le menu popup
&nbsp DIM hmenus AS Menu
&nbsp DIM hmenu AS Menu
&nbsp 'Define the menu dans fmain
&nbsp hMenus = NEW Menu(FMain)
&nbsp 'crée le menu popup
&nbsp hMenu = NEW Menu(hMenus) AS hMenu
&nbsp 'Ajoute le texte au menu
&nbsp hMenu.Text = ( premier item )
&nbsp 'Ajoute un deuxieme texte
&nbsp hMenu = NEW Menu(hMenus) AS hMenu1
&nbsp hMenu.Text = ( deuxieme item )
&nbsp IF hMenus THEN hMenus.Popup()
END

Maintenant il faut definir deux fontions quand nous cliquons sur le menupopup car il y a deux entrées dans ce menu ;
PUBLIC SUB hMenu_Click()
message( Vous avez cliqué sur le premier item du menu )
END

PUBLIC SUB hMenu1_Click()
&nbsp message( Vous avez cliqué sur le deuxieme item du menu )
END

et voila. !
Bonne semaine

);