Utilizo el Método FormShow() para mostrar a través de un MsgInfo() las
opciones del menú del ejemplo anexo MENU.JPG, sin embargo solo me muestra
las opciones del menu horizontal que son:
Archivo
Edición
Ver
METHOD FormShow( oSender ) CLASS Menu
Local l_oItem := ::oMenu1:aItems
Local l_nItr := 1
Local l_cItem := ''
For l_nItr := 1 to Len(l_oItem)
l_cItem := l_oItem[l_nItr]:cText
MsgInfo(l_cItem)
Next
RETURN NIL
La duda es:
Como hacerle para mostrar con el MsgInfo() las opciones que pertenecen a
Archivo que son:
Nuevo
Abrir
Salir
Saludos:
Ing. Guillermo Guevara Carrillo
Attached files
In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.
Cargar opciones de TMenu
-
Guillermo Guevara Car
- Mensajes: 176
- Registrado: Sab Ene 19, 2008 5:52 pm
-
Guillermo Guevara Car
- Mensajes: 176
- Registrado: Sab Ene 19, 2008 5:52 pm
Cargar opciones de TMenu
Toc, Toc, Toc...
Hay alguien en casa
Guillermo Guevara Carrillo
> Utilizo el Método FormShow() para mostrar a través de un MsgInfo() las
> opciones del menú del ejemplo anexo MENU.JPG, sin embargo solo me muestra
> las opciones del menu horizontal que son:
>
> Archivo
> Edición
> Ver
>
> METHOD FormShow( oSender ) CLASS Menu
> Local l_oItem := ::oMenu1:aItems
> Local l_nItr := 1
> Local l_cItem := ''
> For l_nItr := 1 to Len(l_oItem)
> l_cItem := l_oItem[l_nItr]:cText
> MsgInfo(l_cItem)
> Next
> RETURN NIL
>
> La duda es:
>
> Como hacerle para mostrar con el MsgInfo() las opciones que pertenecen a
> Archivo que son:
>
> Nuevo
> Abrir
> Salir
>
> Saludos:
>
> Ing. Guillermo Guevara Carrillo
Hay alguien en casa
Guillermo Guevara Carrillo
> Utilizo el Método FormShow() para mostrar a través de un MsgInfo() las
> opciones del menú del ejemplo anexo MENU.JPG, sin embargo solo me muestra
> las opciones del menu horizontal que son:
>
> Archivo
> Edición
> Ver
>
> METHOD FormShow( oSender ) CLASS Menu
> Local l_oItem := ::oMenu1:aItems
> Local l_nItr := 1
> Local l_cItem := ''
> For l_nItr := 1 to Len(l_oItem)
> l_cItem := l_oItem[l_nItr]:cText
> MsgInfo(l_cItem)
> Next
> RETURN NIL
>
> La duda es:
>
> Como hacerle para mostrar con el MsgInfo() las opciones que pertenecen a
> Archivo que son:
>
> Nuevo
> Abrir
> Salir
>
> Saludos:
>
> Ing. Guillermo Guevara Carrillo