Propiedad (Name) de los menu.menuitemcollection

03/06/2005 - 12:22 por trivet | Informe spam
Dado el siguiente ejemplo, haber si me pueden ayudar o dar una ide

Dim oMenu As Menu.MenuItemCollectio
oMenu = Aplicacion.MainMenu.MenuItem

Dim strText as string
Dim i As integer

For i = 0 To oMenu.Count -
' De esta manera accedo a la propiedad text del menu y la guardo en un listbo
strText = oMenu(i).Inde
listbox(1).add(strtext
nex

Con este codigo obtengo el menu de mi aplicacion, pero lo que quiero no es
obtener el texto sino un valor que sea único y que no se pueda repetir, como por ejemplo el nombre del menu (name), para guardar estos valores en una tabla y assignar unas contraseñas propiedades

' he probado de hacer esto:
strText = oMenu(i).Nam
Pero la propiedad name no está disponible, y no deja utilizarl

' he probado esto otro
dim oHandle as IntPt
oHandle = oMenu(i).Handle, pero este valor cambia no es siempre el mismo

Ttampoco existe una propiedad Tag para el menu donde yo pueda guardar un codigo y despues leerlo

Entonces alguien sabria algun truc

trivet

Ver este tema: http://www.softwaremix.net/viewtopic-396975.html

Enviado desde http://www.softwaremix.net
 

Leer las respuestas

#1 Guillermo guille
03/06/2005 - 19:42 | Informe spam
si lo que quieres es poder acceder a ese menú desde el listbox, puedes añadir
el menú al listbox en lugar de añadir el "texto", de esa forma tendrás una
referencia al menú.
De todas formas, si es eso lo que quieres hacer, te recomendaría que te crearas
tu propia clase en la que puedes guardar el menú y sobrescribiendo el método
ToString conseguirás que en el "texto" mostrado del listbox se muestre lo que
devuelva ese método.

Échale un vistazo a esto para que lo comprendas mejor:
http://www.elguille.info/NET/dotnet...emData.htm

Nos vemos.
Guillermo
Microsoft VB MVP desde 1997
Te invito a mi sitio dedicado al VB y más...
http://www.elguille.info/
http://www.mundoprogramacion.com/
(puede que el correo usado sea anti-spam)


"trivet" wrote in message
news:

Dado el siguiente ejemplo, haber si me pueden ayudar o dar una idea

Dim oMenu As Menu.MenuItemCollection
oMenu = Aplicacion.MainMenu.MenuItems

Dim strText as string
Dim i As integer

For i = 0 To oMenu.Count - 1
' De esta manera accedo a la propiedad text del menu y la guardo en un
listbox
strText = oMenu(i).Index
listbox(1).add(strtext)
next

Con este codigo obtengo el menu de mi aplicacion, pero lo que quiero no es
obtener el texto sino un valor que sea único y que no se pueda repetir, como
por ejemplo el nombre del menu (name), para guardar estos valores en una
tabla y assignar unas contraseñas propiedades.

' he probado de hacer esto:
strText = oMenu(i).Name
Pero la propiedad name no está disponible, y no deja utilizarla

' he probado esto otro:
dim oHandle as IntPtr
oHandle = oMenu(i).Handle, pero este valor cambia no es siempre el mismo.

Ttampoco existe una propiedad Tag para el menu donde yo pueda guardar un
codigo y despues leerlo

Entonces alguien sabria algun truco


trivet


Ver este tema: http://www.softwaremix.net/viewtopic-396975.html

Enviado desde http://www.softwaremix.net


Preguntas similares