Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copying, Cutting and Pasting
Message
From
25/02/2000 13:05:59
 
 
To
24/02/2000 22:15:49
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00336199
Message ID:
00337694
Views:
14
Thanks everyone for your help. I finally got it to work. I did have set sysmenu off in my code. Here is the code that worked.

Load

if thisform.lCutPaste
* allow edit controls without a menu
DEFINE POPUP _medit 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 _medit extended
endif


Thanks again,
Tyler
Previous
Reply
Map
View

Click here to load this message in the networking platform