TIMER
celiphane
Messages postés
466
Date d'inscription
samedi 16 février 2002
Statut
Membre
Dernière intervention
20 avril 2007
-
7 oct. 2002 à 14:22
njakapiso Messages postés 6 Date d'inscription mercredi 19 juillet 2006 Statut Membre Dernière intervention 25 septembre 2006 - 12 sept. 2006 à 08:58
njakapiso Messages postés 6 Date d'inscription mercredi 19 juillet 2006 Statut Membre Dernière intervention 25 septembre 2006 - 12 sept. 2006 à 08:58
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/4716-timer
https://codes-sources.commentcamarche.net/source/4716-timer
12 sept. 2006 à 08:58
ça marche bien
merci
26 mai 2006 à 18:09
4 août 2003 à 00:42
C exact un timer 1000 equivaut pas EXACTEMENT a 1 sec , mais g envie de dire " ULTRA MEGA LOL " la difference est mini, est ici ce nest pas un chronometre tu c .... donc on survira si on a 1 sec decart , je tassure
19 févr. 2003 à 09:56
Mais voici un petiti plus :
Declare Function GetTickCount Lib "kernel32" Alias "GetTickCount" () As Long
' Dans le module...
Dim Scd as Single
Dim Mns as Single
Dim Hrs as Single
' Récuppérer le nombre de millisecondes éoulées depuis le démarrage de Windows
Scd = GetTickCount
' Pour des divisions entières
Scd = Scd 1000
Mns = Scd 60
Hrs = Mns 60
Scd = Scd - (Mns * 60)
Mns = Mns - (Hrs * 60)
Msgbox "Démarré depuis " & Hrs & " h. " & Mns & " mn. " & Scd & " s. "
11 oct. 2002 à 18:37
StartTime = Timer
.
.
Msgbox Timer - StartTime
Y a pas plus simple
A+
8 oct. 2002 à 13:29
Pingouin
8 oct. 2002 à 11:01
Plus haut je vous ai montrer l'API qui renvoie précisément (en millisecondes) le temps écoulé depuis le démarrage de Windows...
Lisez un peu...
8 oct. 2002 à 06:11
1/ tu règle ton timer à 1000, mais ce n'est PAS exactement 1seconde. C'est à peu près ça.... donc tu sais à peu près depuis combien de temps ton PC est allumé...
2/ les fonctions sur les dates sont bcp plus efficaces :
Méthode :
1/ mettre la date courante dans une variable au lancement du programe (a=now)
donc, Date & Heure
2/ faire la différence entre la date actuelle et la date dans a, puis la différence entre les heures, minutes et secondes, avec les fonctions :
Hour(), Minute(), Second(), TimeSerial(h,m,s)
à savoir : "00:01:00" + "00:01:00" = "00:02:00"
3/ afficher la différence qui sera EXACTEMENT le nombres de h,m,s depuis que le compteur est lancé.............................
7 oct. 2002 à 14:34
Dim First as integer
Dim Sec as integer
etc., c'est plus long à écrire, mais au moins, tu est sûr que tes varaibles sont des entiers !
Sinon, ce n'est pas complètement inutile comme source, et puis ca ne bouffe pas énormément de ressources tout de même.
DARK SIDIOUS
7 oct. 2002 à 14:22
Tiens, regarde plutot ça :
http://216.26.168.92/vbapi/ref/g/gettickcount.html
C'est la commande API qui sert à retourner le nombre de millisecondes écoulées depuis le chargement de Windows....
Faut bien se renseigner avant de produire n'importe quoi...
Voilà pour le coup de gueule méchant ! ;)
Maintenant une astuce de dvp sympa :
"Dim First, Sec, Min, Heure, Jours As Integer "
Ceci produit Jours comme un Integer et le reste comme des variant... (2 octets de mem pour l'un contre 32 [!!! je crois !!!] pour l'autre... a bon entendeur...)