Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Top level form with shortcut menus don't work
Message
De
05/10/2005 11:56:43
 
 
À
05/10/2005 05:59:08
Cetin Basoz
Engineerica Inc.
Izmir, Turquie
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP SP1
Database:
Visual FoxPro
Divers
Thread ID:
01056113
Message ID:
01056326
Vues:
45
Cetin,
Thanks for your response.

Would you mind looking at the code in the click event of the comand button?
I am setting _vfp.visible=.f., _screen.visible = .f.
LOCAL lcMnu, loForm 
   loForm = ThisForm
   lcMnu = 'Clients'
   DEFINE POPUP (lcMnu) shortcut FROM MROW(), MCOL()+1
   DEFINE BAR 1 OF (lcMnu) PROMPT '\<Client File'
   DEFINE BAR 2 OF (lcMnu) PROMPT '\<New Client'
   WITH loForm
     ON SELECTION BAR 1 OF (lcMnu) DO FORM  "FmClients"
     ON SELECTION BAR 2 OF (lcMnu) DO FORM  "New_Master"    
     ACTIVATE POPUP (lcMnu)
     Release POPUP (lcMnu)  
     * Turn on Save
     .Editing = .T.     
   ENDWITH    
If I change the environmental settings and show type it works as expected.
What am I missing?

Al
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform