Versions des environnements
>DEFINE POPUP shortcut SHORTCUT FROM MROW(0), MCOL(0)
This only works if the form is in the VFP screen; if the form's ShowWindow='2 - As Top-level' the above code will default to the main vfp screen -- not desired. The IN SCREEN clause is still required. The solution I found is to dynamically set the form Name property in the form INIT event; i.e., .Name=SYS(2015). However, I still needed the static Name for other uses, so I created a custom property (FormName) and set the static value to that. In my classes, I test for the existance of FormName; i.e., PEMSTATUS(thisform,"FormName",5) -- if found then use this value, otherwise, I use the normal Name property value.
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement