FreeDev
Site développé avec WebDev
Accueil
 Les codes free de FreeDev
[WinDev][22] Comment imprimer une image TIFF dans un PDF ?

Voici un code faisant ce traitement :


s
FichierImg est une chaîne = fRepExe + fSep + "MonTiff.TIFF"
sFichierDestination est une chaîne = fExtraitChemin(sFichierImg, fDisque+fRépertoire+fFichier) + ".pdf"

xSauve est un Tiff
xSauve[1] = sFichierImg
dSauveImageTIFF(xSauve, fRepExe + fSep + "test.TIFF")

// lance l’impression de l'image pour la création du fichier PDF
iDestination(iPDF, sFichierDestination)
iFenêtreAbandon(Faux)
iImprimeImage(fRepExe + fSep + "test.TIFF", 0, 0, iLargeurPage(), iHauteurPage(), iAffichageHomoCentré)
iFinImprime

Faites des économies facilement, pensez iGraal :

J'utilise personnellement iGraal (cliquez sur le bandeau de pub à droite de ce texte).
Cela m'a permis
après inscription gratuite et installation de la barre iGraal dans le navigateur de récupérer plusieurs centaines d'euros lors de mes différents achats sur Internet (matériel à la FNAC, réservation d’hôtels chez Booking.com ou Hotels.com, achat sur la Redoute …)

C'est un vrai bon plan qui ne nécessite aucun engagement. Vous recevez ensuite le chèque à votre domicile ou un virement sur votre compte bancaire.

Il vous suffit d’installer la barre iGraal et de l’activer avant chaque achat.

Inscrivez-vous
Code Wlangage
RECHERCHE