[Gambas-user] How to know how many pages a pdf file has.
Ru Vuott
vuott at ...325...
Thu Apr 24 16:55:54 CEST 2014
Hello,
I "suppose", to know how many pages a pdf file has, I should use this line:
pdf.Index.Count
Where pdf is a "PdfDocument".
I do not know if I'm wrong, but I can not run that line.
*************************************
Public Sub Form_Open()
Dim index As Short = 1
Dim pdf As New PdfDocument
Dim pc As Picture
With pdf
.Open("/path/of/my/file.pdf")
If .Ready = True Then
' It loads first page:
pc = pdf[1].Image.Picture
PictureBox1.Picture = pc
PictureBox1.Resize(pdf[1].Width, pdf[1].Height)
Else
Message.Error("<FONT color=darkred><B>Unable loading file pdf !")
Quit
Endif
End With
Print pdf.Index.Count ' <=======
End
****************************************************
I obtain at that line this error notice:
" Null object "
I do not understand....
Regards
vuott
More information about the User
mailing list