Árvore de páginas

Carregando...

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
collapsefalse
TMenuItem():New( < oParent >, [ cTitle ], [ cParam3 ], [ lParam4 ], [ lActive ], [ bAction ], [ cParam7 ], [ cResName ], [ nParam9 ], [ cParam10 ], [ lParam11 ], [ nParam12 ], [ bParam13 ], [ lParam14 ], [ lPopup ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

oParent

objeto

Indica o controle visual onde o objeto será criado.

X

 


cTitle

caractere

Indica o texto do item.

 

 



cParam3

caractere

Compatibilidade.

 

 



lParam4

lógico

Compatibilidade.

 

 



lActive

lógico

Indica se, verdadeiro (.T.), o item está ativo; caso contrário, falso (.F.).

 

 



bAction

bloco de código

Indica o bloco de código que será executado quando clicar, com o botão esquerdo do mouse, sobre o objeto.

 

 



cParam7

caractere

Compatibilidade.

 

 



cResName

caractere

Indica a imagem, do repositório, que será apresentada quando o ponteiro do mouse não estiver posicionado sobre o item.

 

 



nParam9

numérico

Compatibilidade.

 

 



cParam10

caractere

Compatibilidade.

 

 



lParam11

lógico

Compatibilidade.

 

 



nParam12

numérico

Compatibilidade.

 

 



bParam13

bloco de código

Compatibilidade.

 

 



lParam14

lógico

Compatibilidade.

 

 



lPopup

lógico

Indica se, verdadeiro (.T.), o item faz parte de um popup; caso contrário, falso (.F.).

 

 



Retorno

Nome

Tipo

Descrição

oObj

objeto

Nova instância da classe TMenuItem

Observações

  • O método NEW deve ser o utilizado para a criação de menus suspensos, sendo que o método NEW2 não possui em seu construtor o parâmetro lPopup.

...

Bloco de código
languagecpp
themeEclipse
titleExemplo 1
linenumberstrue
collapsefalse
    // cria os submenus 
    oMenu01 := tMenu():new(0, 0, 0, 0, .T., , oMenu)
    // cria os itens dos submenus 
    oMenu0101 := tMenuItem():new(oMenu01, "Menu 01, item 01", , , , {|| }, , , , , , , , , .T.)