ZUGFerdTest: Validate Files with new gdpicture

This commit is contained in:
Jonathan Jenne 2021-03-08 15:34:39 +01:00
parent 504199adc6
commit 526c9c349a

View File

@ -100,7 +100,7 @@ Public Class Form1
Dim oResult = OpenFileDialog1.ShowDialog()
If oResult = DialogResult.OK Then
_zugferd.ValidateZUGFeRDFile(OpenFileDialog1.FileName)
_zugferd.ValidateZUGFeRDFileWithGDPicture(OpenFileDialog1.FileName)
End If
End Sub
@ -150,7 +150,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 As CrossIndustryDocumentType = _zugferd.SerializeZUGFeRDDocument(oDoc)
Dim oPropName As String = txtPropName.Text