Codice essenziale per mostrare un file PDF

Per mostrare un documento PDF, bisognerà utilizzare le risrse del Componente gb.poppler.

Mostriamo un semplice esempio, nel quale bisognerà porre sul Form una ImageView e un Button, nonché attivare l'indispensabile Componente gb.poppler.
Ci serviremo, quindi, della Classe PdfDocument, la quale consente di leggere il contenuto di un documento PDF e di mostrarlo.

Private pdf As PdfDocument
Private c As Short


Public Sub Form_Open()
 
' Carica il file PDF del documento da mostrare:
 pdf = New PdfDocument("/percorso/del/file.pdf")

End


' Cliccando sul tasto viene mostrato il docuento PDF nell'Oggetto "ImageView" ed è possibile passare alla eventuale pagina successiva del PDF:
Public Sub Button1_Click()

 Dim im As Image
 
' Converte la prima pagina ("indice" delle pagine = 1) in una "Image":
 im = pdf[0].Render()
 
' Carica l'immagine nella "ImageView":
 ImageView1.Image = im
 
 Me.Caption = "Pagina: " & CStr(c + 1)
 
 Inc c
 If c == pdf.Count Then c = pdf.Count - 1
 
End