Differenze tra le versioni di "Convertire una pagina di un file PDF in una immagine con le risorse del Componente gb.poppler"

Da Gambas-it.org - Wikipedia.
 
(2 versioni intermedie di uno stesso utente non sono mostrate)
Riga 2: Riga 2:
  
 
Mostriamo un semplice esempio pratico:
 
Mostriamo un semplice esempio pratico:
 +
Private Const RISOLUZIONE As Integer = 150
 +
 +
 
  Public Sub Button1_Click()
 
  Public Sub Button1_Click()
 
    
 
    
   Dim pdf As PdfDocument
+
   Dim pdfdoc As PdfDocument
 
   Dim im As Image
 
   Dim im As Image
 
    
 
    
 
  <FONT Color=gray>' ''Apre il file PDF:''</font>
 
  <FONT Color=gray>' ''Apre il file PDF:''</font>
   pdf = New PdfDocument("<FONT Color=darkgreen>''/percorso/del/file.'''pdf'''''</font>")
+
   pdfdoc = New PdfDocument("<FONT Color=darkgreen>''/percorso/del/file.'''pdf'''''</font>")
 
      
 
      
 
  <FONT Color=gray>' ''Genera una "Image" della 1<SUP>a</sup> pagina del file PDF aperto:''</font>
 
  <FONT Color=gray>' ''Genera una "Image" della 1<SUP>a</sup> pagina del file PDF aperto:''</font>
   im = pdf[0].Render()
+
   im = pdfdoc[0].Render(0, 0, pdfdoc[0].W * (RISOLUZIONE / 25.4), pdfdoc[0].H * (RISOLUZIONE / 25.4), 0, RISOLUZIONE)  <FONT Color=gray>'</font> <SUP>&#91;[[#Note|nota 2]]&#93;</sup>
 
    
 
    
 
   im.Save("<FONT Color=darkgreen>''/percorso/del/file/'''immagine'''/da/salvare''</font>", 100)
 
   im.Save("<FONT Color=darkgreen>''/percorso/del/file/'''immagine'''/da/salvare''</font>", 100)
Riga 21: Riga 24:
 
=Note=
 
=Note=
 
[1] Vedere anche questa pagina della Wiki: [[Codice essenziale per mostrare un file PDF con le risorse del Componente gb.poppler]]
 
[1] Vedere anche questa pagina della Wiki: [[Codice essenziale per mostrare un file PDF con le risorse del Componente gb.poppler]]
 +
 +
[2] '''25,4''' millimetri = '''1''' pollice

Versione attuale delle 12:06, 26 lug 2024

Mediante la Classe PdfDocument del Componente gb.poppler di Gambas è possibile ottenere un Oggetto di tipo Image da una pagina di un file PDF. [nota 1]

Mostriamo un semplice esempio pratico:

Private Const RISOLUZIONE As Integer = 150


Public Sub Button1_Click()
 
  Dim pdfdoc As PdfDocument
  Dim im As Image
 
' Apre il file PDF:
  pdfdoc = New PdfDocument("/percorso/del/file.pdf")
   
' Genera una "Image" della 1a pagina del file PDF aperto:
  im = pdfdoc[0].Render(0, 0, pdfdoc[0].W * (RISOLUZIONE / 25.4), pdfdoc[0].H * (RISOLUZIONE / 25.4), 0, RISOLUZIONE)  ' [nota 2]
 
  im.Save("/percorso/del/file/immagine/da/salvare", 100)
 
End


Note

[1] Vedere anche questa pagina della Wiki: Codice essenziale per mostrare un file PDF con le risorse del Componente gb.poppler

[2] 25,4 millimetri = 1 pollice