Créer un timer sans formulaire

Présentation
Le code suivant est à coller dans un module. En faisant varier nIDEvent on peut ajouter autant de timer que l'on veut sans être obligé de créer un formulaire caché. Pour l'exemple lancer la fonction Start_Test_Timer() Elle affiche l'heure dans la barre de statut...

Pour la version 97, utiliser la fonction AddrOf présente dans les sources. Dans la procédure Start_Timer, pensez à supprimer la ligne qui ne correspond pas à votre version Access.
Téléchargement
2  0 
Téléchargé 150 fois Voir les 2 commentaires
Détails
Avatar de Arkham46
Responsable Access
Voir tous les téléchargements de l'auteur
Licence : Non renseignée
Date de mise en ligne : 28 mars 2013




Avatar de mumen mumen - Membre expérimenté https://www.developpez.com
le 27/03/2013 à 18:13
Qu'en pensez-vous ?
Que du bien , surtout pour un développeur.

Les formulaires avec Timer ne peuvent pas s'empêcher de faire compiler le code au déclenchement et c'est très énervant quand on est en train de taper sa petite instruction et qu'on est coupé intempestivement.

J'ai testé sous Access 97 et 2010. Ça fonctionne bien tout en éditant du code sans coupure. Génial !

PS : Je n'ai pas trouvé AddrOff dans la page. Un petit lien serait bienvenu.

Citation Envoyé par Arkham46 Voir le message
Bonjour,

Je vous propose un nouvel élément à utiliser : Créer un timer sans formulaire

Le code suivant est à coller dans un module. En faisant varier nIDEvent on peut ajouter autant de timer que l'on veut sans être obligé de créer un formulaire caché. Pour l'exemple lancer la fonction Start_Test_Timer() Elle affiche l'heure dans la barre de statut...

Pour la version 97, utiliser la fonction AddrOf présente dans les sources. Dans la procédure Start_Timer, pensez à supprimer la ligne qui ne correspond pas à votre version Access.

Qu'en pensez-vous ?
Avatar de Arkham46 Arkham46 - Responsable Access https://www.developpez.com
le 28/03/2013 à 8:28
Merci j'avais oublié de mettre le lien pour Acc97.

Pour ceux qui s'intéressent aux timers, il y a aussi ce code :
http://www.developpez.net/forums/d77...e/#post4454916

Ne fonctionne que dans un module de classe (donc dans un formulaire, une feuille Excel...) et à partir de Office 2000 car utilise les événements.
Pour 97, on peut ajouter à StartTimer la définition d'un objet et d'une fonction qu'on appelle ensuite avec CallByName au lieu de lever un événément.

 
Developpez.com décline toute responsabilité quant à l'utilisation des différents éléments téléchargés.