Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

How to add e-mail functionality to your menu

Menus

How to add e-mail functionality to your menu

by  Mike Gagnon  Posted    (Edited  )
By creating a menu programmatically you can add e-mail functionality using the following.
Code:
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD _msm_file OF _MSYSMENU PROMPT "\<File" COLOR SCHEME 3 ;
    NEGOTIATE  LEFT, NONE ;
    KEY ALT+F, "" ;
MESSAGE "Creates, opens, saves, prints files or quits Visual FoxPro"
ON PAD _msm_file OF _MSYSMENU ACTIVATE POPUP _mfile
DEFINE POPUP _mfile MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR _mfi_send OF _mfile PROMPT "Sen\<d..." ;
    PICTRES _mfi_send 
DEFINE BAR _mfi_quit OF _mfile PROMPT "E\<xit" ;
    PICTRES _mfi_quit ;
    MESSAGE "Quits Visual FoxPro"

Mike Gagnon
Register to rate this FAQ  : BAD 1 2 3 4 5 6 7 8 9 10 GOOD
Please Note: 1 is Bad, 10 is Good :-)

Part and Inventory Search

Back
Top