Páginas filhas
  • LGX - LTEXTAREA

Componente para edição de textos alfanuméricos de múltiplas linhas.


Hierarquia



Sintaxe



l_radio_reference = _ADVPL_create_component( NULL, "LRADIOGROUP", < cReference > )


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: CURSOR_POSITION

Posição do cursor do mouse no texto dentro do campo.

Sintaxe



_ADVPL_get_property( < l_textarea_reference >, "CURSOR_POSITION", < nItem > ) => Posição

Retorno



TipoDescrição
NUMERIC

Posição do cursor do mouse no texto dentro do campo.

Exemplo



LET l_pos = _ADVPL_get_property(l_textarea_reference,"CURSOR_POSITION")




Métodos SET


Métodos acessíveis utilizando a função _ADVPL_set_property que permite alterar e manipular os valores do componente.


Método SET: GO_END

Posiciona o cursor para o final do texto.

Sintaxe



_ADVPL_set_property( < l_textarea_reference >, "GO_END")

Exemplo



CALL _ADVPL_set_property(l_textarea_reference,"GO_END")



Método SET: HORIZONTAL_SCROLL

Define se o campo poderá ter barra de rolagem horizontal.

Sintaxe



_ADVPL_set_property( < l_textarea_reference >, "HORIZONTAL_SCROLL", < Permite barra de rolagem horizontal?> )

Parâmetros



NomeTipoDescriçãoObrigatório?
Permite barra de rolagem horizontal? BOOLEANIndicador para definir se o campo poderá ter barra de rolagem horizontal.Sim

Exemplo



CALL _ADVPL_set_property(l_textarea_reference,"HORIZONTAL_SCROLL",FALSE)



Método SET: LEFT_TRIM

Define se o componente deverá retirar os espaços em branco a esquerda do texto.

Sintaxe



_ADVPL_set_property( < l_textarea_reference >, "LEFT_TRIM",< Retira espaços em branco à esquerda?>)

Parâmetros



NomeTipoDescriçãoObrigatório?
Retira espaços em branco à esquerda? BOOLEANIndicador que define se o componente deverá retirar os espaços em branco à esquerda do texto informado.Sim


Exemplo



CALL _ADVPL_set_property(l_textarea_reference,"LEFT_TRIM",TRUE)



Método SET: MAX_LENGTH

Quantidade máxima de caracteres que o usuário poderá informar no campo.

Sintaxe



_ADVPL_set_property( < l_textarea_reference >, "MAX_LENGTH",< Quantidade >)

Parâmetros



NomeTipoDescriçãoObrigatório?
Quantidade NUMERICQuantidade indicando quantos caracteres poderão ser informados no campo.Sim


Exemplo



CALL _ADVPL_set_property(l_textarea_reference,"MAX_LENGTH",350)



Método SET: TEXT_TRANSFORM

Ação a ser executada para modificar o texto após o mesmo ser informado.

Sintaxe



_ADVPL_set_property( < l_textarea_reference >, "TEXT_TRANSFORM",< Comando >)

Parâmetros



NomeTipoDescriçãoObrigatório?
Comando CHARComando a ser executada após edição do campo, sendo:


  • LOWERCASE: altera o texto informado para minúsculo.
  • UPPERCASE: altera o texto informado para maiúsculo.
  • CAPITALIZE: altera o texto informado para deixar a primeira letra de cada palavra do texto em maiúsculo.
Sim


Exemplo



CALL _ADVPL_set_property(l_textarea_reference,"TEXT_TRANSFORM","CAPITALIZE")



Método SET: VERTICAL_SCROLL

Define se o campo poderá ter barra de rolagem vertical.

Sintaxe



_ADVPL_set_property( < l_textarea_reference >, "VERTICAL_SCROLL",< Permite barra de rolagem vertical? >)

Parâmetros



NomeTipoDescriçãoObrigatório?
Permite barra de rolagem vertical? BOOLEANIndicador para definir se o campo poderá ter barra de rolagem vertical.Sim


Exemplo



CALL _ADVPL_set_property(l_textarea_reference,"VERTICAL_SCROLL",FALSE)



Método SET: WORD_WRAP 

Define se a quebra de linha do campo será automática.

Sintaxe



_ADVPL_set_property( < l_textarea_reference >, "WORD_WRAP",< Quebra linha automática? >)

Parâmetros



NomeTipoDescriçãoObrigatório?
Quebra linha automática?BOOLEANIndicador que define se o campo quebrará linha automaticamente.Sim


Exemplo



CALL _ADVPL_set_property(l_textarea_reference,"WORD_WRAP",TRUE)




Exemplos


#--------------------# FUNCTION LTextArea()#--------------------#
     DEFINE l_dialog_reference   VARCHAR(10)
     DEFINE l_textarea_reference VARCHAR(10)

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

     LET l_textarea_reference = _ADVPL_create_component(NULL,"LTEXTAREA",l_dialog_reference)
     CALL _ADVPL_set_property(l_textarea_reference,"SIZE",470,205)
     CALL _ADVPL_set_property(l_textarea_reference,"POSITION",05,05)
     CALL _ADVPL_set_property(l_textarea_reference,"WORD_WRAP",TRUE)
     CALL _ADVPL_set_property(l_dialog_reference,"MAXIMIZED",FALSE)
     CALL _ADVPL_set_property(l_dialog_reference,"ACTIVATE",TRUE) END FUNCTION

Visualização