pGDPictureLicenseKey als Variable hinzugefügt.

This commit is contained in:
Developer 02 2024-06-19 12:35:46 +02:00
parent ecec1e1206
commit a4b880f1d2

View File

@ -14,18 +14,19 @@ Public Class frmFinalizePDF
Private Viewer As GdViewer
Private Manager As AnnotationManager
Private PDFBurner As FinalizeDocument.PDFBurner
Private pGDPictureLicenseKey As String = "21182889975216572111813147150675976632"
Private Sub frmFinalizePDF_Load(sender As Object, e As EventArgs) Handles MyBase.Load
LogConfig = New LogConfig(LogConfig.PathType.CustomPath, Application.StartupPath)
Database = New MSSQLServer(LogConfig, MSSQLServer.DecryptConnectionString(CONNECTIONSTRING))
PDFBurner = New FinalizeDocument.PDFBurner(LogConfig, "PS231031-44053-15086")
PDFBurner = New FinalizeDocument.PDFBurner(LogConfig, pGDPictureLicenseKey)
Viewer = New GdViewer()
Manager = New AnnotationManager()
Dim oLicense = New LicenseManager()
oLicense.RegisterKEY("PS231031-44053-15086")
oLicense.RegisterKEY(pGDPictureLicenseKey)
End Sub
Private Function LoadAnnotationDataForReceiver() As String