1. Accueil
  2. Visual Basic / VB.NET
  3. Sources Visual Basic / VB.NET
  4. Sources Graphique
  5. Redimensionner image + compression en jpg ( avec option )

Redimensionner image + compression en jpg ( avec option )

Soyez le premier à donner votre avis sur cette source.

Vue 16 254 fois - Téléchargée 2 067 fois

Télécharger le projet
Commenter

Description

Bonjour,

Ce controle utilisateur reprend pour plus de simplicité la methode de redimensionnement d'une image ( deja sur le VBFRANCE), et aussi l'enregistrement d'un fichier JPG utilisant la DLL ijl11.dll ( deja sur le VBFRANCE)

Toutefois, mon code à l'avantage de réunir les 2 au travers 1 controle extrement simple d'utilisation. ( une ligne de commande ! )

Deplus, j'ai rajouté 4 options:
- Garder les proportions par rapport à la largeur
- Garder les proportions par rapport à la hauteur
- Poid maximum du fichier à ne pas dépasser
( si fichier trop gros, il compresse de plus en plus )
- Le controle apparait sous forme de barre de progression 'simple'

J'espere que comme cela vous sera utile comme à moi ;o)

Bonne prog

Source / Exemple : 


'Redimensionner -> Fichier Image Source , Largeur(en pixel),Hauteur(en pixel),Destination du Fichier JPG, Compression( 1 à 100 ),Garder proportion sur X(True ou False), Garder proportion sur Y(True ou False), Poid Maxi en KiloOctects ( Si = 0 alors pas de Limite )

Redim_Image1.Redimensionner app.path & "\vblogo.jpg",800,600,App.Path & "\test.jpg",90,false,false,1000

Conclusion :


Je suis ouvert à toutes remarques , conseils, amélioration ;-)
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Signaler
Messages postés
38
Date d'inscription
mercredi 12 mars 2003
Statut
Membre
Dernière intervention
29 mai 2008
niveau code je ne sais pas mais dans votre photoshop CS3 ( noté dans l'entête du fichier )
il faut aller dans:
IMAGE / MODE / COULEUR RVB ( AU LIEU DE COULEUR CMJN )
sinon nivaeu code, je suis ouvert à toute explication pour la prise en compte des colories CMJN

A++++
Signaler
Messages postés
9
Date d'inscription
jeudi 13 mars 2008
Statut
Membre
Dernière intervention
15 avril 2008
Merci pour votre investissement. Malheureusement CMJN et RVB ne
me dit rien, car je n'ai pas "bidouille" (encore) les images.
Je vais donc voir comment uniformiser tout ca, sauf si vous avez deja quelque chose sous le coude.
Encore merci.
Signaler
Messages postés
38
Date d'inscription
mercredi 12 mars 2003
Statut
Membre
Dernière intervention
29 mai 2008
Ok alors cela et dû a l'image qui est en CMJN ( Non pris en compte par le pictubebox utilisé dans l'appilcation... )

Désolé va falloir travailler en RVB ^^ ou trouver le moyen de prendre en compte les fichiers CMJN
Signaler
Messages postés
9
Date d'inscription
jeudi 13 mars 2008
Statut
Membre
Dernière intervention
15 avril 2008
Bonjour,

Je n'ai jamais envoye via un service gratuit, mai j'ai essaye !!
Je pense que je dois vous donner le nom du fichier :
http://dl.free.fr/fV3n0mwxw/Photo_pour_KAFARD.jpg

Peut-etre savez-vous ou on peut trouver le format des fichiers images, du moins l'en-tete ou tout est consigne ?

Merci.
Signaler
Messages postés
38
Date d'inscription
mercredi 12 mars 2003
Statut
Membre
Dernière intervention
29 mai 2008
Oui c'est vrai mais je pensé plus a un envoi via un service gratuit genre: http://dl.free.fr
Afficher les 10 commentaires
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 (KaFarD)