TIMER OCX A INTERVAL LONG (MULTI-USAGE : CLASSIQUE, BENCHMARK, HORLOGE)

Commentaire de PCPT le 19/07/2005 16:02:50 administrateur CS

mise à jour du Zip : OCX compilé fourni.
(le Projet_Sample est tout de même lié au projet non-compilé)
je crois que ce Timer peut servir à plus d'un...
j'attend vos retours ;)

PCPT

Commentaire de PCPT le 19/07/2005 18:04:05 administrateur CS

Salut,
pour Le crash dans l'IDE, j'en suis conscient. il faut l'utiliser en OCX. il ne plante pas l'IDE lorsqu'il est compilé (je viens de vérifier).

pour "Let Interval", en effet, j'ai placé le "End If" un peu trop haut. je modifie çà, et je mettrais à jour après d'autres commentaires...
pour ceux qui veulent le changer de suite, il suffit de déplacer le "End If" juste avant le "End Property"

Pour "Err.Raise", je ne connais pas. on peut l'utiliser sans avoir à déclarer un "Event Error" perso? c'est juste pour savoir, j'aime bien ma manière de procéder tout de même :-p , avec légende + paramètres supplémentaires éventuels (même si c'est inutile pour ce cas de figure)

merci ....
(tu peux aussi noter si tu veux -_-)
PCPT

Commentaire de PCPT le 20/07/2005 01:04:27 administrateur CS

Afyn -> la seule source qui parle apparemment de cette API, c'est là tienne ;)
mis à par MSDN où je viens de trouver des infos.
seulement, en comparaison avec ta source, pour les performances, en passant par SetTimer, mon PC est entre 18% et 24% d'utilisation (avec le reste qui tourne) à intervalle de 10ms. avec ta TimerQueue..., entre 48% et 73%. et 100% en 1ms.

tu peux me donner plus d'infos? dans le sens...., m'expliquer pourquoi je devrais modifier mon timer pour qu'il décolle les dissipateurs thermiques :-p

les 10ms, donc l'équart minimal réel pour le CallBack, ok, mais ce n'est qu'un timer. celui de VB est à 18ms. çà me paraît pas mal déjà. après, pour avoir des performances plus précises entre 2 évènements, il suffit de basculer en mode BenchMark. vous pouvez par exemple mesurer :

Dim I as Integer
Af.Enabled = True
I = 3
Af.Enabled = False

-> retoune 0,0207ms

merci pour ce(s) commentaire(s), j'en prend bonne note en attendant les suivants ;)
PCPT

Commentaire de PCPT le 27/07/2005 16:25:43 administrateur CS

Afyn -> ok, merci pour ces précisions. je ne pense pas faire évoluer ce timer, pour le moment du moins, mais j'ai feuilleté un peu la MSDN en rapport à tes informations.
peut-être m'y plongerais-je + un jour...

All -> zip mis à jour, avec la correction de l'intervalle (le "End If" trop haut).
et j'en ai profité pour le passer à 10 par défaut et 10 en cas d'erreur, en laissant la possibilité de le descendre jusqu'à 1 comme le Timer VB (même si il n'y en a pas d'utilité)

PCPT

Commentaire de PCPT le 30/07/2005 10:35:52 administrateur CS

merci ;)



code -> parce que je suis dans les OCX depuis peu, c'est pour me faire la main.
        parce qu'en classe, çà existe déjà.
        pour vraiment remplacer le TimerVB, donc dans les outils ;)
        (mais tu es le 2e à m'en faire la remarque)

distribution -> l'ocx compilé est fourni dans un fichier Release, je ne vois pas le problème de référencer un projet recompilable, à un projet exemple....
ou alors j'ai mal compris.... (?)


çà fait plaisir en tout cas
PCPT