Savepicture() au format png, jpg, tif etc...

4/5 (19 avis)

Vue 10 195 fois - Téléchargée 1 670 fois

Télécharger le projet
Commenter

Description

Bonjour,

Quelqu'un m'a dit l'autre jour "Enregistrer une image en PNG avec SavePicture en VB6 c'est pas possible !" Ben... si ! Vous en doutiez ?

Grace à cette démo vous pouvez enregistrer le contenu de vos PictureBox au format BMP, JPG, PNG, ICO, CUR, TIF, GIF, TGA et PCX.

Les encodeurs on été fait "à l'arrache" donc si vous avez envie d'optimiser ou d'ajouter d'autre encodeurs, faites le :)

Source / Exemple : 


'Voir le zip

Conclusion :


Quand une chose vous semble impossible, faites la !

B@nne prog
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
us_30 Messages postés 2065 Date d'inscription lundi 11 avril 2005 Statut Membre Dernière intervention 14 mars 2016 10
16 juil. 2010 à 10:49
Bonjour,

Juste une chose, sur cette source parfaite...
On peut enregistrer en TIF, mais on ne peut pas les charger ? C'est dommage pour ses TIF...

Amicalement,
Us.
cs_EBArtSoft Messages postés 4525 Date d'inscription dimanche 29 septembre 2002 Statut Modérateur Dernière intervention 22 avril 2019 9
16 juil. 2010 à 11:35
Il faudrait créer les classes de "décodeur" et les lier à LoadPicture(). Dans le principe c'est pareil mais je n'ai pas encore le code pour tous les types de fichier cités plus haut.

A la base il ne devait y avoir que le PNG et puis dans le feu de l'action...
cs_ghuysmans99 Messages postés 3983 Date d'inscription jeudi 14 juillet 2005 Statut Membre Dernière intervention 30 juin 2013 16
16 juil. 2010 à 16:17
Bien codée et complète. Que peut-on demander de plus (à part la lecture de fichiers .tif comme l'a dit us_30) ?
cs_jacques-antoine Messages postés 79 Date d'inscription mardi 7 octobre 2003 Statut Membre Dernière intervention 22 mai 2017
22 juil. 2010 à 11:41
ave,

je ne vais pas dire si ce logiciel est parfait ou pas : je n'en sais rien, vu que 1) en mode démo je suis planté illico sur l'instruction Call VBPicEncoder.Initialize(VB.Global), jusqu'à ce que je m'avise de passer par l'install.bat du répertoire DLL, et là 2) surprise : ça a l'air de fonctionner sauf qu'il n'y a aucune conversion, le résultat est un bmp, donc je me dis qu'il y a un loup quelque part, que quelque chose m'a échappé et, avant de plonger dans le code pour le désosser et trouver où ça merde, il y a peut-être quelque chose que je dois savoir, une chose à faire ou une connerie à éviter? Sinon, il m'intéresse bougrement, vu que ça fait des années que je me dis que je devrais en pondre l'équivalent, peut-être pas aussi complet, mais entre ce qu'on voudrait faire et ce qu'on fait réellement...
cs_lermite222 Messages postés 492 Date d'inscription jeudi 5 avril 2007 Statut Membre Dernière intervention 2 juillet 2012 4
16 juil. 2011 à 12:08
Bonjour,
Ce que je cherchais depuis...
Malgré tout, j'ai eu quelques problème pour faire fonctionner cette source et je les expliques pour éventuellement d'autre utilisateur.
Au premier lancement, la dll ijl11 introuvable, j'ai suivis la remarque plus haut mais pas de résultat.
Etant sous Vista j'ai voulu enrégistré la dll avec RegSvr32, mais l'erreur "Point entrée introuvable" est retournée.
Idem si je met la dll en référence.
Enfin, j'ai trouvé, il faut ouvrir VB6 en tant qu'administrateur, charger le projet, et enfin ajouter ChDir App.path
Et Yooups c'est parfait.
Merci pour cette source.
A+
S'inscrire maintenant

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.

Du même auteur (cs_EBArtSoft)