Menu com GtWvW ???

[Cezar]

Boa tarde,

Como faço um menu com vários subitens ??

1.cadastros

2.relatorio
2.1.venda
2.1.1.vendas por produto
2.1.2.vendas por vendedor
2.2.compras
2.2.1.compras por produto

3.movimentos

Existe algum manual do gtwvw ou um site com exemplos


grato

cez_a@ubbi.com.br

[Luiz]

Documentação e exemplos voce pode encontrar dentro da pasta contrib/gtwvw

exemplo de menus:

Código: Selecionar todos

#include "\xbase\xharbour\contrib\what32\include\winuser.ch"

Function Main()
  hMainMenu = WVW_CreateMenu( )
  hSubMenu1 = WVW_CreateMenu( )
    WVW_AppendMenu( hSubMenu1 , MF_ENABLED + MF_STRING, 101, "Opção1"  )
    WVW_AppendMenu( hSubMenu1 , MF_ENABLED + MF_STRING, 102, "Opção2 " )
    hSubMenu1_1 = WVW_CreateMenu( )
      WVW_AppendMenu( hSubMenu1_1 , MF_ENABLED + MF_STRING, 105, "Opção5"  )
    WVW_AppendMenu( hSubMenu1 , MF_ENABLED + MF_POPUP , hSubMenu1_1 , "Sub",  )
    
  WVW_AppendMenu( hMainMenu     , MF_ENABLED + MF_POPUP , hSubMenu1 , "Submenu1",  )
  
  hSubMenu2 = WVW_CreateMenu( )
    WVW_AppendMenu( hSubMenu2 , MF_ENABLED + MF_STRING, 103, "Opção3"  )
    WVW_AppendMenu( hSubMenu2 , MF_ENABLED + MF_STRING, 104, "Opção4 " )
  WVW_AppendMenu( hMainMenu     , MF_ENABLED + MF_POPUP , hSubMenu2 , "Submenu2",  )
  
  WVW_SetMenu(, hMainMenu )

  inkey(0)

[Cezar]

Boa tarde,


Grato luiz,


cez_a@ubbi.com.br