Differenze tra le versioni di "Codice essenziale per mostrare un file PDF"
Da Gambas-it.org - Wikipedia.
| Riga 1: | Riga 1: | ||
| − | Mostreremo di seguito un semplice codice per mostrare un | + | Mostreremo di seguito un semplice codice per mostrare un documento ''PDF'' di una sola pagina. |
| − | Sarà necessario porre sul ''Form'' una ''PictureBox'', nonché attivare il necessario componente ''gb.pdf''. Ci serviremo della Classe creabile''PdfDocument''. Questa Classe, creabile, consente di leggere il contenuto di un documento PDF e di mostrarlo. | + | Sarà necessario porre sul ''Form'' una ''PictureBox'', nonché attivare il necessario componente ''gb.pdf''. Ci serviremo, quindi, della Classe creabile ''PdfDocument''. Questa Classe, creabile, consente di leggere il contenuto di un documento PDF e di mostrarlo. |
L'esempio prende in cosiderazione un documento PDF composto da un'unica pagina: | L'esempio prende in cosiderazione un documento PDF composto da un'unica pagina: | ||
Versione delle 13:42, 20 nov 2012
Mostreremo di seguito un semplice codice per mostrare un documento PDF di una sola pagina.
Sarà necessario porre sul Form una PictureBox, nonché attivare il necessario componente gb.pdf. Ci serviremo, quindi, della Classe creabile PdfDocument. Questa Classe, creabile, consente di leggere il contenuto di un documento PDF e di mostrarlo.
L'esempio prende in cosiderazione un documento PDF composto da un'unica pagina:
Public Sub Button1_Click()
Dim pdf As New PdfDocument
Dim pc As Picture
With pdf
' Carichiamo il file PDF del documento da mostrare:
.Open("mio_file.pdf")
' Se il file pdf è stato caricato correttamente...
If .Ready = True Then
' ...allora convertiamo la prima pagina ("indice" delle pagine = 1) in una "Image",
' e quindi l' "image" in una "Picture"...
pc = pdf[1].Image.Picture
' ...che così potremo caricare nella "PictureBox":
PictureBox1.Picture = pc
Else
' Altrimenti mostriamo una messaggio di avviso:
Message.Error("<FONT color=darkred>Errore nel caricamento del file PDF !")
Endif
End With
End
