GTWVG - Harbour 3.2
Enviado: 19 Dez 2023 15:25
Olá pessoal!
José neste post voce postou a imagem de um menu WINDOWS. Rodei o exemplo da GTwvg e não achei como ativar/desativar um item do submenu, somente consegui dos "cabeças"
supondo um menu neste contexto.
Como posso desabilitar o subitem 2 (--Alterar) do menu CADASTROS?
Sobre sua imagem dos botões que define icone e posição do texto, senti falta da AÇÃO, ou seja, quando clicar no botão executar uma função.
José neste post voce postou a imagem de um menu WINDOWS. Rodei o exemplo da GTwvg e não achei como ativar/desativar um item do submenu, somente consegui dos "cabeças"
supondo um menu neste contexto.
Para desativar o CADASTROS use g_oMenuBar:disableItem(1) e deu certo.CADASTROS PRODUTOS OPERADORES
--Incluir --Incluir --Incluir
--Alterar --Alterar --Alterar
Como posso desabilitar o subitem 2 (--Alterar) do menu CADASTROS?
Código: Selecionar todos
LOCAL oMenu
LOCAL g_oMenuBar := WvgSetAppWindow():menuBar()
oMenu := WvgMenu():new( g_oMenuBar, , .T. ):create()
oMenu:Caption := "Wvt*Classes"
oMenu:AddItem( "Dialog One . New Window . Threaded" , {|| DialogWvgClassesOne( 1 ) } )
oMenu:AddItem( "Dialog One . Main Window . Primary Thread", {|| DialogWvgClassesOne( 2 ) } )
oMenu:AddItem( "-" )
oMenu:AddItem( "Dialog Two" , {|| DialogWvgClassesTwo() } )
oMenu:AddItem( "-" )
oMenu:AddItem( "Exit" , {|| __Keyboard( K_ESC ) } )
g_oMenuBar:addItem( { oMenu, "Wvt*Classes" } )