Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Menu on non-toplevel form
Message
De
10/06/2003 16:08:56
Walter Meester
HoogkarspelPays-Bas
 
 
À
10/06/2003 16:00:46
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de menu & Menus
Divers
Thread ID:
00798293
Message ID:
00798600
Vues:
29
>Doing it this way does require you to add the code for define popup and on selection.
>
>What do you mean the menu does not show up at the right coordinates. Where do you want it?

1. If I use ON PAD .... ACTIVATE POPUP
- the popup does show up with or without any single border (depended on the SHORTCUT clause of DEFINE POPUP)
- with border, it still is no 3D and the menuitems don´t get selected automaticly when you hover over it

2. With ON SELECTION PAD .... ACTIVATE POPUP
- The popup looks like a normal Windows menupopup, but does display at the wrong x,y position. Though you can calculate the Y postion, determining the X position is a lot harder.
- You can not browse through the menu (when you´ve got activated the menu choose other pads and the popups show automatically)

And of course, the menu itself does not look like a graphical menubar.
Anyways this looks like a strategy with all kinds of problems.


>Jason
>
>>Hi Jason,
>>
>>
>>>Create a procedure or program to setup your menu which will include:
>>>
>>>DEFINE MENU Route_Status_Menu BAR AT LINE .1 IN WINDOW frmRoute_Status
>>>
>>>then do all the define pads, bars, popups, on selections, etc.
>>>
>>>at the bottom of the menu setup code:
>>>
>>>ACTIVATE MENU Route_Status_Menu NOWAIT
>>>
>>>In the init event of the form, call the procedure or program to setup and activate the menu.
>>
>>Yes, I´ve gotten that far, but apart from that the menu looks different from the normal menu, I can´t to seem to find a way to let the menupopus look like the standard windows way, unless I use ON SELECTION PAD .... ACTIVATE POPUP .... , Now this has the main problem that the menu does not show up on the right coordinates.
>>
>>Have you found a way out ?
>>
>>Walter,
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform