Information générale
Catégorie:
Gestionnaire de menu & Menus
Versions des environnements
I have checked all the thread you pointed and tried putting the code below above my shortcut menu code. I made all the shortcut menu in *.prg not in *.mpr but it doesn't change anything, so please in which part I have to put the code? (before this, I made the menu shortcut in prg and put your code above it but it generated an error so then I put your code above my shortcut menu and copied all of them and paste them to my command button click event but why it doesn't change a thing? Please help me more. Thank you.
Cmdcallmenu.click
Thisform.ScaleMode = 0 && Foxels
lnPosX = This.Left + This.Width
lnPosY = This.Top + This.Height
Thisform.ScaleMode = 3 && Back to Pixels
DEFINE POPUP shortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF shortcut PROMPT "\ PICTURE "graph12.ico"
DEFINE BAR 2 OF shortcut PROMPT "\-"
DEFINE BAR 3 OF shortcut PROMPT "\ PICTURE "06.ico"
DEFINE BAR 4 OF shortcut PROMPT "\-"
DEFINE BAR 5 OF shortcut PROMPT "\ PICTURE "42.ico"
DEFINE BAR 6 OF shortcut PROMPT "\-"
DEFINE BAR 7 OF shortcut PROMPT "Qui\ PICTURE "37.ico"
DEFINE BAR 8 OF shortcut PROMPT "\-"
DEFINE BAR 9 OF shortcut PROMPT "\ PICTURE "08.ico"
DEFINE BAR 10 OF shortcut PROMPT "\-"
DEFINE BAR 11 OF shortcut PROMPT "Qui\ PICTURE "misc04.ico"
ON SELECTION BAR 1 OF shortcut do form business.scx
ON SELECTION BAR 3 OF shortcut do form quisbis.scx
ON SELECTION BAR 5 OF shortcut do form lihat_sh.scx
ON SELECTION BAR 7 OF shortcut do form quizhap.scx
ON SELECTION BAR 9 OF shortcut do form medical.scx
ON SELECTION BAR 11 OF shortcut do form quismed.scx
ACTIVATE POPUP shortcut
regards
Syah N
Précédent
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