Enregistrer une image créer avec setpixel [Résolu]

chodavins 7 Messages postés jeudi 1 avril 2004Date d'inscription 25 mai 2007 Dernière intervention - 25 mai 2007 à 03:14 - Dernière réponse : chodavins 7 Messages postés jeudi 1 avril 2004Date d'inscription 25 mai 2007 Dernière intervention
- 25 mai 2007 à 12:17
bonjour,
j'ai créé une image dans une picturebox avec une succéssion de setpixel, et quand je veux enregistrer cette image avec savepicture j'optiens une image blanche.
comment faire pour enregistrer l'image que j'ai créée?
merci pour votre aide.
Afficher la suite 

Votre réponse

4 réponses

Meilleure réponse
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 25 mai 2007 à 08:39
3
Merci
tout dépend de ton autoredraw.

ce genre de chose, en somme :

Private Declare Function SetPixelV Lib "gdi32.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long

Private Sub Command1_Click()
   SavePicture Picture1.Image, "c:\a.bmp"
End Sub<hr />
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, x As Single, y As Single)
   Picture1.AutoRedraw = True
   SetPixelV Picture1.hdc, x, y, vbRed
   Picture1.Refresh
   Picture1.AutoRedraw = False
End Sub , ----
By Renfield

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 87 internautes ce mois-ci

Commenter la réponse de Renfield
Meilleure réponse
Renfield 17307 Messages postés mercredi 2 janvier 2002Date d'inscription 18 janvier 2017 Dernière intervention - 25 mai 2007 à 08:42
3
Merci
NB. il faut que le ScaleMode soit à 3 - vbPixels pour que mon code fonctionne

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Merci Renfield 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 87 internautes ce mois-ci

Commenter la réponse de Renfield
cs_DARKSIDIOUS 15838 Messages postés jeudi 8 août 2002Date d'inscription 4 mars 2013 Dernière intervention - 25 mai 2007 à 06:55
0
Merci
avant l'enregistrement de ton image :

Set PictureBox.Picture = PictureBox.Image
Commenter la réponse de cs_DARKSIDIOUS
chodavins 7 Messages postés jeudi 1 avril 2004Date d'inscription 25 mai 2007 Dernière intervention - 25 mai 2007 à 12:17
0
Merci
merci beaucoup Renfield, il me manquait les deux instruction .AutoRedraw et la .Refresh.


encore merci.
Commenter la réponse de chodavins

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.