Pb couleur pixel picturebox [Résolu]

Signaler
Messages postés
84
Date d'inscription
lundi 6 novembre 2000
Statut
Membre
Dernière intervention
25 juillet 2008
-
Messages postés
84
Date d'inscription
lundi 6 novembre 2000
Statut
Membre
Dernière intervention
25 juillet 2008
-
le code suivant me renvoit toujours du noir, alors que l'image est bien chargée !!

j'y comprends rien !! HEELLLLLLLLLLLPPPP !!!



Public Function GetColor(ByVal X As Long, ByVal Y As Long) As color



Dim pixel As color, RGBPx As Long



' Pixel (X,Y) de l'écran (hwnd = 0)

RGBPx = GetPixel(Main.PicBox.hdc, X, Y)



' Décompose la couleur (chaque octet représente une composante de la couleur)

pixel.red = &HFF& And RGBPx

pixel.green = (&HFF00& And RGBPx) \ 256

pixel.blue = (&HFF0000 And RGBPx) \ 65536

GetColor = pixel

' Retourne le résultat

'CurPixelColor = pixel



End Function

1 réponse

Messages postés
84
Date d'inscription
lundi 6 novembre 2000
Statut
Membre
Dernière intervention
25 juillet 2008
1
En fait, c'était juste parceque je débuggais !!!

je suppose que un getpixel d'un hdc autre que celui de lécran passe qd
meme par celui de l'ecran... donc si l'appel est fait tandis que
l'écran affiche autre chose que le picturebox, ca renvoit la couleur
courante. je trouve ca archi bizarre qd meme ... et je suppose que ca
doit etre source de bien des buggs...
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 179 internautes nous ont dit merci ce mois-ci