OVH Cloud OVH Cloud

Timer - mais rien que lui

2 réponses
Avatar
JackyD_30
Bonjour et bonne ann=E9e =E0 tous,
J'ai agr=E9ment=E9 mes formulaires de deux champs indiquant
la date et l'heure. avec le code suivant :

Private Sub Form_Timer()
AfficheDate.Raquery
AfficheHeure.Requery
End Sub

et intervalle minuterie r=E9gl=E9e sur 5000 (5 secondes)

Le probl=E8me, c'est que cet =E9v=E9nement for=E7ait le=20
rafra=EEchissement "g=E9n=E9ral" et ne laissait plus
travailler dans le sous formulaire o=F9 il fallait choisir
dans 3 listes d=E9roulantes!

J'ai d=FB revenir =E0 un intervalle minuterie de 40000
ce qui est dommage.

Y aurait-il un moyen de laisser un intervalle plus court
en laissant travailler dans le formulaire ?
merci

2 réponses

Avatar
Sweety
Pourquoi ne pas aller dans les propriétés du formulaire, déclarer un
évènement sur minuterie, qui donnera ceci :

Private Sub Form_Timer()
Me!Horloge = Time
End Sub

Avec un intervalle de 1000
Ca ne m'empêche nullement de travailler...

"JackyD_30" a écrit dans le message de news:
1b1e01c3e00e$8ddcaf00$
Bonjour et bonne année à tous,
J'ai agrémenté mes formulaires de deux champs indiquant
la date et l'heure. avec le code suivant :

Private Sub Form_Timer()
AfficheDate.Raquery
AfficheHeure.Requery
End Sub

et intervalle minuterie réglée sur 5000 (5 secondes)

Le problème, c'est que cet événement forçait le
rafraîchissement "général" et ne laissait plus
travailler dans le sous formulaire où il fallait choisir
dans 3 listes déroulantes!

J'ai dû revenir à un intervalle minuterie de 40000
ce qui est dommage.

Y aurait-il un moyen de laisser un intervalle plus court
en laissant travailler dans le formulaire ?
merci
Avatar
Raymond [mvp]
Bonjour.

ne procède pas par requery mais affiche ta date directement dans ton
contrôle:
Me.AfficheDate = Date()
Me.AfficheHeure = Time()
doevents

et tu mets ton timer à 1000
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"JackyD_30" a écrit dans le message de
news:1b1e01c3e00e$8ddcaf00$
Bonjour et bonne année à tous,
J'ai agrémenté mes formulaires de deux champs indiquant
la date et l'heure. avec le code suivant :

Private Sub Form_Timer()
AfficheDate.Raquery
AfficheHeure.Requery
End Sub

et intervalle minuterie réglée sur 5000 (5 secondes)

Le problème, c'est que cet événement forçait le
rafraîchissement "général" et ne laissait plus
travailler dans le sous formulaire où il fallait choisir
dans 3 listes déroulantes!

J'ai dû revenir à un intervalle minuterie de 40000
ce qui est dommage.

Y aurait-il un moyen de laisser un intervalle plus court
en laissant travailler dans le formulaire ?
merci