PETIT OCX DE PING EN FORME DE COMPTEUR DE VITESSE

cs_pluplu Messages postés 615 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 4 juillet 2012 - 12 avril 2006 à 08:46
cs_JLN Messages postés 371 Date d'inscription samedi 1 juin 2002 Statut Membre Dernière intervention 17 juin 2013 - 17 avril 2006 à 09:04
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/36995-petit-ocx-de-ping-en-forme-de-compteur-de-vitesse

cs_JLN Messages postés 371 Date d'inscription samedi 1 juin 2002 Statut Membre Dernière intervention 17 juin 2013
17 avril 2006 à 09:04
Désolé, mais la notation ne fonctionne pas, attendons que Nix réparre...

Bonne prg,
@+ JLN
cs_JLN Messages postés 371 Date d'inscription samedi 1 juin 2002 Statut Membre Dernière intervention 17 juin 2013
17 avril 2006 à 09:02
Puisque tu es dans les modifs, pourrais-tu donner le choix de la taille sur le même principe que les led ca pourrai permettre de l'utiliser pour d'autres appli que celle pour laquelle tu as concu cet ocx... Quoi qu'il en soit je met 10 d'encouragement...

Bonne prog,
@+ JLN
Salaminovitch Messages postés 13 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 13 avril 2006
13 avril 2006 à 13:43
Okay, merci à NHenry pour ses conseils.

Il y a maintenant la propriété "Etat" qui contient 4 valeures:
Vert
Jaune
Rouge
Vide
... et non plus la propriété "LED" qui était un string.

Super ce site. Comme qui disait: "La connaissance ne progresse que si elle est partagée"...
Salaminovitch Messages postés 13 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 13 avril 2006
13 avril 2006 à 13:02
Génial, merci!
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 159
13 avril 2006 à 12:56
à la place d'utiliser :
CtlLed.Etat="Vert", "Rouge","Orange"

tu peux faire
Dans un module public :
public Enum ELedEtat
Vert
Orange
Rouge
End Enum

Puis dans ton controle :
private mEtat as ELedEtat

Public Property Get Etat () as ELedEtat
Etat=mEtat
End Property Set

Public Property Let Etat (byval Value as ELedEtat)
mEtat=Value
End Property Set

Ce la présente l'avantage de pouvoir éviter les fautes de frappes ("Vret") si Option Explicit est activé.

De plus tu n'a plus besoin de faire attention à la casse ("Vert", "VERT","vert")

et si tu fais un Select Case, cela génère un code plus lisible.
Salaminovitch Messages postés 13 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 13 avril 2006
13 avril 2006 à 12:35
Effectivement, ce serait le top...
Au fait, qu'est-ce qu'un "enum" ?
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 159
13 avril 2006 à 12:29
Bonjour ,
Pour la led, utilise un enum de préférence.
Le top ce serais de pouvoir personliser l'image, de définir le type de scroll (verticale, horizontale, cercle complet ou à moitié), et de pouvoir déinir la position de la LED.
jean_marc_n2 Messages postés 170 Date d'inscription jeudi 11 décembre 2003 Statut Membre Dernière intervention 24 janvier 2009
12 avril 2006 à 19:20
Hello,

moi j'aime bien ce petit ocx :-) Amusant et bien réalisé! J'ai mis 8/10.
Salaminovitch Messages postés 13 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 13 avril 2006
12 avril 2006 à 13:17
?? J'ai déjà tout ça ???
Okay, le contrôle est tout petit. C'est un peu fait exprès puisqu'il est destiné à s'intégrer dans un schéma de principe. Là je reconnais que c'est un choix personnel.
Maintenant il y a l'affichage du délai de réponse en jaune, au centre, et la led qui s'allume en bas à droite (elle est microscopique, mais elle y est.)
Voilà-voilà...
cs_pluplu Messages postés 615 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 4 juillet 2012
12 avril 2006 à 11:27
Ben déjà ce control est tout petit sur une form, et puis ce serai pas mal d'avoir un led qui s'allume lors du ping, un affichage du délais de réponse serai pas mal.
Salaminovitch Messages postés 13 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 13 avril 2006
12 avril 2006 à 11:02
Qu'entends-tu pas "démonstratif"?
Personellement, je l'utilise pour l'intégrer à un soft de monitoring, ça me fait une sorte de tableau de bord avec les temps de réponses de mes machines.
Cela dit, si tu as une idée pour qu'elle soit plus chouette, je suis preneur.
cs_pluplu Messages postés 615 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 4 juillet 2012
12 avril 2006 à 10:50
Ok mais c'est pas très vivant comme truc, le plus souvent on utilise le ping pour voir si une machine est "alive", ça doit être plus démonstratif.
Salaminovitch Messages postés 13 Date d'inscription dimanche 29 décembre 2002 Statut Membre Dernière intervention 13 avril 2006
12 avril 2006 à 10:06
Sisi! Justement! Si ça marque 0 c'est que le ping renvoie 0 millisecondes comme temps de réponse. Donc ta connexion est bonne.
Plus le chiffre est élevé, plus ta connexion est lente.
cs_pluplu Messages postés 615 Date d'inscription mercredi 18 décembre 2002 Statut Membre Dernière intervention 4 juillet 2012
12 avril 2006 à 08:46
Chez moi ça ne marche absolument pas après deux secondes il met 0 au compteur et puis plus rien, je crois que ta source demande quelques corrections.
Rejoignez-nous