FoxPro/Visual FoxPro - Menu en Formulario

Quiero incluir un menu en mi formulario y como agregarle iconos a las opciones de este,,

Yo por ejemplo tengo esto:
pero no tengo idea de como ejecutar la acción que debo realizar cuando cojo una opción

#DEFINE MF_STRING 0
THIS.hWindow = GetFocus()
THIS.hSysPopup = GetSystemMenu (THIS.hWindow, 0)
THIS.hPopup = CreateMenu()
#DEFINE MF_CHECKED 0x8
#DEFINE MF_APPEND 0x100
#DEFINE TPM_LEFTALIGN 0x0
#DEFINE MF_DISABLED 0x2
#DEFINE MF_GRAYED 0x1
#DEFINE MF_SEPARATOR 0x800
*#DEFINE MF_STRING 0x0
#DEFINE MF_BITMAP 0x4
#DEFINE TPM_RETURNCMD 0x100
#DEFINE TPM_RIGHTBUTTON 0x2
#DEFINE MF_BYPOSITION 0x400
#DEFINE MF_POPUP 0x10

LOCAL lRet, lcNoItemsMenu, lcNoItemsPopup

m0 = "&Sistema, &Configuración..., &Opciones, &Listados, &Ayuda"
mp1 = ".F.Exportar &Reporte, .F.Exportar &Datos, .T.0, .F.&Imprimir Datos, .T.0, .T.&Configurar Impresora...,;
.T.Iniciar sesión como otro &Usuario, .T.&Salir"

mp2 = ".T.Usuarios, .T.Resultado"
mp3 = ".T.Usuarios, .T.Todas los Equipos, .T.Todas los Usuarios, .F.Todas las PCs"
mp4 = ".T.Todos los Equipos, .T.Equipos no Informáticos, .T.Listado de Usuarios, .T.Listado de Usuarios Conectados"
mp0 = ".T.Todos los Equipos, .T.Equipos no Informáticos, .T.Listado de Usuarios, .T.Listado de Usuarios Conectados"
*!* Creamos el menu
THIS.hWindow = GetFocus()
THIS.hSysPopup = GetSystemMenu (THIS.hWindow, 0)
THIS.h

bueno tan simple como esto DO MENU.MPR WITH THIS.

EN EL INIT DEL FORM.
DONDE MENU.MPR ES EL MENU QUE VAS A GENERAR EN VFP.
SI LE QUERES PONER ICONOS. HABRI TI EJECUTABLE CON VFP7. YA TE LO HACE POR DEFECTO. EN EL 6. AUN NO .PARA QUE SE VEA COMO EL MENU DE WORD.

NOTAÇ: Recorda poner el formulario en nivel superior. como nivel sup.
si no te funciona consulta a mi correo y te envio un ejemplo ok DOUGLAS SANCHEZ DE NICARAGUA

Coloca en el codigo init de tu formulario principal lo siguiente:

application.visible=.t.
set default to C:/TX-DATOS-YARACUY
set path to consultas, base de datos, imagenes, archivos,informes, formularios, proyectos, tablas
do yaracuy.mpr with this,.t.

********************************************************************************

yaracuy.mpr es el nombre de tu menu que al ser generado se guarda con la extension .mpr,

Cualquier duda me avisas!!!!!

Salu2.