Saltar para o conteúdo principal
Versão: v19

On Close Box

CodePode ser chamado porDefinição
22FormulárioA 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