[RESUELTO] Ocultar barra de Menús

Desarrollo de Macros y programación en UNO, usar las API, llamar programas externos...

[RESUELTO] Ocultar barra de Menús

Notapor roliwar » Vie Mar 04, 2011 4:31 pm

Hola. Estoy incursionando en el mundo de OpenOffice a nivel de macros, y quisiera saber si alguien sabe si es posible ocultar la barra de menus, no me refiero a una barra de herramientas sino a los menus 'Archivo', 'Editar, 'Ver', etc. Aclaro que no me sirve la opción de pantalla completa porque necesito mostrar las barras de formato y otras, la que necesito desactivar es la de Menús, o en su defecto, poder inactivar las opciones de Nuevo, Cerrar y Guardar.

Gracias de antemano.
Última edición por roliwar el Vie Mar 04, 2011 10:23 pm, editado 1 vez en total
OpenOffice 3.1 en Windows Seven
roliwar
 
Mensajes: 52
Registrado: Vie Feb 25, 2011 1:22 am

Re: Ocultar barra de Menús

Notapor Cascabel » Vie Mar 04, 2011 8:56 pm

Macros para ocultar y mostrar la barra de menú mediante botones de un formulario (no especificas cuándo la quieres ocultar, es decir, con qué evento ejecutarás la macro):
Código: Seleccionar todo   Expandir vistaContraer vista
Sub sBotonOcultarBarraMenu(Event As Object)
   Dim oForm As Object
   Dim oLayMan As Object
   oForm=Event.Source.Model.Parent
   oLayMan=oForm.Parent.Parent.CurrentController.Frame.LayoutManager
   oLayMan.HideElement("private:resource/menubar/menubar")
End Sub

Sub sBotonMostrarBarraMenu(Event As Object)
   Dim oForm As Object
   Dim oLayMan As Object
   oForm=Event.Source.Model.Parent
   oLayMan=oForm.Parent.Parent.CurrentController.Frame.LayoutManager
   oLayMan.ShowElement("private:resource/menubar/menubar")
End Sub
OOo 3.3.0: OOO330m20 (Build:9567) en WXP+SP3 y en Ubuntu 10.10
Cascabel
 
Mensajes: 283
Registrado: Mié Nov 11, 2009 10:53 am

Re: Ocultar barra de Menús

Notapor eltete » Vie Mar 04, 2011 9:10 pm

Si vas a Herramientas --> Personalizar --> Menús seleccionas el menú que quieras, Archivo, por ejemplo, vas marcando cada Entrada , clicas sobre Modificar y Borras. Esto te dejará vacíos de contenido los menús que quieras
Win XP SP3 OpenOffice 3.2.1
Avatar de Usuario
eltete
 
Mensajes: 260
Registrado: Lun Oct 25, 2010 8:47 pm
Ubicación: Sant Cugat del Vallés - España

Re: Ocultar barra de Menús

Notapor roliwar » Vie Mar 04, 2011 10:22 pm

Cascabel escribió:Macros para ocultar y mostrar la barra de menú mediante botones de un formulario (no especificas cuándo la quieres ocultar, es decir, con qué evento ejecutarás la macro):
Código: Seleccionar todo   Expandir vistaContraer vista
Sub sBotonOcultarBarraMenu(Event As Object)
   Dim oForm As Object
   Dim oLayMan As Object
   oForm=Event.Source.Model.Parent
   oLayMan=oForm.Parent.Parent.CurrentController.Frame.LayoutManager
   oLayMan.HideElement("private:resource/menubar/menubar")
End Sub

Sub sBotonMostrarBarraMenu(Event As Object)
   Dim oForm As Object
   Dim oLayMan As Object
   oForm=Event.Source.Model.Parent
   oLayMan=oForm.Parent.Parent.CurrentController.Frame.LayoutManager
   oLayMan.ShowElement("private:resource/menubar/menubar")
End Sub


GRACIAS cascabel!! funcionó perfectamente.
OpenOffice 3.1 en Windows Seven
roliwar
 
Mensajes: 52
Registrado: Vie Feb 25, 2011 1:22 am


Volver a Macros y API UNO

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 1 invitado