From a4b880f1d2ba6a534b8cea0b445d99e75740bdae Mon Sep 17 00:00:00 2001 From: Developer 02 Date: Wed, 19 Jun 2024 12:35:46 +0200 Subject: [PATCH] =?UTF-8?q?pGDPictureLicenseKey=20als=20Variable=20hinzuge?= =?UTF-8?q?f=C3=BCgt.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- EnvelopeGenerator.Test/frmFinalizePDF.vb | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/EnvelopeGenerator.Test/frmFinalizePDF.vb b/EnvelopeGenerator.Test/frmFinalizePDF.vb index e844ef55..7608dd35 100644 --- a/EnvelopeGenerator.Test/frmFinalizePDF.vb +++ b/EnvelopeGenerator.Test/frmFinalizePDF.vb @@ -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