Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/3279126062824/newLayouttecnologia.css
Portuguese

Pagetitle

...

Classe TMenu

Classe

...

TMenu

Cria

...

um

...

objeto

...

do

...

tipo

...

menu.

Hierarquia

...

...

    • TMenu

Construtores

Inclusão de trecho
Classe TMenu - Construtores
Classe TMenu - Construtores
nopaneltrue

Métodos

Inclusão de trecho
Classe TMenu - Métodos
Classe TMenu - Métodos
nopaneltrue

Observações

  • Em builds superiores à 120420A foi implementado o evento de wheel (roda do mouse), permitindo movimentar os itens do componente à partir deste dispositivo.

Exemplos

    oObjeto(objeto)
  • Retorna o objeto criado.
oMenuMain := TMenu():New( 0,0,0,0,.F.,"",oDlg,CLR_WHITE,CLR_BLACK)
Add

Add

Inclui item e subitem ao menu.

TMenu(): Add ( ) --> oMenu

    oMenu(objeto)
  • Retorna um objeto do tipo TMenuItem que é utilizado para criar item e subitem de menu.
oMenuMain:Add( TMenuItem():New2( oMenuMain:Owner(),'Item 001','',,,) )

RemoveItem

Remove um item do menu.

TMenu(): RemoveItem ( < oMenu> ) -->

oMenuMain:RemoveItem( oMenuItem1 )

Reset

Exclui os itens do menu.

TMenu(): Reset ( ) -->

oMenuMain:Reset()

SetImageName

Define a imagem de fundo do menu.

TMenu(): SetImageName ( [ cImage] ) -->

oMenuMain:SetImageName( "menu_background.png" )
Exemplo do método SetImageName
Image Removed
#include "TOTVS.CH"
  User Function TMenu()  
   DEFINE DIALOG oDlg TITLE "Exemplo TMenu" FROM 180,180 TO 550,700 PIXEL
      
   oMenuMain := TMenu():New( 0,0,0,0,.F.,'',oDlg,CLR_WHITE,CLR_BLACK)    
   
   // Adiciona item ao menu principal    
   oMenuDiv := TMenuItem():New2( oMenuMain:Owner(),'Item 001','',,,)    
   oMenuMain:Add( oMenuDiv )                              
   
   // Adiciona sub-Itens                 
   oMenuItem1 := TMenuItem():New2( oMenuMain:Owner(),'Sub-Item 001'
;
,,,{||Alert('TMenuItem 1')})    
   oMenuDiv:Add( oMenuItem1 )                              
   oMenuItem2 := TMenuItem():New2( oMenuMain:Owner(),'Sub-Item 002'
;
,,,{||Alert('TMenuItem 2')})    
   oMenuDiv:Add( oMenuItem2 )     
   
   ACTIVATE DIALOG oDlg CENTERED 
  Return
Exemplo da classe TMenu
Image Removed
Bloco de código
languagecpp
themeEclipse
titleExemplo 1
linenumberstrue
collapsefalse
  

New

Método construtor da classe.

TMenu(): New ( [ nTop], [ nLeft], [ nHeight], [ nWidth], [ lPopUp], [ cBmpName], [ oWnd], [ nClrNoSelect], [ nClrSelect], [ cArrowUpNoSel], [ cArrowUpSel], [ cArrowDownNoSel], [ cArrowDownSel] ) --> oObjeto

NomeTipoDescriçãoObrigatórioReferência
nTopNuméricoIndica a coordenada vertical em pixels.nLeftNuméricoIndica a coordenada horizontal em pixels.nHeightNuméricoIndica a altura em pixels do objeto.nWidthNuméricoIndica a largura em pixels do objeto.lPopUpLógicoIndica se o objeto será Pop-up.cBmpNameCaracterIndica o nome da imagem que será utilizada no menu.oWndObjetoIndica a janela ou controle visual onde o objeto será criado.nClrNoSelectNuméricoIndica o nome da cor que será utilizada quando o item não é selecionado.nClrSelectNuméricoIndica o nome da cor que será utilizada quando o item é selecionado.cArrowUpNoSelCaracterIndica a imagem seta para cima quando o item não é selecionado.cArrowUpSelCaracterIndica a imagem seta para cima quando o item é selecionado.cArrowDownNoSelCaracterIndica a imagem seta para baixo quando o item não é selecionado.cArrowDownSelCaracterIndica a imagem seta para baixo quando o item é selecionado.
NomeTipoDescriçãoObrigatórioReferência
oMenuObjetoIndica o objeto do tipo TMenuItem que será removido. X
NomeTipoDescriçãoObrigatórioReferência
cImageCaracterIndica o nome da imagem de fundo do menu. Observação: Antes de definir uma imagem para o objeto, é necessário que a mesma esteja compilada no repositório.

Resultado do Exemplo

Image Added

Abrangência

Microsiga Protheus 8.11, Microsiga Protheus 11, Protheus 10, TOTVS Application Server 10, ByYou Application Server