DÉPLACER UNE IMAGE TROP GRANDE DANS UN PICTUREBOX TROP PETIT
BlackWizzard
-
2 juin 2001 à 14:02
z980x
Messages postés897Date d'inscriptionjeudi 6 juin 2002StatutMembreDernière intervention26 juillet 2007
-
13 juin 2004 à 12:26
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
z980x
Messages postés897Date d'inscriptionjeudi 6 juin 2002StatutMembreDernière intervention26 juillet 20072 13 juin 2004 à 12:26
Ah c'est cool !
Je m'en sers dans mon prog !
(T'inquiète, je dirais bien que c'est toi qui l'a fait !)
Merci !
10/10
hubsm
Messages postés28Date d'inscriptionmercredi 12 juin 2002StatutMembreDernière intervention26 juin 2007 4 févr. 2004 à 12:57
Merci !!
spacest
Messages postés11Date d'inscriptionlundi 24 juin 2002StatutMembreDernière intervention13 avril 2005 4 déc. 2002 à 17:12
Vraiment pas mal comme code!!!
Juste un petit défaut: l'image tremble si on laisse le bouton appuyé sans bouger.
Pour remédier à cela, on laisse un délai de 30 pixel avant tout mouvement:
If X < DepartX - 30 Then
If Picture2.Left < Limit2 Then Exit Sub
Picture2.Left = Picture2.Left - 50
End If
If X > DepartX + 30 Then
If Picture2.Left > 0 Then Exit Sub
Picture2.Left = Picture2.Left + 50
End If
et pareil pour Y.
Voilà! en tout cas merci!
13 juin 2004 à 12:26
Je m'en sers dans mon prog !
(T'inquiète, je dirais bien que c'est toi qui l'a fait !)
Merci !
10/10
4 févr. 2004 à 12:57
4 déc. 2002 à 17:12
Juste un petit défaut: l'image tremble si on laisse le bouton appuyé sans bouger.
Pour remédier à cela, on laisse un délai de 30 pixel avant tout mouvement:
If X < DepartX - 30 Then
If Picture2.Left < Limit2 Then Exit Sub
Picture2.Left = Picture2.Left - 50
End If
If X > DepartX + 30 Then
If Picture2.Left > 0 Then Exit Sub
Picture2.Left = Picture2.Left + 50
End If
et pareil pour Y.
Voilà! en tout cas merci!
2 juin 2001 à 14:02