Inclui um novo item ao menu da barra superior.

Sintaxe

AddMenuItem( [ cTitulo ], [ oMenu ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cTitulo

caractere

Indica o título do item no menu superior.

 

 

oMenu

objeto

Indica o objeto do tipo TMenu utilizado para incluir um menu.

 

 

Exemplos

Exemplo 1
   // Cria objeto TMenu
   oTMenu3 := TMenu():New(0,0,0,0,.T.,,oDlg)
   oTMenuItem3 := TMenuItem():New(oDlg,'TMenuItem 03',,,, {||Alert('TMenuItem 03')},,,,,,,,,.T.)
   oTMenu3:Add(oTMenuItem3)
   
   // Adiciona menu na barra superior
   oTMenuBar:AddMenuItem( "Novo Item",oTMenu3 )

Resultado do Exemplo

  • Sem rótulos