OVH Cloud OVH Cloud

timesetevent

5 réponses
Avatar
Long YE-SU
Bonjour,

J'utilise la fonction :

timeSetEvent( duree , MinTC , AdressOf Ma_fonction , 0 , 1 )

avec duree = 1 ms et MinTC = 1
pour executer ma fonction périodiquement : Ma_fonction

dans Ma_fonction se trouve :
un appel de fonction qui va lire une carte analogique et mets des valeurs
dans un tableau

quand je finis de récupérer mes données , je fais un timeKillEvent de mon
timer... (donc j'ai arrêter mon Timer )

Ensuite en sortant de mon programme , systèmatiquement cela plante...
apparement un problème d'accès mémoire ...

Auriez vous une idée ?

Sincères salutations
Long YE-SU

5 réponses

Avatar
Fred
Dans : news:45220f7f$0$5069$
Long YE-SU écrit :
Bonjour,



Bonjour,

J'utilise la fonction :

timeSetEvent( duree , MinTC , AdressOf Ma_fonction , 0 , 1 )



Est-ce que ta fonction (il devrait plutôt s'agir d'une Sub en VB) a bien
la signature requise ?

Vois cet exemple issu du programme APIGuide:

Sub TimerProc(ByVal uID As Long, ByVal uMsg As Long, ByVal dwUser As
Long, ByVal dw1 As Long, ByVal dw2 As Long)
'Increment MMTimer
MMTimer = MMTimer + 1
End Sub


--
Fred
http://www.cerbermail.com/?3kA6ftaCvT
Avatar
Long YE-SU
c'est quoi exactement la signature requise pour la Sub ?

Salutations
Long YE-SU



"Fred" a écrit dans le message de news:

Dans : news:45220f7f$0$5069$
Long YE-SU écrit :
> Bonjour,

Bonjour,

> J'utilise la fonction :
>
> timeSetEvent( duree , MinTC , AdressOf Ma_fonction , 0 , 1 )

Est-ce que ta fonction (il devrait plutôt s'agir d'une Sub en VB) a bien
la signature requise ?

Vois cet exemple issu du programme APIGuide:

Sub TimerProc(ByVal uID As Long, ByVal uMsg As Long, ByVal dwUser As
Long, ByVal dw1 As Long, ByVal dw2 As Long)
'Increment MMTimer
MMTimer = MMTimer + 1
End Sub


--
Fred
http://www.cerbermail.com/?3kA6ftaCvT



Avatar
Fred
dans : news:452219a9$0$5084$,
Long YE-SU écrivait :

c'est quoi exactement la signature requise pour la Sub ?



Comme dans l'exemple :
5 paramètres de type Long passés par valeur et pas de valeur de retour.

Sub TimerProc(ByVal uID As Long, ByVal uMsg As Long, _
ByVal dwUser As Long, ByVal dw1 As Long, _
ByVal dw2 As Long)


--
Fred
http://www.cerbermail.com/?3kA6ftaCvT
Avatar
Long YE-SU
sur ma fonction que j'avais récupéré sur le Net ...

j'ai en fait :

Sub MA_Procedure(ByVal uID As Long, ByVal uMsg As String, _
ByVal dwUser As String, ByVal dw1 As
String, _
ByVal dw2 As String)

je vais essayer demain car ce soir c'est un peu tard...


Salutations
Long YE-SU




"Fred" a écrit dans le message de news:

dans : news:452219a9$0$5084$,
Long YE-SU écrivait :

> c'est quoi exactement la signature requise pour la Sub ?

Comme dans l'exemple :
5 paramètres de type Long passés par valeur et pas de valeur de retour.

Sub TimerProc(ByVal uID As Long, ByVal uMsg As Long, _
ByVal dwUser As Long, ByVal dw1 As Long, _
ByVal dw2 As Long)


--
Fred
http://www.cerbermail.com/?3kA6ftaCvT



Avatar
Long YE-SU
j'ai utilisé un Timer dans un module de classe ...
le Timer fonctionne pas mal mais après avoir génèré l'exécutable

cet exécutable démarre et se plante ...
auriez vous une explication ?

Salutations
Long YE-SU



"Long YE-SU" a écrit dans le message de news:
4522d02b$0$25915$
sur ma fonction que j'avais récupéré sur le Net ...

j'ai en fait :

Sub MA_Procedure(ByVal uID As Long, ByVal uMsg As String, _
ByVal dwUser As String, ByVal dw1 As
String, _
ByVal dw2 As String)

je vais essayer demain car ce soir c'est un peu tard...


Salutations
Long YE-SU




"Fred" a écrit dans le message de news:

> dans : news:452219a9$0$5084$,
> Long YE-SU écrivait :
>
> > c'est quoi exactement la signature requise pour la Sub ?
>
> Comme dans l'exemple :
> 5 paramètres de type Long passés par valeur et pas de valeur de retour.
>
> Sub TimerProc(ByVal uID As Long, ByVal uMsg As Long, _
> ByVal dwUser As Long, ByVal dw1 As Long, _
> ByVal dw2 As Long)
>
>
> --
> Fred
> http://www.cerbermail.com/?3kA6ftaCvT
>