Páginas filhas
  • _ADVPL_FREEFORM_defaultFont()

Versões comparadas

Chave

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

...

Permite recuperar a referência do componente LFONT com a fonte padrão utilizada pelos componentes do produto Logix. Também permite alterar a fonte padrão para outra fonte desejada.

Sintaxe

Bloco de código
languageruby
themeConfluence
_ADVPL_FREEFORM_defaultFont()

Exemplo

Bloco de código
languageruby
themeConfluence
linenumberstrue
  DEFINE l_default_font_reference VARCHAR(10)

  LET  l_default_font_reference = _ADVPL_FREEFORM_defaultFont()

  #Cria fonte customizada para o programa.
  LET l_new_font_reference = _ADVPL_create_component(NULL,"LFONT")
  CALL _ADVPL_set_property(l_font_reference,"SIZE",20)
  CALL _ADVPL_set_property(l_font_reference,"BOLD",TRUE)

  #Define como fonte padrão para todos os componentes visuais que serão criados deste ponto em diante
  CALL _ADVPL_FREEFORM_defaultFont(l_font_reference)

  #A partir daqui todos novos componentes criados passam a usar a nova fonte definida.
  CALL _ADVPL_create_component(......)
  ...
  ...
  
  #Restaurar a fonte padrão do produto Logix
  CALL _ADVPL_FREEFORM_defaultFont(l_font_default_reference)

Observações

   Em casos isolados de alguns componentes de GRID, podem ser necessário aplicar regra de estilo utilizando comando CSS.

Bloco de código
languageruby
themeConfluence
titleUm exemplo de ajuste de tipo ou tamanho de fonte em um componente do tipo LBROWSEEX usando o evento SET CSS:
   DEFINE m_table_reference VARCHAR(10)

   LET m_table_reference = _ADVPL_create_component(NULL,"LBROWSEEX",m_folder_panel_reference)
   CALL _ADVPL_set_property(m_table_reference,"ALIGN","CENTER")
   CALL _ADVPL_set_property(m_table_reference,"CAN_ADD_ROW",FALSE)
   CALL _ADVPL_set_property(m_table_reference,"CAN_REMOVE_ROW",FALSE)
   CALL _ADVPL_set_property(m_table_reference,"EDITABLE",FALSE)

   #Ajusta o tipo de fonte de todas as células de um GRID editável para LUCIDA CONSOLE, tamanho 12.
   CALL _ADVPL_set_property(m_table_reference,"CSS","QTableWidget{ font-family: Lucida Console; font-size: 12px;}")

...