Information générale
Catégorie:
Codage, syntaxe et commandes
Thanks David,
I haven't been able to get your idea to work yet. I kept getting property cCutPasteMenuName not found error so this is the code I have been using. The shortcut keys don't seem to be doing anything.
Form Load
if thisform.lCutPaste
* allow edit controls without a menu
DEFINE POPUP cCutPasteMenu RELATIVE
DEFINE BAR _med_undo OF _medit PROMPT "Undo" ;
KEY CTRL+Z
DEFINE BAR _med_redo OF _medit PROMPT "Redo" ;
KEY CTRL+R
DEFINE BAR _med_cut OF _medit PROMPT "Cut" ;
KEY CTRL+X
DEFINE BAR _med_copy OF _medit PROMPT "Copy" ;
KEY CTRL+C
DEFINE BAR _med_paste OF _medit PROMPT "Paste" ;
KEY CTRL+V
DEFINE BAR _med_slcta OF _medit PROMPT "Select All" ;
KEY CTRL+A
endif
QueryUnload
if thisform.lCutPaste
release popup CutPasteMenu extended
endif
Any more suggestions,
Tyler
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