Página 1 de 1

VisualLib: Como criar mais de 1 NewBarMenu() ?

Enviado: 19 Jul 2012 04:30
por lugab
Ola amigos, bom dia...

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...

O erro acontece na linha

Código: Selecionar todos

  Barmenu ( M_ini ) 
, no momento em que clico para executar o segundo menu de barras ( M_SAi ) recebo um tal "erro de limite: acesso de array" e ai cancela...

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
,