Hola a Todos !
Como Deshabilito un Menu?
Tengo el siguiente codigo
METHOD Menu1Item1_1Click( oSender, oMenu ) CLASS TForm1
Tcuentas():New( Self ):Show()
RETURN Nil
Tcuentas() se encuentra en otro PRG y si es llamado correctamente, pero
cuando vuelvo a darle click en el Menu de Cuentas se vuelva a llamar
Tcuentas()
Si le doy 10 clicks en la Opcion Cuentas 10 veces se llama la Forma de
Cuentas
como deshabilito el Menu de donde es llamado ?
o sea Deshabilitar Tmenu
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.
Como Deshabilitar un Menu
-
Martin del Angel[1]
- Mensajes: 114
- Registrado: Dom Dic 18, 2005 7:50 pm
Como Deshabilitar un Menu
Martín,
> Como Deshabilito un Menu?
>
> Tengo el siguiente codigo
>
> METHOD Menu1Item1_1Click( oSender, oMenu ) CLASS TForm1
> Tcuentas():New( Self ):Show()
> RETURN Nil
>
>
> Tcuentas() se encuentra en otro PRG y si es llamado correctamente, pero
> cuando vuelvo a darle click en el Menu de Cuentas se vuelva a llamar
> Tcuentas()
>
> Si le doy 10 clicks en la Opcion Cuentas 10 veces se llama la Forma de
> Cuentas
>
> como deshabilito el Menu de donde es llamado ?
>
> o sea Deshabilitar Tmenu
Si lo que quieres es que no se puedan abrir varios formularios a la vez, lo
correcto es mostrar el formulario con ShowModal(), es decir:
Tcuentas():New( Self ):ShowModal()
De esa forma, hasta que el usuario no cierre el formulario no podrá abrir
otro. Por otro lado, si no quieres que sea modal, entonces lo correcto es
dejar al usuario hacer lo que quiera; si quiere abrir 20 veces un
formulario, pues que lo haga.
No obstante, la forma de desactivar una opción de menú es usando su
propiedad lEnabled. Para eso, cuando diseñas el menú, tienes que poner algún
nombre en la propiedad cVarName, para que se declare como componente en la
clase (p.ej. oMenuCuentas) y después, simplemente pones:
::oMenuCuentas:lEnabled := .F.
--
Un saludo,
José F. Giménez
> Como Deshabilito un Menu?
>
> Tengo el siguiente codigo
>
> METHOD Menu1Item1_1Click( oSender, oMenu ) CLASS TForm1
> Tcuentas():New( Self ):Show()
> RETURN Nil
>
>
> Tcuentas() se encuentra en otro PRG y si es llamado correctamente, pero
> cuando vuelvo a darle click en el Menu de Cuentas se vuelva a llamar
> Tcuentas()
>
> Si le doy 10 clicks en la Opcion Cuentas 10 veces se llama la Forma de
> Cuentas
>
> como deshabilito el Menu de donde es llamado ?
>
> o sea Deshabilitar Tmenu
Si lo que quieres es que no se puedan abrir varios formularios a la vez, lo
correcto es mostrar el formulario con ShowModal(), es decir:
Tcuentas():New( Self ):ShowModal()
De esa forma, hasta que el usuario no cierre el formulario no podrá abrir
otro. Por otro lado, si no quieres que sea modal, entonces lo correcto es
dejar al usuario hacer lo que quiera; si quiere abrir 20 veces un
formulario, pues que lo haga.
No obstante, la forma de desactivar una opción de menú es usando su
propiedad lEnabled. Para eso, cuando diseñas el menú, tienes que poner algún
nombre en la propiedad cVarName, para que se declare como componente en la
clase (p.ej. oMenuCuentas) y después, simplemente pones:
::oMenuCuentas:lEnabled := .F.
--
Un saludo,
José F. Giménez