Codice essenziale per mostrare un file PDF

Da Gambas-it.org - Wikipedia.
Versione del 20 nov 2012 alle 13:33 di Vuott (Discussione | contributi) (Nuova pagina: Mostreremo di seguito un semplice codice per mostrare un file ''PDF'' di una sola pagina. Sarà necessario porre sul ''Form'' una ''PictureBox'', nonché attivare il necessario compon...)

(diff) ← Versione meno recente | Versione attuale (diff) | Versione più recente → (diff)

Mostreremo di seguito un semplice codice per mostrare un file PDF di una sola pagina.

Sarà necessario porre sul Form una PictureBox, nonché attivare il necessario componente gb.pdf. Ci serviremo della Classe creabilePdfDocument. 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 hPdf As New PdfDocument
 Dim hPic As Picture
 
   
   With hPdf
' 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 in una "Picture"...
     hPic = hPdf[1].Image.Picture
' ...che caricheremo nella "PictureBox":
     PBox.Picture = hPic
   
   Else
' Altrimenti mostriamo una messaggio di avviso:   
     Message.Error("<FONT color=darkred>Errore nel caricamento del file PDF !")
    
    Endif
 
  End With

End