Détourage d'image
nicoine
Messages postés
51
Date d'inscription
vendredi 23 juillet 2004
Statut
Membre
Dernière intervention
23 février 2012
-
19 juil. 2007 à 12:01
cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 - 19 juil. 2007 à 13:29
cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 - 19 juil. 2007 à 13:29
2 réponses
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
130
19 juil. 2007 à 12:57
19 juil. 2007 à 12:57
Va voir ma source "tracer les contours d'une image", ou encore "lisser les contours d'une image" pour voir comment faire le détourage, après pour te passer de picturebox, ben, bon courage ! J'espère que tu connais bien les API Windows :p
cs_EBArtSoft
Messages postés
4525
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
9
19 juil. 2007 à 13:29
19 juil. 2007 à 13:29
Ca risque d'etre assez long a faire sans picturebox.
Neanmoins tu peux charger ton image comme ceci :
Set MyPicture = LoadPicture("...")
Puis acceder aux pixel en creant un DC (device context) grace aux API :
MyhDC = CreateDC("..")
MyOldBmp = SelectObject( MyhDC,MyPicture.Handle)
Ensuite libre a toi de modifier les contours :
SetPixel MyhDC, 10, 10, RGB(255,255,255)
Puis sauvegarder l'image :
SelectObject MuhDC, MyOldBmp
DeleteDC MyhDC
SavePicture MyPicture, "...")
@+
Neanmoins tu peux charger ton image comme ceci :
Set MyPicture = LoadPicture("...")
Puis acceder aux pixel en creant un DC (device context) grace aux API :
MyhDC = CreateDC("..")
MyOldBmp = SelectObject( MyhDC,MyPicture.Handle)
Ensuite libre a toi de modifier les contours :
SetPixel MyhDC, 10, 10, RGB(255,255,255)
Puis sauvegarder l'image :
SelectObject MuhDC, MyOldBmp
DeleteDC MyhDC
SavePicture MyPicture, "...")
@+
E.B.
