FORM Event

4D v20.1

FORM Event


FORM Event -> Resultado

Parâmetro	Tipo	Descrição
Resultado	Objeto	objeto evento

Descrição

FORM Event devolve um objeto que contém informação sobre o evento de formulário que acaba de ocorrer. Em geral, usará FORM Event desde um formulário ou método de objeto.

Objeto devolvido

Cada objeto devolvido inclui as propriedades principais:


Propriedade	Tipo	Descrição
objectName	texto	Nome de objeto que desencadeia o evento: não inclui se o evento for desencadeado pelo formulário
code	inteiro longo	Valor numérico de evento de formulário. Ver Form event code
description	texto	Nome de evento de formulário (por exemplo, "On After Edit").

Por exemplo, no caso de clicar no botão, o objeto contém as propriedades abaixo:

{
"code":4,
"description":"On Clicked",
"objectName":"Button2"
}

O objeto de evento pode conter propriedades adicionais, dependendo do objeto para o qual ocorre o evento. Por exemplo, os objetos eventObj gerados em:

Objetos List box ou colunas, veja list box documentation on developer.4d.com.
Áreas 4D View Pro, veja Evento formulário On VP Ready.O

Nota: se não há um evento atual, FORM Event devolvido um objeto nulo.

Exemplo 1

Se quiser manejar o evento On Clicked em um botão:

 If(FORM Event.code=On Clicked)

    ...

 End if

Exemplo 2

Se estabelecer o nome de objeto coluna com um nome atributo real de uma dataclasse como:

Pode ordenar a coluna usando o evento On Header Click:

 Form.event:=FORM Event

 Case of

    :(Form event code=On Header Click)

       if(Form.event.columnName="lastname")

          Form.employees:=Form.employees.orderBy(Form.event.columnName+", firstname")

       End if

 End case

Exemplo 3

Se quiser manejar On Display Details em um objeto list box com um método estabelecido na propriedade Meta info expression:

O método setColor:

 C_OBJECT($event;$0;$meta)

 $event:=[#current_title_incod]

 $meta:=New object

 

 Case of

    :($event.code=On Display Detail)

       If($event.isRowSelected)

          $meta.fill:="lightblue"

       End if

 End case

 $0:=$meta

A list box resultado quando linhas são selecionadas:

Ver também

Form event code