On Close Box

Code	Pode ser chamado por	Definição
22	Formulário	A caixa de fecho da janela foi clicada

Descrição

O evento On Close Box é gerado quando o utilizador clica na caixa de fecho da janela.

Exemplo

Este exemplo mostra como responder a um evento de fecho de janela com um formulário utilizado para a introdução de dados de registo:

  //Método para um formulário de entrada
 $vpFormTable:=Current form table
 Case of
  //...
    :(Form event code=On Close Box)
       If(Modified record($vpFormTable->))
          CONFIRM("Este registo foi modificado. Save Changes?")
          Save Changes?")
          Save Changes?")
          If(OK=1)
             ACCEPT
          Else
             CANCEL
          End if
       Else
          CANCEL
       End if
  //...
 //statement(s)
 End case