HORLOGE A AIGUILLE TOUTE SIMPLE

cs_Logan Messages postés 99 Date d'inscription mercredi 2 janvier 2002 Statut Membre Dernière intervention 9 juin 2008 - 19 juin 2004 à 01:54
suma1986 Messages postés 3 Date d'inscription mercredi 17 février 2010 Statut Membre Dernière intervention 24 février 2010 - 18 févr. 2010 à 12:37
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/23804-horloge-a-aiguille-toute-simple

suma1986 Messages postés 3 Date d'inscription mercredi 17 février 2010 Statut Membre Dernière intervention 24 février 2010
18 févr. 2010 à 12:37
merci bien
je vais essayer de bien analyser des codes ensuite je vais créer horloge avec idée différente
merci une autre fois
NHenry Messages postés 15116 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 9 mai 2024 159
14 avril 2008 à 14:35
Bonjour,

En VB6, si ton image clignote c'est que soit tu n'a pas mis AutoRedraw=True au bon controle, soit il y a un pb ailleurs, mais dans ce cas, je ne peux rien sans avoir le code (voir sur le forum pour rechercher une explication).
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
11 avril 2008 à 16:55
C'est exécuté, mais toujours pareil, les images clignotent :/
NHenry Messages postés 15116 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 9 mai 2024 159
11 avril 2008 à 15:41
Bonjour,

Non, c'est une propriété de la form, PictureBox et autres contrôles pouvant contenir des images.
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
11 avril 2008 à 15:28
Excuse moi je n'ai pas bien saisi, l'autoredraw n'existe pas ni dans ta source ni dans les propriétés de l'option "image"...
NHenry Messages postés 15116 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 9 mai 2024 159
11 avril 2008 à 08:43
Bonjour,

Oui, si tu n'as pas activer le "AutoRedraw" du conteneur de l'image.
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
10 avril 2008 à 19:18
C'est parfait ! Tout fonctionne super bien ! Merci Bokou ^^
Au fait, c normal que mes images de ma form clinotent a chaque fois que la seconde tourne ?
NHenry Messages postés 15116 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 9 mai 2024 159
10 avril 2008 à 09:29
Bonjour,

En effet, une erreur idiote (pas d'autre mot sur le clavier pour la qualifier) :

Dans la procédure du Timer :
DrawAiguille Heures, 24, 30

En clair, l'aiguille des heures fait un tour en 24h et non 12 :/
correction :
DrawAiguille Heures, 12, 30
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
10 avril 2008 à 02:19
J'ai essayé un truc !
J'ai ouvert l'horloge Windows et j'ai regardé attentivement les aiguilles.
Les minutes et les secondes sont justes face à l'image alors que l'heure est plus lente.
Supposons qu'il est 00:15
Si je change l'heure à 1:30, il me donnera 00:30 (affichage horloge normal), donc l'heure est plus lente et ne fait pas le tour normalement.

C'est certainement de là que vient l'erreur je crois.
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
10 avril 2008 à 02:10
J'ai laissé le "Timer1" et le "Pict" et je n'ai recopié que ce bout de code :
http://img233.imageshack.us/img233/4614/codehorlogehe1.jpg

J'ai supprimé le module et tout le reste du code.

En fait, quand le laisse la page ouverte, l'heure n'avance pas. Mais si je ferme et la réouvre, il m'indique la bonne heure.
Je l'ai donc laissé sous test hier matin à 3:30 et me suis levé à 7:55 et je vois que la fenêtre restée active toute la nuit m'affiche 4:55

Ce soit j'ai fermé l'appli et l'ai réouvert, j'ai eu l'heure juste.
Je le laisse encore ouvert cette nuit pour savoir et mieux être fixé.
Il est 00:07 (à l'ouverture du logiciel
Il sera ..... (à mon réveil)
NHenry Messages postés 15116 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 9 mai 2024 159
9 avril 2008 à 13:59
Message envoyé en pv :
Merci beaucoup pour la réponse !
J'ai essayé ce code encore ce matin mais je crois qu'il y'a une erreur que je n'arrive pas à gérer.
Il est 7:55 chez moi mais ta source m'affiche 4:55

J'ai modifier :
Const CentreX As Double = 60
Const CentreY As Double = 60
pour centrer les aiguilles, c'était là le truc, mais vois l'erreur qu'il me donne :s

Pourrais tu m'indiquer stp ?

Réponse :

Comment tu appel la fonction (avec le traitement de l'heure) ?
NHenry Messages postés 15116 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 9 mai 2024 159
9 avril 2008 à 09:07
Bonjour,

Tu as 2 variables dans :

# Private Sub DrawAiguille(ByVal Value As Double, ByVal Max As Double, ByVal Longu As Double)
# Dim X As Double
# Dim Y As Double
# X = Sin((Value / (Max / 2)) * PI) * Longu + CentreX
# Y = Cos((Value / (Max / 2)) * PI) * (0 - Longu) + CentreY
# Line (CentreX, CentreY)-(X, Y)
# End Sub

CentreX et Centre Y, c'est celles-la qu'il faut modifier.

Enfin je penses, ça fait tellement longtemps que je n'ai pas touché à cette source ;)
Sinsitrus Messages postés 849 Date d'inscription samedi 11 juin 2005 Statut Membre Dernière intervention 21 août 2015
9 avril 2008 à 04:38
Salut
J'ai inséré ce code dans ma form mais je souhaiterais faire afficher les aiguille au centre de mon image de 1770*1770 situé au top 6285 et au left 13965
Je n'arrive pas à centrer les aiguille à ce point là !

pouvez vous m'aider svp ?

Voir image pour explications :
http://img88.imageshack.us/img88/1183/sanstitre2gp9.gif

Merci de m'aider
Eastchild Messages postés 318 Date d'inscription lundi 23 juillet 2007 Statut Membre Dernière intervention 28 mars 2012
18 sept. 2007 à 13:27
Tiens, j'vais pouvoir m'amuser à me faire "les gadgets" de Vista sous Xp :D
NHenry Messages postés 15116 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 9 mai 2024 159
29 mai 2006 à 08:27
Merci, j'ai aussi chercher un moment avant de la trouvée.
zemetafyzik Messages postés 117 Date d'inscription jeudi 17 juin 2004 Statut Membre Dernière intervention 3 novembre 2007 1
24 mai 2006 à 21:45
merci d'avoir mis "simplement" la formule pour dessiner les aiguilles avec les cos et sin ... je n'arrivais pas a la trouver en reflechissant...
Rejoignez-nous