Page 1 sur 1

Publié : ven. 19/oct./2007 21:52
par comtois
Un code de NetMaestro

Code : Tout sélectionner

Procedure Pulse(uID, uMsg, dwUser, dw1, dw2)
  Debug "Hello! I was sent the user value of: "+Str(dwUser)
EndProcedure

timeSetEvent_(1000, 0, @Pulse(), 5, #TIME_PERIODIC)

Repeat
  Delay(1)
Until GetAsyncKeyState_(#VK_ESCAPE) & 32768
Par contre si tu as la version démo ce code ne pourra pas fonctionner car il fait appel à des fonctions de l'API windows.

Mais comme j'ai lu que tu voulais acheter PureBasic, ça ne sera bientôt plus un problème pour toi :)

Sinon fais une recherche sur le mot timer ici ou sur le forum anglais ,tu devrais trouver d'autres exemples.

Publié : ven. 19/oct./2007 22:45
par Dr. Dri
yoman64 a écrit :

Code : Tout sélectionner

PokeB(*Buffer, 0)
PokeB(*Buffer+1, 0)
PokeB(*Buffer+2, 0)
PokeB(*Buffer+3, 0)
pour info ca se résume à

Code : Tout sélectionner

PokeL(*Buffer, 0)
Dri

Publié : ven. 19/oct./2007 23:16
par yoman64
En fait cétait pas 0 mais 255 que je devais envoyé donc je crois que je dois faire byte par byte, a moin que je les déplace en tant que string chr(255)+chr(255)+chr(255)+chr(255)

Publié : sam. 20/oct./2007 0:08
par Dr. Dri

Code : Tout sélectionner

PokeL(*Buffer, -1)
Dri ;)

Publié : sam. 20/oct./2007 0:38
par yoman64
Dr. Dri a écrit :

Code : Tout sélectionner

PokeL(*Buffer, -1)
Dri ;)
ça fonctionne :) merci pour l'astuce ;)

Publié : sam. 20/oct./2007 14:58
par lionel_om
Dr. Dri a écrit :

Code : Tout sélectionner

PokeL(*Buffer, -1)
Dri ;)
Toujours là pour les bons conseils :wink: