Alessandro Del Sole's Blog

{ A programming space about Microsoft® .NET® }
posts - 1909, comments - 2047, trackbacks - 352

My Links

News

Your host

This is me! Questo spazio è dedicato a Microsoft® .NET®, di cui sono molto appassionato :-)

Cookie e Privacy

Microsoft MVP

My MVP Profile

Microsoft Certified Professional

Microsoft Specialist

Xamarin Certified Mobile Developer

Il mio libro su VB 2015!

Pre-ordina il mio libro su VB 2015 Pre-ordina il mio libro "Visual Basic 2015 Unleashed". Clicca sulla copertina per informazioni!

Il mio libro su WPF 4.5.1!

Clicca sulla copertina per informazioni! E' uscito il mio libro "Programmare con WPF 4.5.1". Clicca sulla copertina per informazioni!

These postings are provided 'AS IS' for entertainment purposes only with absolutely no warranty expressed or implied and confer no rights.
If you're not an Italian user, please visit my English blog

Le vostre visite

I'm a VB!

Guarda la mia intervista a Seattle

Follow me on Twitter!

Altri spazi

GitHub
I miei progetti open-source su GitHub

Article Categories

Archives

Post Categories

Image Galleries

Privacy Policy

Esempio di codice per creare PDF con la libreria Gios PDF.NET

Ricevo diverse e-mail in cui mi vengono chieste delucidazioni sulla libreria open-source per creare file PDF in .NET, realizzata dall'italiano Paolo Gios, chiamata Gios PDF .NET Library, di cui ho parlato in un precedente post.

Sarebbe carino chiedere direttamente all'autore della libreria determinati aiuti, in ogni caso il codice che segue mostra come creare un documento PDF da codice Visual Basic 2005 a partire da un'immagine jpeg esistente e come salvarlo su file (presuppone l'aggiunta di un riferimento alla libreria):

Dim pdfFile As String 'conterrà il nome del file PDF

Dim myPDFDocument As Gios.Pdf2.PdfDocument 'Dichiara un oggetto-documento PDF

pdfFile = "C:\Il_mio_documento.Pdf"

'Se non c'è alcuna istanza dell'oggetto PDFDocument, ne crea una (in formato A4)

If myPDFDocument Is Nothing Then myPDFDocument = New Gios.Pdf2.PdfDocument(Gios.Pdf2.PdfDocumentFormat.A4)

'Ottiene l'istanza per una nuova immagine da inserire nel PDF a partire da un'immagine esistente

Dim myImage As Gios.Pdf2.PdfImage = myPDFDocument.NewImage("C:\Immagine1.jpg")

'Istanzia una nuova pagina da aggiungere al documento PDF

Dim myPage As Gios.Pdf2.PdfPage = myPDFDocument.NewPage

'Aggiunge l'immagine alla pagina (100 corrisponde ai DPI)

myPage.Add(myImage, 0, 0, 100)

'Aggiunge la pagina al documento

myPage.SaveToDocument()

'Salva il documento PDF

myPDFDocument.SaveToFile(pdfFile)

'e rilascia le risorse

myPDFDocument = Nothing

Ovviamente il codice va riadattato alle vostre esigenze (vi basta solo un po' di curiosità e voglia di sperimentare) però spero che questo snippet possa esservi utile :-)

A proposito di snippet, ho realizzato un file in formato .vsi contenente il frammento sopra riportato bell'e pronto, che potete scaricare al seguente indirizzo e che installerà il frammento di codice negli snippet disponibili con Visual Studio e che potrete riutilizzare tramite Intellisense: http://www.silvercybertech.com/alessandro/codesamples/blog/vsi/creategiospdf.vsi. Se venite avvertiti del fatto che l'autore è sconosciuto e che l'installazione è rischiosa, non preoccupatevi: l'autore sono io e il file è attendibile! si tratta del solito messaggio di protezione di Visual Studio Content Installer.

Alessandro

Print | posted on mercoledì 31 ottobre 2007 00:38 | Filed Under [ Visual Basic ]

Powered by:
Powered By Subtext Powered By ASP.NET