Re: Timersys
Posté par drcharly93 le 12/10/2004 15:20:49
De rien GoZeub, c'est moi qui n'avait pas compris.
Test effectué avec succès:
dans la déclaration globale du projet
J'ai créé une fenêtre de paramètre avec un champ numerique pour saisir ma nouvelle valeur.
Ce champs est nommé txtTemp
dans le code de fermeture de la fenêtre
Dans le code du bouton qui appel la fenêtre param
Ma procédure
voilà
pour moi en version 815p cela fonctionne correctement.
Test effectué avec succès:
dans la déclaration globale du projet
GLOBALE
TymerSys("Test",1000,1) //toutes les 10 secondes
J'ai créé une fenêtre de paramètre avec un champ numerique pour saisir ma nouvelle valeur.
Ce champs est nommé txtTemp
dans le code de fermeture de la fenêtre
frmParam..ValeurRenvoyer = txtParam..Valeur
Dans le code du bouton qui appel la fenêtre param
nTemp est un un entier
nTemp = Ouvre(frmParam)
si nTemp > 0 alors
FinTimerSys(1)
Multitache() //Peut être pas nécessaire mais laisse le temps
TimerSys("Test",nTemp,1)
FIN
Ma procédure
PROCEDURE Test()
Message(HeureVersChaine(HeureSys()))
voilà
pour moi en version 815p cela fonctionne correctement.
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=12&topic_id=1375&post_id=5602