Menu -Exportar, Importar

[robertomollo]

Saludos.

Si alguno de ustedes instalo la barra de yahoo, habran notado que es posible agregar una pagina en un menu favorito (este es denominado marcadores en yahoo).

En mi aplicación intento crear un menú en el cual se pueda agregar menu y sub menu (igual al de yahoo) luego guardar el menu que se creo. Una vez guardado poder abrirlo.

Es decir importar y exportar el menu.

Si uno de ustedes desarrollo con anterioridad algo parecido me podria dar una mano. Por mi parte no puedo resolverlo.

Gracias de antemano.

[MaxExtreme]

¿Te refieres a dejar que el usuario cree sus propios menús?

[robertomollo]

Hola.

Si.
Quiero q el usuario tenga la libertad de poder crear su propio menú.

Dentro de un submenu deberia tener el boton crear un menu y crear submenu.

Gracias de antemano.

[marcocho2005]

pues, un cacho negro que puedas hacer eso
en VB60 los menús son estáticos, no puedes aañadir ni eliminar
pero esto es posible en VB.Net

[MaxExtreme]

En cualquier lenguaje es posible que pueda usar la API... incluido VB6

Para crear, borrar y editar menús puedes usar las funciones de la API de Windows relacionadas...

http://msdn.microsoft.com/library/de...rces/menus.asp

Ahí todo lo necesario. Es relativamente largo.

[David]

puedes escribir en el registro o en un archivo los menús que crea el usuario
en tiempo de ejecución leer ese archivo y agregarlo así:
En tiempo de diseño
Agregar un menú llamado UserMenus(por ejemplo), colocar:
Visible = False
Index = 0
En tiempo de ejecución:
Load UserMenus(1)
UserMenus(1).Caption = 'Lugar donde almacenaste el texto
userMenus(1).Visible = True

[MaxExtreme]

Iniciado por David el Grande

puedes escribir en el registro o en un archivo los menús que crea el usuario
en tiempo de ejecución leer ese archivo y agregarlo así:
En tiempo de diseño
Agregar un menú llamado UserMenus(por ejemplo), colocar:
Visible = False
Index = 0
En tiempo de ejecución:
Load UserMenus(1)
UserMenus(1).Caption = 'Lugar donde almacenaste el texto
userMenus(1).Visible = True

***

No está preguntando eso. Ese menú es estático y lo que haces es cambiarle simplemente el texto.

El está diciendo poder modificar menús enteros, posiciones, submenús, etc, pero no sólo cambiarles el texto de cada uno.

[David]

Tal vez entendí mal su duda
ya que el código que le pasé servía para Crear un nuevo menu con un Caption nuevo

[MaxExtreme]

Iniciado por David el Grande

Tal vez entendí mal su duda
ya que el código que le pasé servía para Crear un nuevo menu con un Caption nuevo

No estás creando un menú. Estás Cargando un menú.

[robertomollo]

Hola a todos.

Para crear un menu en tiempo de ejecución, primero creo un array de un menú.
Luego con codigo añado un menu.

Lo que no puedo, es exportar el menu creado, y luego poder importarlo.
Necesito poder guardarlo en un archivo, para luego abrirlo.

Gracias por los comentarios.

[MaxExtreme]

Vuelve a leer mi post por favor que ya te contesté:

Iniciado por MaxExtreme

En cualquier lenguaje es posible que pueda usar la API... incluido VB6

Para crear, borrar y editar menús puedes usar las funciones de la API de Windows relacionadas...

http://msdn.microsoft.com/library/de...rces/menus.asp

Ahí todo lo necesario. Es relativamente largo.

"Simplemente" créalo con la API. En un fichero de texto te haces de alguna manera un formato para guardar "menús", por ejemplo:

Código:

MENU Archivo
	OPCION Nuevo
	OPCION Abrir
	OPCION Guardar
	MENU Exportar como...
		OPCION BMP
		OPCION JGP
		OPCION GIF
	END MENU
END MENU

MENU About
END MENU

O de cualquier otra manera que se te ocurra, aunque la verdad que ya se ha definido una manera de hacerlo para guardar recursos:

Código:

Here is the menu template for the shortcut menu that is provided in the application's resource-definition file.

PopupMenu MENU 
BEGIN 
  POPUP "Dummy Popup" 
    BEGIN 
      POPUP "Fonts" 
        BEGIN 
          MENUITEM "Courier",     IDM_FONT_COURIER 
          MENUITEM "Times Roman", IDM_FONT_TMSRMN 
          MENUITEM "Swiss",       IDM_FONT_SWISS 
          MENUITEM "Helvetica",   IDM_FONT_HELV 
          MENUITEM "Old English", IDM_FONT_OLDENG 
        END 
      POPUP "Sizes" 
        BEGIN 
          MENUITEM "7",  IDM_SIZE_7 
          MENUITEM "8",  IDM_SIZE_8 
          MENUITEM "9",  IDM_SIZE_9 
          MENUITEM "10", IDM_SIZE_10 
          MENUITEM "11", IDM_SIZE_11 
          MENUITEM "12", IDM_SIZE_12 
          MENUITEM "14", IDM_SIZE_14 
        END 
      POPUP "Styles" 
        BEGIN 
          MENUITEM "Bold",        IDM_STYLE_BOLD 
          MENUITEM "Italic",      IDM_STYLE_ITALIC 
          MENUITEM "Strike Out",  IDM_STYLE_SO 
          MENUITEM "Superscript", IDM_STYLE_SUPER 
          MENUITEM "Subscript",   IDM_STYLE_SUB 
        END 
    END 
 
END

Ten en cuenta que para hacer todo esto necesitarás manejar la cola de mensajes que te manda Windows...