//Declaration Global de la fenetre
vpNumVersion est un entier
vpNumTimer est un entier
//Initialisation de la fenêtre
vpNumVersion=HVersion(Clients)
vpNumTimer=TimerSys("Reaffiche",1000) // toutes les 10 secondes
ExécuteTraitement("REMPLITABLE",trtClic)
//Procedure Reaffiche
PROCEDURE Reaffiche()
NumVersion est un entier
NumVersion=HVersion(Clients)
SI NumVersion <> vpNumVersion ALORS
FinTimerSys(vpNumTimer)
ExécuteTraitement("REMPLITABLE",trtClic)
VpNumTimerTimerSys("Reaffiche",1000)
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=5&topic_id=462&post_id=1606