12.01.2024

2024-01-12 12:06:29 +01:00
parent c8106f4fb0
commit e0bbdf8c0e
12 changed files with 1129 additions and 1052 deletions
--- a/EnvelopeGenerator.Form/Helper/Thumbnail.vb
+++ b/EnvelopeGenerator.Form/Helper/Thumbnail.vb
@@ -19,6 +19,18 @@ Public Class Thumbnail

    End Sub

+    Public Function GetPageCount(pFilePath As String) As Integer
+        Try
+            GDViewer.DisplayFromFile(pFilePath)
+
+            Return GDViewer.PageCount
+
+        Catch ex As Exception
+            Logger.Error(ex)
+            Return Nothing
+        End Try
+    End Function
+
    Public Function GetThumbnailFromPDFFile(pFilePath As String) As Bitmap
        Try
            GDViewer.DisplayFromFile(pFilePath)