Cercare una parola in una pagina di un file PDF con le risorse del Componente gb.poppler

Da Gambas-it.org - Wikipedia.

E' possibile cercare una parola in una pagina di un file PDF mediante le risorse del Componente gb.poppler .

Mostriamo un semplice esempio:

Public Sub Main()
 
 Dim pdf As New PdfDocument
 Dim s As String
 Dim c As Short
 
 pdf = New PdfDocument("/percorso/del/file.pdf")
 
 s = "parola_da_cercare"
 
' Verifica se nella prima pagina (indice zero) del file PDF esiste la parola prescelta:
 c = pdf[0].FindText(s).Count
 
 If c > 0 then Print "Esistono "; c; " occorrenze della parola cercata: "; Quote(s)
 
End


Note