Enregistrement "image" GDI

Question

Bonjour bonjour!

Voila, je crée un dessin en GDI, que j'applique ensuite à une picturebox, mais après je ne sais pas commet faire pour, soit enregistrer mon dessin sous une image, soit l'imprimer directement?

Voici une partie du code :

Dim Gauche As Long, Haut As Long
Haut = 10
Gauche = 10

    'Rectangle principal + trait double
    Cl.drawRect Gauche - 4, Haut - 4, LNGBAT + 4, LRGBAT + 4, vbBlack, Gris, vbSolid, vbFSSolid
    Cl.drawRect Gauche, Haut, LNGBAT, LRGBAT, vbBlack, Vert, vbSolid, vbFSSolid

    'Rectangle horizontal no1
    Cl.drawRect Gauche, Haut + LRGAIRE1, LNGBAT, Haut + LRGAIRE1 + LRGCOUL, vbBlack, vbWhite, vbSolid, vbFSSolid
    
    'Auges horizontales
    Cl.drawRect Gauche + 1, Haut + LRGAIRE1 + 1, LNGBAT, Haut + LRGAIRE1 + 5, Jaune, Jaune, vbInvisible, vbFSSolid
    Cl.drawRect Gauche + 1, Haut + LRGAIRE1 + LRGCOUL - 4, LNGBAT, Haut + LRGAIRE1 + LRGCOUL, Jaune, Jaune, vbInvisible, vbFSSolid
    
    Cl.PaintTo batiment.hdc, 0, 0

batiment est ma picturebox :)
Cl est le module de classe pour les fonctions GDI

Merci d'avance!

cs_molo molo · Answer

Salut,

le .savepicture il me semble pour le controle picturebox

Bon dev

croftman · Answer

J'ai tenté le .savepicture, mais ça ne marche pas, cela m'enregistre une image vide!

Merci quand même

jmfmarques · Answer

Bonjour,

Il faut d'abord "figer" l'image de ta picturebox

Picture1.picture = Picture1.image

puis faire le savepicture

croftman · Answer

Bonsoir,

Non j'ai essayé aussi :)

Ça m'efface l'image et me sauvegarde une image vide :/

Enregistrement "image" GDI

4 réponses

Votre réponse

Discussions similaires