4D v16.3
SET MENU BAR
- Manual de lenguaje 4D
-
- Menús
-
- Gestión de menús
- APPEND MENU ITEM
- Count menu items
- Count menus
- Create menu
- DELETE MENU ITEM
- DISABLE MENU ITEM
- Dynamic pop up menu
- ENABLE MENU ITEM
- Get menu bar reference
- Get menu item
- GET MENU ITEM ICON
- Get menu item key
- Get menu item mark
- Get menu item method
- Get menu item modifiers
- Get menu item parameter
- GET MENU ITEM PROPERTY
- Get menu item style
- GET MENU ITEMS
- Get menu title
- Get selected menu item parameter
- INSERT MENU ITEM
- Menu selected
- RELEASE MENU
- SET MENU BAR
- SET MENU ITEM
- SET MENU ITEM ICON
- SET MENU ITEM MARK
- SET MENU ITEM METHOD
- SET MENU ITEM PARAMETER
- SET MENU ITEM PROPERTY
- SET MENU ITEM SHORTCUT
- SET MENU ITEM STYLE
SET MENU BAR
| SET MENU BAR ( barra {; proceso}{; *} ) | ||||||||
| Parámetro | Tipo | Descripción | ||||||
| barra | Entero largo, Cadena, MenuRef |
|
Número o nombre de la barra de menús o Referencia de menú | |||||
| proceso | Entero largo |
|
Número de referencia del proceso | |||||
| * | Operador |
|
Guardar el estado de la barra de menús | |||||
MENU BAR reemplaza la barra de menús actual con la especificada por barra en el proceso actual únicamente. En el parámetro barra, puede pasar el número o nombre de la nueva barra. Igualmente puede pasar una referencia única de menú (tipo MenuRef, cadena de 16 caracteres). Cuando trabaja con referencias, los menús pueden ser utilizados como barras de menú y viceversa (ver la sección Gestión de menús).
Nota: el nombre de una barra de menús puede contener hasta 31 caracteres y debe ser único.
Si pasa el parámetro opcional proceso cambia la barra de menús del proceso especificado por barra.
Nota: si pasa un parámetro MenuRef en barra, el parámetro proceso es inútil y se ignorará.
El parámetro opcional * le permite conservar el estado de la barra de menús. Si este parámetro se omite, MENU BAR reinicializa la barra de menús cuando el comando se ejecuta.
Por ejemplo, imagine que SET MENU BAR(1) se ejecuta. Luego, varios comandos de menú se desactivan utilizando el comando DISABLE MENU ITEM.
Si SET MENU BAR(1) se ejecuta una segunda vez, desde el mismo proceso o desde un proceso diferente, todos los comandos de menú regresarán a su estado de activación inicial.
Si SET MENU BAR(1;*) se ejecuta, la barra de menús conservará su estado anterior, y los comandos de menú que estaban inactivos permanecerán inactivos.
Nota: si pasa un parámetro MenuRef en barra, el parámetro * es inútil y se ignorará.
Cuando un usuario entra al entorno Aplicación, se muestra la primera barra de menús (Barra #1). Puede cambiar esta barra de menús por defecto abriendo la base y especificando la barra de menús deseada en el Método de base On Startup o en el método de inicio asociado a un usuario individual.
El siguiente ejemplo cambia la barra de menús actual por la barra de menús #3 y restablece el estado de los comandos de menú a sus estados originales:
SET MENU BAR(3)El siguiente ejemplo cambia la barra de menús actual por la barra de menús llamada “BarraForm1” y guarda el estado de los comandos de menús. Comandos de menús que fueron desactivados previamente aparecerán inactivos.
SET MENU BAR("BarraForm1";*)El siguiente ejemplo reemplaza la barra de menús actual por la barra de menús #3 mientras los registros son modificados. Una vez los registros sean modificados, la barra de menús #2 se restaura. El estado de los comandos de menú se conserva:
SET MENU BAR(3)
ALL RECORDS([Clientes])
MODIFY SELECTION([Clientes])
SET MENU BAR(2;*)En este ejemplo, crearemos por programación, una barra de menús incluyendo los siguientes menús Archivo y Edición:
`Metodo de creación menú Archivo
C_TEXT(16;MenuArchivo) ` MenuArchivo contendrá la referencia de menu Archivo
MenuArchivo:=Create menu
INSERT MENU ITEM(MenuArchivo;-1;"Mi base de datos "+Get indexed string(131;29))
SET MENU ITEM MARK(MenuArchivo;1;Char(18))
INSERT MENU ITEM(MenuArchivo;-1;"(-")
INSERT MENU ITEM(MenuArchivo;-1;"Salir del modo Test Application mode/Y")
SET MENU ITEM PROPERTY(MenuArchivo;3;Associated standard action;Return to Design mode)
INSERT MENU ITEM(MenuArchivo;-1;"(-")
INSERT MENU ITEM(MenuArchivo;-1;Get indexed string(131;26))
SET MENU ITEM PROPERTY(MenuArchivo;6;Associated standard action;Database settings action) `Preferencias
INSERT MENU ITEM(MenuArchivo;-1;"(-")
INSERT MENU ITEM(MenuArchivo;-1;Get indexed string(131;30))
SET MENU ITEM PROPERTY(MenuArchivo;7;Associated standard action;Quit action) `Salir
SET MENU ITEM SHORTCUT(MenuArchivo;7;Character code("Q"))
`Método de creación del menú Buscar y reemplazar
C_TEXT(MenuBuscaryReemplazar) `MenuBuscaryReemplazar contendrá la referencia del menú Buscar y reemplazar
MenuBuscaryReemplazar:=Create menu
APPEND MENU ITEM(MenuBuscaryReemplazar;"Buscar;Buscar Siguiente;Buscar anterior;(-;Remplazar;Remplazar siguientes;Reemplazar anterior")
SET MENU ITEM SHORTCUT(MenuBuscaryReemplazar;1;Character code("F"))
SET MENU ITEM SHORTCUT(MenuBuscaryReemplazar;5;Character code("R"))
SET MENU ITEM METHOD(MenuBuscaryReemplazar;1;"MiMetodoBuscar")
`Método de creación del menú Edición
C_TEXT(MenuEdicion) `EditMenu contendrá la referencia del menú Edición
MenuEdicion:=Create menu
APPEND MENU ITEM(MenuEdicion;"Cortar;Copiar;Pegar")
SET MENU ITEM SHORTCUT(MenuEdicion;1;Character code("X"))
SET MENU ITEM PROPERTY(MenuEdicion;1;Associated standard action;Cut action)
SET MENU ITEM SHORTCUT(MenuEdicion;2;Character code("C"))
SET MENU ITEM PROPERTY(MenuEdicion;2;Associated standard action;Copy action)
SET MENU ITEM SHORTCUT(MenuEdicion;3;Character code("V"))
SET MENU ITEM PROPERTY(MenuEdicion;3;Associated standard action;Paste action)
INSERT MENU ITEM(MenuEdicion;-1;"(-")
INSERT MENU ITEM(MenuEdicion;-1;"Buscar y reemplazar";MenuBuscaryReemplazar) ` línea que tendrá el submenú
main_Bar:=Create menu ` Cree la barra de menús con los otros menús
INSERT MENU ITEM(main_Bar;-1;Get indexed string(79;1);MenuArchivo)
APPEND MENU ITEM(main_Bar;"Edición";MenuEdición)
SET MENU BAR(main_Bar)
Producto: 4D
Tema: Menús
Número
67
Modificado: 4D v11 SQL
Manual de lenguaje 4D ( 4D v16)
Manual de lenguaje 4D ( 4D v16.1)
Manual de lenguaje 4D ( 4D v16.2)
Manual de lenguaje 4D ( 4D v16.3)
