Páginas filhas
  • LGX - LMENUBAR

Componente visual para criação de menu para as aplicações. O menu é exibido sempre na parte superior da janela de aplicação e agrupa todas as funcionalidades da aplicação através de botões.


Hierarquia



Métodos GET


Métodos acessíveis através da função _ADVPL_get_property que permite recuperar e manipular os valores do componente:


Método GET: CONFIRM_BUTTON_REFERENCE

Referência do botão de confirmação.

Sintaxe



_ADVPL_get_property(l_menubar_reference,"CONFIRM_BUTTON_REFERENCE") ==> Referência

Retorno



TipoDescrição
CHAR
  • Retorna a referência do botão (LMenuButton) do botão de confirmação.


Exemplo



LET l_confirm_button_reference = _ADVPL_get_property(l_menubar_reference,"CONFIRM_BUTTON_REFERENCE")



Método GET: CURRENT_OPERATION

Operação corrente (em execução).

Sintaxe



_ADVPL_get_property(l_menubar_reference,"CURRENT_OPERATION") ==> Operação

Retorno



TipoDescrição
CHAR

Nome da operação que está em execução.


Exemplo



LET l_current_operation = _ADVPL_get_property(l_menu_bar_reference,"CURRENT_OPERATION")



Método GET: DO_CANCEL

Executa o cancelamento da operação em execução.

Sintaxe



_ADVPL_get_property(l_menubar_reference,"DO_CANCEL") ==>  Cancelou com sucesso?

Retorno



TipoDescrição
BOOLEAN

Retorna se a operação pode ser cancelada, se não houve nenhum erro ao cancelar a operação em execução.


Exemplo



LET l_do_cancel = _ADVPL_get_property(l_menubar_reference,"DO_CANCEL")



Método GET: DO_CONFIRM

Executa a confirmação da operação em execução.

Sintaxe



_ADVPL_get_property(l_menubar_reference,"DO_CONFIRM") ==> Confirmou com sucesso?

Retorno



TipoDescrição
BOOLEAN

Retorna se a operação pode ser confirmada, se não houve nenhum erro ao confirmar a operação em execução.


Exemplo



LET l_do_confirm = _ADVPL_get_property(l_menubar_reference,"DO_CONFIRM")




Métodos SET


utilizando a função _ADVPL_set_property que permite alterar e manipular os valores do componente.


Método SET: HELP_VISIBLE

Define se o botão de ajuda do menu será visível.

Sintaxe



_ADVPL_set_property(< l_table_reference >,"HELP_VISIBLE",< Visível? >)

Parâmetros



NomeTipoDescriçãoObrigatório?
Visível?BOOLEANIndicador que define se o botão de ajuda do menu será visível.Sim


Exemplo



CALL _ADVPL_set_property(l_menubar_reference,"HELP_VISIBLE",FALSE)



Exemplo



#-------------------#
 FUNCTION
 LMenuBar()
#-------------------#
     DEFINE l_dialog_reference  VARCHAR(10)
     DEFINE l_menubar_reference VARCHAR(10)
     DEFINE l_label_reference   VARCHAR(10)

     LET l_dialog_reference = _ADVPL_create_component(NULL,"LDIALOG")
     CALL _ADVPL_set_property(l_dialog_reference,"SIZE",640,480)
     CALL _ADVPL_set_property(l_dialog_reference,"TITLE","Ex.: LMENUBAR")
     CALL _ADVPL_set_property(l_dialog_reference,"BACKGROUND_COLOR",210,210,210)

     LET l_menubar_reference = _ADVPL_create_component(NULL,"LMENUBAR",l_dialog_reference)
     CALL _ADVPL_set_property(l_menubar_reference,"HELP_VISIBLE",FALSE)
     CALL _ADVPL_create_component(NULL,"LQUITBUTTON",l_menubar_reference)

     LET l_label_reference = _ADVPL_create_component(NULL,"LCLABEL",l_dialog_reference)
     CALL _ADVPL_set_property(l_label_reference,"ALIGN","CENTER")
     CALL _ADVPL_set_property(l_label_reference,"TEXT","Exemplo de uma aplicação com menu.")
     CALL _ADVPL_set_property(l_dialog_reference,"MAXIMIZED",FALSE)
     CALL _ADVPL_set_property(l_dialog_reference,"ACTIVATE",TRUE) END FUNCTION    


Visualização