4D v16.3
SET MENU BAR
- Manual de linguagem 4D
-
- Menus
-
- Gestão de Menus
- 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 {; processo}{; *} ) | ||||||||
| Parâmetro | Tipo | Descrição | ||||||
| barra | Inteiro longo, String, MenuRef |
|
Número ou nome da barra de menu ou referência de Menu | |||||
| processo | Inteiro longo |
|
Número de referência de processo | |||||
| * | Operador |
|
Guardar estado da barra de menu | |||||
MENU BAR substitui a barra de menus atual com a especificada por barra no processo atual unicamente. No parâmetro barra, pode passar o número ou nome da nova barra. Igualmente pode passar uma referência única de menu (tipo MenuRef, string de 16 caracteres). Quando trabalha com referências, os menus podem ser utilizados como barras de menu e vice-versa (ver a seção Gestão de Menus).
Nota: o nome de uma barra de menus pode conter até 31 caracteres e deve ser único.
Se passa o parâmetro opcional processo modifica a barra de menus do processo especificado por barra.
Nota: se passa um parâmetro MenuRef em barra, o parâmetro processo é inútil e é ignorada.
O parâmetro opcional * lhe permite conservar o estado da barra de menus. Se este parâmetro é omitido, MENU BAR reinicializa a barra de menus quando o comando é executado.
Por exemplo, imagine que SET MENU BAR(1) é executado. Depois, vários comandos de menu são desativados utilizando o comando DISABLE MENU ITEM.
Se SET MENU BAR(1) é executado uma segunda vez, desde o mesmo processo ou desde um processo diferente, todos os comandos de menu regressarão a seu estado de ativação inicial.
Se SET MENU BAR(1;*) é executado, a barra de menus conservará seu estado anterior, e os comandos de menu que estavam inativos permanecerão inativos.
Nota: se passa um parâmetro MenuRef em barra, o parâmetro * é inútil e será ignorada.
Quando um usuário entra ao ambiente Aplicação, é mostrada a primeira barra de menus (Barra #1). Pode mudar esta barra de menus por padrão abrindo o banco e especificando a barra de menus desejada no Método banco de dados On Startup ou no método de início associado a um usuário individual.
O exemplo a seguir modifica a barra de menus atual pela barra de menus #3 e restabelece o estado dos comandos de menu a seus estados originais:
SET MENU BAR(3)O exemplo a seguir modifica a barra de menus atual pela barra de menus chamada “BarraForm1” e salva o estado dos comandos de menus. Comandos de menus que foram desativados previamente aparecerão inativos.
SET MENU BAR("BarraForm1";*)O exemplo a seguir substitui a barra de menus atual pela barra de menus #3 enquanto os registros são modificados. Uma vez os registros sejam modificados, a barra de menus #2 é restaurada. O estado dos comandos de menu é conservado:
SET MENU BAR(3)
ALL RECORDS([Clientes])
MODIFY SELECTION([Clientes])
SET MENU BAR(2;*)Neste exemplo, criaremos por programação, uma barra de menus incluindo os seguintes menus Arquivo e Edição:
`Método de criação menu Arquivo
C_STRING(16;MenuArquivo) ` MenuArquivo conterá a referência de menu Arquivo
MenuArquivo:=Create menu
INSERT MENU ITEM(MenuArquivo;-1;"Meu banco de dados "+Get indexed string(131;29))
SET MENU ITEM MARK(MenuArquivo;1;Char(18))
INSERT MENU ITEM(MenuArquivo;-1;"(-")
INSERT MENU ITEM(MenuArquivo;-1;"Sair do modo Test Application mode/Y")+++
SET MENU ITEM PROPERTY(MenuArquivo;3;Associated standard action;Return to Design mode)
INSERT MENU ITEM(MenuArquivo;-1;"(-")
INSERT MENU ITEM(MenuArquivo;-1;Get indexed string(131;26))
SET MENU ITEM PROPERTY(MenuArquivo;6;Associated standard action;Preferences Action) `Preferências
INSERT MENU ITEM(MenuArquivo;-1;"(-")
INSERT MENU ITEM(MenuArquivo;-1;Get indexed string(131;30))
SET MENU ITEM PROPERTY(MenuArquivo;7;Associated standard action;Quit action) `Sair
SET MENU ITEM SHORTCUT(MenuArquivo;7;Character code("Q"))
`Método de criação do menu Procurar e substituir
C_STRING(16;MenuProcurareSubstituir) `MenuProcurareSubstituir conterá a referência do menu Procurar e substituir
MenuProcurarSubstituir:=Create menu
APPEND MENU ITEM(MenuProcurareSubstituir;"Procurar;Procurar Próximo;Procurar anterior;(-;Substituir;Substituir próximo;Substituir anterior")
SET MENU ITEM SHORTCUT(MenuProcurareSubstituir;1;Character code("F"))
SET MENU ITEM SHORTCUT(MenuProcurareSubstituir;5;Character code("R"))
SET MENU ITEM METHOD(MenuProcurareSubstituir;1;"MeuMetodoProcurar")
`Método de criação do menu Edição
C_STRING(16;MenuEdição) `EditMenu conterá a referência do menu Edição
MenuEdição:=Create menu
APPEND MENU ITEM(MenuEdição;"Cortar;Copiar;Colar")
SET MENU ITEM SHORTCUT(MenuEdição;1;Character code("X"))
SET MENU ITEM PROPERTY(MenuEdição;1;Associated standard action;Cut action)
SET MENU ITEM SHORTCUT(MenuEdição;2;Character code("C"))
SET MENU ITEM PROPERTY(MenuEdição;2;Associated standard action;Copy action)
SET MENU ITEM SHORTCUT(MenuEdição;3;Character code("V"))
SET MENU ITEM PROPERTY(MenuEdição;3;Associated standard action;Paste action)
INSERT MENU ITEM(MenuEdição;-1;"(-")
INSERT MENU ITEM(MenuEdição;-1;"Procurar e substituir";MenuProcurareSubstituir) ` línha que terá o submenu
main_Bar:=Create menu ` Criar a barra de menus com os outros menus
INSERT MENU ITEM(main_Bar;-1;Get indexed string(79;1);MenuArquivo)
APPEND MENU ITEM(main_Bar;"Edição";MenuEdição)
SET MENU BAR(main_Bar)
Produto: 4D
Tema: Menus
Número
67
Modificado: 4D v11 SQL
Manual de linguagem 4D ( 4D v16)
Manual de linguagem 4D ( 4D v16.1)
Manual de linguagem 4D ( 4D v16.2)
Manual de linguagem 4D ( 4D v16.3)
