O que é Freeform?

     Freeform

é o conjunto de componentes visuais e não visuais, que são classes especializadas para o

produto Logix construídas com base em componentes fornecidos pela linguagem AdvPl. 

     Para criação de telas, Freeform é o modelo de desenvolvimento comumente conhecido como desenvolvimento à mãos livres

, onde a tela é definida e montada pelo desenvolvedor utilizando

chamadas de funções para instanciar componentes e definir suas características de comportamento com base neste conjunto de componentes visuais ou não visuais.

     Além dos componentes visuais, o modelo Freeform engloba, conforme já mencionado, um conjunto de outros componentes não visuais, que podem ser utilizados para realizar integrações, execuções em THREADs, comunicação com WebServices e banco de dados, entre outras funcionalidades.

     Para criar, definir comportamentos e destruir componentes no modelo Freeform no Logix são utilizadas

quatro funções AdvPL

básicas que são funções desenvolvidas e mantidas pelo time de Framework:

• • create_component()
  • set_property()
  • get_property()

• • destroy_component()

Componentes FreeForm

Image Added

Criando um componente

| create_component()

     A

função AdvPL create_component

 permite criar uma instância do componente Freeform em memória e retorna o código de referência do componente criado, que geralmente pode ser atribuído para uma variável do tipo VARCHAR(10) em código de linguagem 4GL.. Esta função recebe por parâmetro o código de referência do componente que será criado, o nome do componente Freeform e o código de referência do componente pai

, quando existir

.

DEFINE l_dlg_ref VARCHAR(10)
DEFINE l_pnl_ref VARCHAR(10)
 
# Componente sem componente pai.
LET l_dlg_ref = _ADVPL_create_componente(NULL,"LDIALOG")
    
# Componente com componente pai.
LET l_pnl_ref = _ADVPL_create_componente(NULL,"LPANEL",l_dlg_ref)

Manipulando um componente

DEFINE l_dlg_ref VARCHAR(10)
DEFINE l_title   CHAR(50)
 
# Instância de uma nova janela de diálogo
LET l_dlg_ref = _ADVPL_create_componente(NULL,"LDIALOG")

# Define o título da janela de diálogo instanciada acima.
CALL _ADVPL_set_property(l_dlg_ref,"TITLE","

Título 

da 

tela de

 diálogo principal do formulário")
 
# Recupera o título

 da janela de diálogo instanciada anteriormente.
LET l_title = _ADVPL_get_property(l_dlg_ref,"TITLE")

# Ativa a janela

 de diálogo instanciada anteriormente, invocando o método ACTIVATE com o parâmetro TRUE (abrir e exibir a janela).
CALL _ADVPL_set_property(l_dlg_ref,"ACTIVATE",TRUE)

Destruindo um componente | destroy_component()

     A função AdvPL destroy_component() permite destruir um componente instanciado através da função create_component(), visando liberar a memória alocada durante seu uso. Esta função recebe por parâmetro o código de referência do componente que será destruído.

DEFINE l_dlg_ref VARCHAR(10)
 
# Instância de um novo componente.
LET l_dlg_ref = _ADVPL_create_componente(NULL,"LDIALOG")
    
# Destruição de componente instanciado.
CALL _ADVPL_destroy_componente(l_dlg_ref)