miércoles, 7 de octubre de 2015

Recorrer Menú en Power Builder

En esta entrada mostraré un pequeño ejemplo de como recorrer los items de un menú dentro de nuestra aplicación.

Por ejemplo tenemos una ventana llamada w_principal donde contiene un menú con dos items, uno con el nombre de Archivo y otro Definiciones:



Para saber la cantidad de sub items que posee el menú usaremos la función upperbound() el cual devuelve la cantidad de índices de un Array.

Ejemplo: upperbound(w_principal.Menuid.Item[2].Item)
Item[2] usamos porque queremos saber la cantidad de sub items del menú Definiciones.
Una vez sabido la cantidad podemos recorrerlo dentro de un ciclo.

FOR i=1 to upperbound(w_principal.Menuid.Item[2].Item)
w_principal.Menuid.Item[2].Item[i].enabled = false
NEXT
En nuestro ejemplo de ciclo recorremos con un For el menú Item[2] luego la posición del subitem en i Item[i] y usamos la propiedad enabled para desactivar el menú, un caso práctico sería recorrer las subitems y controlar permiso de acceso a ellos y controlamos si no tiene el permiso desactivamos.

No hay comentarios.:

Publicar un comentario