diff --git a/Controls.DocumentViewer/DocumentViewer.vbproj b/Controls.DocumentViewer/DocumentViewer.vbproj index baf6f8f2..8a016afd 100644 --- a/Controls.DocumentViewer/DocumentViewer.vbproj +++ b/Controls.DocumentViewer/DocumentViewer.vbproj @@ -63,8 +63,9 @@ D:\ProgramFiles\GdPicture.NET 14\Redist\GdPicture.NET (.NET Framework 4.5)\GdPicture.NET.14.dll - - P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Independentsoft.Msg.dll + + False + P:\Visual Studio Projekte\Bibliotheken\MSG .NET\Bin\14_11_19_MIME_UTF_ENCODING\Independentsoft.Msg.dll diff --git a/GUIs.Test.DocumentViewerTest/Form1.vb b/GUIs.Test.DocumentViewerTest/Form1.vb index ce77568f..61acbd4b 100644 --- a/GUIs.Test.DocumentViewerTest/Form1.vb +++ b/GUIs.Test.DocumentViewerTest/Form1.vb @@ -12,22 +12,14 @@ Public Class Form1 End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click Try + Dim oKey = "0467389434974657969312056" + Dim oLogConfig As New LogConfig(LogConfig.PathType.CurrentDirectory) + Dim oSubform As New Form2(oLogConfig, oKey) + oSubform.FilePath = TextBox1.Text - oSubform.ShowDialog() + oSubform.Show() Catch ex As Exception MsgBox(ex.Message) End Try End Sub - - Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load - Dim oKey = "0467389434974657969312056" - Dim oLogConfig As New LogConfig(LogConfig.PathType.CurrentDirectory) - oSubform = New Form2(oLogConfig, oKey) - End Sub - - Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing - - End Sub - - End Class