ATOUTFOX
COMMUNAUTÉ FRANCOPHONE DES PROFESSIONNELS FOXPRO
Visual FoxPro : le développement durable

Conversion TIFF en jpeg et png avec GDI+   


L'auteur

Francis Faure
France France
Membre Actif (personne physique)
# 0000000001
enregistré le 11/10/2004

http://www.wanagain.net
55 ans
Faure Francis
de la société Design Or Decline
Fiche personnelle

Note des membres
pas de note

Contributions > 11 - GDI +

Conversion TIFF en jpeg et png avec GDI+
# 0000000324
ajouté le 03/06/2006 13:54:11 et modifié le 03/06/2006
consulté 11282 fois
Niveau débutant

Version(s) Foxpro :
VFP 9.0
VFP 8.0
VFP 7.0
VFP 6.0
VFP 5.0
VFP 3.0
Zoomer sur l'image

Télécharger le ZIP (29.44 Ko)
Description
Bonjour,

dans les newsgroup fox fr : il y a eu plusieurs demandes concernant la conversion de fichier TIF, BMP, JPG, PNG.... et de manipulation des fichiers images

la meilleure réponse à ce jour (à mon goût) et l'article de mike sur GDI+

http://www.atoutfox.org/articles.asp?ACTION=FCONSULTER&ID=0000000098

depuis en parcourant les articles de la communauté,
j'ai trouvé sur :

http://www.universalthread.com

un post de M Alexander Golovlev
qui propose une classe GPimage
celle-ci est un encapsulation des fonctions GDI+

L'utilisation et simple et le résultat remarquable,
je lai adopté et vous en propose un exemple

la différence avec la solution de Mike : c'est que c'est proposé en .PRG avec les sources
(ce qui, personnellement me convient bien)

je propose donc ce post en COMPLEMENT de celui de mike, qui est très bien structuré et reste la référence incontournable

j'imagine le grand travail du concepteur ! et il a posté en "Free" : Bravo

Cordialement
Francis FAURE
Code source :

      set Procedure To gpImage Additive

      o_gdip = CreateObject("gpInit")
      o_img = CreateObject("gpImage")

      * charge le tif
      o_img.load("atoutfox.tif")

      * créer un jpg
      o_img.SaveAsJpeg("atoutfox.jpg", 100)

      * créer un png
      o_img.SaveAsPNG("atoutfox.png")

      o_img=null
      o_gdip=null

      RELEASE PROCEDURE gpimage
Fichier MHT :
Mettre en plein écran


Commentaires
Aucun commentaire enregistré ...
Publicité

Les pubs en cours :
www.atoutfox.org - Site de la Communauté Francophone des Professionnels FoxPro - v3.4.0 - © 2004-2023.
Cette page est générée par un composant COM+ développé en Visual FoxPro 9.0-SP2-HF3