Menu No Aparece

[etrasvina]

Hola a Todos......
Tengo un problema con los menus..... antes de actualizar a la version 1.1
me funcionaban bien.... pero ya recompilados mis proyectos con la version
1.1 no me aparecen...... no se si tenga que cambiar algo..... el modo de
programar los menus son por codigo.... esto para poder interceptar que items
aparecen o no..... los menus los defino en el evento oninitialize del
formulario .... y mas o menos son asi:
menu ::oMenu
menuitem "&Catalogos"
menu
menuitem "Patrones" action ::ejecuta("nop211")
menuitem "Departamentos" action ::ejecuta("nop212a")
menuitem "Sucursales" action ::ejecuta("nop213a")
menuitem "Cultivos" action ::ejecuta("nop214a")
menuitem "Lotes" action ::ejecuta("nop215a")
menuitem "Actividades" action ::ejecuta("nop216a")
menuitem "Jefes De Camionetas" action ::ejecuta("nop217a")
menuitem "Empleados" action ::ejecuta("nop218a")
menuitem "Tipos De Gastos" action ::ejecuta("nop219")
menuitem "Conceptos De Nomina" action ::ejecuta("nop221")
endmenu
menuitem "&Capturas"
menu
menuitem "Nominas Eventuales" action ::ejecuta("nop311")
menuitem "Nominas Camionetas" action ::ejecuta("nop312")
menuitem "Gastos" action ::ejecuta("nop313")
menuitem "Nomina Administrativa"
menu
menuitem "Perfiles De Prestaciones" action ::ejecuta("nop318")
menuitem "Altas/Bajas de Empleados" action ::ejecuta("nop314")
menuitem "Tablas De Impuestos" action ::ejecuta("nop315")
menuitem "Nominas" action ::ejecuta("nop316")
menuitem "Incidencias Fijas" action ::ejecuta("nop317")
endmenu
endmenu
menuitem "&Reportes"
menu
menuitem "Nominas Eventuales"
menu
menuitem "Lista De Raya" action ::ejecuta("nop511a")
menuitem "Lista De Raya Lineal" action ::ejecuta("nop512")
menuitem "Recibos De Nomina" action ::ejecuta("nop513")
menuitem "Analitico De Costos" action ::ejecuta("nop514")
endmenu
endmenu
menuitem "&Configuracion"
menu
menuitem "Datos Generales" action ::ejecuta("nop830")
menuitem "Usuarios" action ::ejecuta("fusuarios")
endmenu
menuitem "&Salir" action ::Close()
endmenu

[ignacio]

Eduardo,
Este problema ya ha sido notificado y resuelto. De momento puede arreglarlo
haciendo ::SetMenu( ::oMenu ) al terminar la definición del menú.
Un saludo,
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"Eduardo Trasviña" <etrasvina@gmail.com> escribió en el mensaje
news:[email=4539b8bd@news.xailer.com...]4539b8bd@news.xailer.com...[/email]
> Hola a Todos......
>
> Tengo un problema con los menus..... antes de actualizar a la version
> 1.1 me funcionaban bien.... pero ya recompilados mis proyectos con la
> version 1.1 no me aparecen...... no se si tenga que cambiar algo.....
> el modo de programar los menus son por codigo.... esto para poder
> interceptar que items aparecen o no..... los menus los defino en el
> evento oninitialize del formulario .... y mas o menos son asi:
>
>
> menu ::oMenu
>
> menuitem "&Catalogos"
> menu
> menuitem "Patrones" action ::ejecuta("nop211")
> menuitem "Departamentos" action ::ejecuta("nop212a")
> menuitem "Sucursales" action ::ejecuta("nop213a")
> menuitem "Cultivos" action ::ejecuta("nop214a")
> menuitem "Lotes" action ::ejecuta("nop215a")
> menuitem "Actividades" action ::ejecuta("nop216a")
> menuitem "Jefes De Camionetas" action ::ejecuta("nop217a")
> menuitem "Empleados" action ::ejecuta("nop218a")
> menuitem "Tipos De Gastos" action ::ejecuta("nop219")
> menuitem "Conceptos De Nomina" action ::ejecuta("nop221")
> endmenu
>
> menuitem "&Capturas"
> menu
> menuitem "Nominas Eventuales" action ::ejecuta("nop311")
> menuitem "Nominas Camionetas" action ::ejecuta("nop312")
> menuitem "Gastos" action ::ejecuta("nop313")
> menuitem "Nomina Administrativa"
> menu
> menuitem "Perfiles De Prestaciones" action ::ejecuta("nop318")
> menuitem "Altas/Bajas de Empleados" action ::ejecuta("nop314")
> menuitem "Tablas De Impuestos" action ::ejecuta("nop315")
> menuitem "Nominas" action ::ejecuta("nop316")
> menuitem "Incidencias Fijas" action ::ejecuta("nop317")
> endmenu
> endmenu
>
> menuitem "&Reportes"
> menu
> menuitem "Nominas Eventuales"
> menu
> menuitem "Lista De Raya" action ::ejecuta("nop511a")
> menuitem "Lista De Raya Lineal" action ::ejecuta("nop512")
> menuitem "Recibos De Nomina" action ::ejecuta("nop513")
> menuitem "Analitico De Costos" action ::ejecuta("nop514")
> endmenu
> endmenu
>
> menuitem "&Configuracion"
> menu
> menuitem "Datos Generales" action ::ejecuta("nop830")
> menuitem "Usuarios" action ::ejecuta("fusuarios")
> endmenu
>
> menuitem "&Salir" action ::Close()
> endmenu
>
>