Árvore de páginas

Construtor TMenuItem:New

Método Inicia uma nova instância da classe TMenuItem.

Sintaxe

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.

Exemplos

Exemplo 1
    // 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.)
  • Sem rótulos