Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to refresh prompts after skip for field updated?
Message
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de menu & Menus
Divers
Thread ID:
00131995
Message ID:
00138231
Vues:
14
found out it is a know problem. recorded in mskb. to fix the problem a college mine - joe hernandez - made a change to the genmenu.


\*************************************************************************************
\* this code is unchanged
\*************************************************************************************
\LPARAMETERS oFormRef, getMenuName, lUniquePopups, parm4, parm5, parm6, parm7, parm8, parm9
\LOCAL cMenuName, nTotPops, a_menupops
\IF TYPE("m.oFormRef") # "O" OR ;
\ LOWER(m.oFormRef.BaseClass) # 'form' OR ;
\ m.oFormRef.ShowWindow # 2
\ MESSAGEBOX(<>)
\ RETURN
\ENDIF
\m.cMenuName = IIF(TYPE("m.getMenuName")="C",m.getMenuName,SYS(2015))
\IF TYPE("m.getMenuName")="L" AND m.getMenuName
\ m.oFormRef.Name = m.cMenuName
\ELSE
\*************************************************************************************
\* Changed code to provide access to SKIP TO in SDI forms - Joe Hernandez 9/15/98
\*************************************************************************************
\ IF !TYPE("m.oFormRef.MenuName")="U"
\ m.oFormRef.MenuName = m.cMenuName
\ ENDIF
\ENDIF

the change puts the menu name into a custom property of the toplevelform named "menuname". the menuname property must already exists. this allows for ACTIVATE MENU menuname NOWAIT, which updates the skip fors.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform