To usando o VisualLib e preciso ter mais de um "menu de barras" no mesmo sistema.
Normalmente eu uso um único menu de barras e os demais são "menus Down"
O primeiro menu de barras é algo assim:
1.Saidas 2.Entradas 3.Financeiro 4.Administrativo
Um dos segundos menus de barra - o que pertence a 1.Saídas - é algo assim:
1.1 Notas 1.2 PreNotas 1.3 Outras Saidas 1.4 Relatorios
O código que estou usando é o seguinte:
Código: Selecionar todos
M_Ini := NewBarMenu() // Menu barras Principal
M_Sai := NewBarMenu() // menu barras secundario
M_Ent := NewBarMenu() // menu barras secundario
M_Fin := NewBarMenu() // menu barras secundario
M_Adm := NewBarMenu() // menu barras secundario
M_Sai_NF := NewDownMenu()
M_SAi_PN := NewDownMenu()
M_SAi_OUS := NewDownMenu()
M_Sai_Rel := NewDownMenu()
AddBarItem( M_ini, "&1.Saidas" , "Notas de venda", M_Sai )
AddBarItem( M_ini, "&2.Entradas" , "Notas de compra", M_Ent )
AddBarItem( M_ini, "&3.Financ" , "Contas a pagar/rteceber", M_Fin )
AddBarItem( M_ini, "&4.Adm" , "Cadastro de usuarios", M_Adm )
AddBarItem( M_sai, "&1.Notas" , "Notas de venda", M_Sai_NF )
AddBarItem( M_sai, "&2.Pre-Notas" , "Notas de compra", M_Sai_PN )
AddBarItem( M_sai, "&3.Outras saidas" , "Contas a pagar/rteceber", M_SAI_OUS )
AddBarItem( M_sai, "&4.Realtorios" , "Cadastro de Notas de saida", M_Si_REL)
AddDownItem( M_Sai_NF, "&1.Cadastrar","Cadastra notas", { || VEst55() } )
AddDownSep ( M_Sai_NF ) // Linha de separação
AddDownItem( M_Sai_NF, "&2.Alterar", "Alterar notas", { || Vest53ne() } )
.... etc...
Código: Selecionar todos
Barmenu ( M_ini ) Alguém sabe como codificar um segundo menu de barras ( M_SAi ), para ser executado a partir de um primeiro menu de barras ( M_ini ) ?
Pelo visto, não é possível ter mais de um NewBrmenu() no mesmo sistema ...
Qualquer ajuda será bem-vinda,
Gabriel
,