L'exemple suivant permet d'intervenir lorsque la souris quitte chaque champ d'une fenêtre :

WM_USER est un entier = 1024
Evénement("FinSurvol", ".*", WM_USER+711)

 

PROCEDURE FinSurvol()
//Procédure callback appellé par la commande Evnement()
Trace("Fin du survol du champ "+_EVE.nom)