4 Commits

Author SHA1 Message Date
Jonathan Jenne
905a660e2b Merge branch 'master' of http://dd-vmp07-com04:3000/AppStd/Monorepo 2020-06-08 15:46:08 +02:00
Jonathan Jenne
de1fc4a5cc ClipboardWatcher: Version 1.0.0.1 2020-06-08 15:45:51 +02:00
Jonathan Jenne
664ff68b32 ZUGFeRDTest: add license 2020-06-08 15:45:18 +02:00
Jonathan Jenne
b288544a32 ClipboardWatcher: fix treeview button anchor 2020-06-08 15:44:59 +02:00
3 changed files with 5 additions and 4 deletions

View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyVersion("1.0.0.1")>
<Assembly: AssemblyFileVersion("1.0.0.0")>

View File

@@ -81,6 +81,7 @@ Partial Class frmMatch
'
'Label2
'
Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
Me.Label2.AutoSize = True
Me.Label2.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.Label2.Cursor = System.Windows.Forms.Cursors.Hand
@@ -100,8 +101,8 @@ Partial Class frmMatch
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.TileControlMatch)
Me.IconOptions.ShowIcon = False
Me.Name = "frmMatch"
Me.ShowIcon = False
Me.Text = "Profile gefunden"
Me.ResumeLayout(False)
Me.PerformLayout()

View File

@@ -25,7 +25,7 @@ Public Class Form1
_firebird = New Firebird(_logConfig, My.Settings.FB_DATASOURCE, My.Settings.FB_DATABASE, My.Settings.FB_USER, My.Settings.FB_PASS)
_mssql = New MSSQLServer(_logConfig, My.Settings.MSSQL_CONNECTIONSTRING)
_zugferd = New ZUGFeRDInterface(_logConfig, "")
_zugferd = New ZUGFeRDInterface(_logConfig, "21182889975216572111813147150675976632")
End Sub
Private Function LoadFolderConfig(args As WorkerArgs)
@@ -105,7 +105,7 @@ Public Class Form1
Dim oResult = OpenFileDialog1.ShowDialog()
If oResult = DialogResult.OK Then
Dim oDoc = _zugferd.ValidateZUGFeRDFile(OpenFileDialog1.FileName)
Dim oDoc = _zugferd.ValidateZUGFeRDFileWithGDPicture(OpenFileDialog1.FileName)
Dim oZUGFERD = _zugferd.SerializeZUGFeRDDocument(oDoc)
Console.WriteLine()
End If