Foros del Web

Foros del Web (http://www.forosdelweb.com/)
-   .NET (http://www.forosdelweb.com/f29/)
-   -   Recorrer todos los ToolStripMenuItem dentro de un MenuStrip (http://www.forosdelweb.com/f29/recorrer-todos-toolstripmenuitem-dentro-menustrip-476243/)

RsOfT 26/03/2007 13:20

Recorrer todos los ToolStripMenuItem dentro de un MenuStrip
 
Tengo un menú creado con varias opciones. ¿Cómo puedo recorrer todos las opciones del menú de tal forma que pueda poner todos los menú Enabled = false? :pensando:

Quiero algo como:
for each menuItems in Menus
menuItems.Enabled = false
Next

hildavanesa 14/04/2010 08:40

Respuesta: Recorrer todos los ToolStripMenuItem dentro de un MenuStrip
 
Hola..
Yo hice lo siguiente, solo adaptalo a lo que necesitas, con esto recorrer menu, submenu, subsubmenu,subsubsubmenu, etc..


For Each mnuitOpcion As ToolStripMenuItem In Me.MenuStrip1.Items
If mnuitOpcion.Name = Dt_NmbreMenu Then
CType(mnuitOpcion, ToolStripMenuItem).Visible = True
End If
If mnuitOpcion.DropDownItems.Count > 0 Then
Me.CambiarOpcionesMenu(mnuitOpcion.DropDownItems, Dt_NmbreMenu)
End If
Next

Private Sub CambiarOpcionesMenu(ByVal colOpcionesMenu As ToolStripItemCollection, ByVal nombre As String)
For Each itmOpcion As ToolStripItem In colOpcionesMenu


If itmOpcion.GetType() Is GetType(ToolStripMenuItem) Then
If itmOpcion.Name = nombre Then
CType(itmOpcion, ToolStripMenuItem).Visible = True
End If

If DirectCast(itmOpcion, ToolStripMenuItem).DropDownItems.Count > 0 Then
Me.CambiarOpcionesMenu(DirectCast(itmOpcion, ToolStripMenuItem).DropDownItems, nombre)
End If
End If
Next
End Sub


La zona horaria es GMT -6. Ahora son las 09:21.

Desarrollado por vBulletin® Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.