Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Open Forms with popup menu
Message
 
 
À
21/12/2006 09:30:30
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de menu & Menus
Divers
Thread ID:
01179538
Message ID:
01179617
Vues:
14
Hi Tariq,

By strange coincidence the same problem is discussed recently on the Russian VFP site http://forum.foxclub.ru/read.php?29,244493

Basically, the user po2 suggests to use the following:

comment out ON SELECTION BAR statements and use
on selection popup ABC deactivate popup ABC 
   ACTIVATE POPUP ABC
in the case statement use BAR() instead of local variable.

Try your code with these modifications.


>Dear Experts
>
>On the click event of command button, I use following codes to open Forms.
>
>All Forms open correctly, but sometimes, when I click command button then nothing happend. I mean no Form opens.
>
>Please modfiy codes to work properly.
>
>LOCAL SELEP
>SELE=0
>
>DEFINE POPUP ABC SHORTCUT RELATIVE FROM 8,75 TO 24,110   TITLE 'A B O U T'
>
>DEFINE BAR 1 OF ABC PROMPT '\<1- The Prgrammer'FONT "Verdana",10 STYLE 'B' COLOR ,RGB(0,0,0,213,224,255)
>DEFINE BAR 2 OF ABC PROMPT '\<2- The software'FONT "Verdana",10 STYLE 'B' COLOR ,RGB(0,0,0,213,224,255)
>DEFINE BAR 3 OF ABC PROMPT '\<3- About us'FONT "Verdana",10 STYLE 'B' COLOR ,RGB(0,0,0,213,224,255)
>DEFINE BAR 4 OF ABC PROMPT '\-'
>DEFINE BAR 5 OF ABC PROMPT '\<4- Computer'FONT "Verdana",10 STYLE 'B' COLOR ,RGB(0,0,0,213,224,255)
>
>ON SELECT BAR 1 OF ABC SELEP =1
>ON SELECT BAR 2 OF ABC SELEP =2
>ON SELECT BAR 3 OF ABC SELEP =3
>ON SELECT BAR 4 OF ABC SELEP =4
>ON SELECT BAR 5 OF ABC SELEP =5
>
>Activate POPUP ABC
>
>DO CASE
>CASE SELEP=1
>	DO form aware
>CASE SELEP=2
>	DO form help
>CASE SELEP=3
>	DO form system1
>ENDCASE
>thisform.REFRESH
If it's not broken, fix it until it is.


My Blog
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform