je veux faire sauter un bonhomme et jutilise ceci :

If keycode = 119 Then
Image1.Picture = LoadPicture(App.Path + "\Mario.gif")
Image1.Top = Image1.Top - 500
Image1.Top = Image1.Top + 500
End If

mais on na pas le temps de voir le bonhomme il saute trop vite et jai essayer de le metre dans un timer mais je ne peux pas car il ne me laisse pas metre keycode as integer dans les parentese svp jaimerai avoir de laide merci

Le plus simple serait probablement d'utiliser la fonction Sleep(millisecond)



Si tu es en VB6, ajoute cette ligne au début du module:



si tu es en VB.NET tu doit appeler la fonction de cette façon:

_________________

Desktop Windows XP pro | P-4e 3Ghz | 1 go ddr333 pc2700 | carte mère Asus P4P800-SE | carte video BFG GF6600GT OC 128mo | disques durs 160go WD et 60go Maxtor | Graveur DVD Sony DRU710A | Sound Blaster Audigy 2 ZS Platinium | Haut-parleurs Logitech Z-5500 | Microsoft Digital Media Pro Keyboard | Souris Logitech MX500 | écran Samsung 730B |

Portable Toshiba Satellite M-30

Je crois que sleep bloque tout en vb6. Donc le programme ne fera absolument rien pendant ce temps.

Un autre moyen serait avec les timer, peut-être que vous ne vous êtes pas pris correctement (semi pseudocode) :

Parcontre, si quelqu'un refrappe de nouveau sur la touche 119 avant que le timer ait lieu, ton bonhomme va avoir monter de 1000 et le timer va juste le faire descendre de 500. Pour éviter ça tu peux te faire des constantes qui donne la valeur de image1.Top + 500 et - 500. Comme ça ton bonhomme n'ira pas plus haut ni plus bas à la suite d'un appel successif. S'il peut aller de plus en plus haut alors oubli ça.

_________________
This posting is provided "AS IS" with no warranties, and confers no rights!
©2006 - 2014 Jump