AppCustom/MultiTool
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

WIP

Browse Source
This commit is contained in:
Jonathan Jenne
2021-10-27 16:38:19 +02:00
parent a519b93f47
commit 3fac097f46
24 changed files with 817 additions and 387 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
EDIDocumentImport/frmImportMain_old.vb
View File

@@ -120,7 +120,7 @@ Public Class frmImportMain_old
Private Sub btnLoadDocuments_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnLoadDocuments.ItemClick
Try
If DocumentLoader.LoadFiles(ConfigManager.Config.InputDirectory, Nothing) = True Then
If DocumentLoader.LoadFiles(ConfigManager.Config.InputDirectory, Nothing, Nothing) = True Then
RibbonGroupDataTransmission.Enabled = True
RibbonGroupDocument.Enabled = True
@@ -159,19 +159,19 @@ Public Class frmImportMain_old
' Load XML File in the sidebar
RichEditXml.LoadDocument(pDocument.FullName, DocumentFormat.PlainText)
If pDocument.Mandator Is Nothing Then
Dim oForm As New frmMandatorSelection() With {
.Mandators = Winline.Mandators,
.SelectedMandator = Nothing
}
Dim oResult = oForm.ShowDialog()
'If pDocument.Mandator Is Nothing Then
' Dim oForm As New frmMandatorSelection() With {
' .Mandators = Winline.Mandators,
' .SelectedMandator = Nothing
' }
' Dim oResult = oForm.ShowDialog()
If oResult <> DialogResult.OK Then
Exit Sub
End If
' If oResult <> DialogResult.OK Then
' Exit Sub
' End If
pDocument.Mandator = oForm.SelectedMandator.Id
End If
' pDocument.Mandator = oForm.SelectedMandator
'End If
Try
Select Case pDocument.Type