Fonction PopupMenu
PopupMenu( Liste de coupe { event, String});
On passe a PopupMenu une liste de couple { Event, String}. Les événements doivent être déclarés comme des objets
RemiseAZero Event;
et lorsque l'utilisateur sélectionnera une entrée de popupmenu, la clause associée à l'événement sera déclenchée.
On Event.RemiseAZero do ...