Compare commits
2 Commits
1a6d55d982
...
5622af9f04
| Author | SHA1 | Date | |
|---|---|---|---|
|
|
5622af9f04 | ||
|
|
bb59b39773 |
@@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("2.4.0.10")>
|
||||
<Assembly: AssemblyVersion("2.4.0.11")>
|
||||
<Assembly: AssemblyFileVersion("1.0.0.0")>
|
||||
|
||||
<Assembly: NeutralResourcesLanguageAttribute("")>
|
||||
@@ -33,12 +33,11 @@ Public Class frmIndexFileList
|
||||
|
||||
CheckedListBoxControl1.Items.Add(New SplitFile With {
|
||||
.FileName = oFilename,
|
||||
.Exists = oFileExists
|
||||
.Exists = oFileExists,
|
||||
.[Date] = oImportDate
|
||||
})
|
||||
Next
|
||||
|
||||
|
||||
|
||||
CheckedListBoxControl1.CheckAll()
|
||||
|
||||
Catch ex As Exception
|
||||
@@ -50,6 +49,7 @@ Public Class frmIndexFileList
|
||||
Public Class SplitFile
|
||||
Public FileName As String
|
||||
Public Exists As Boolean
|
||||
Public [Date] As Date
|
||||
|
||||
Public Overrides Function ToString() As String
|
||||
If Exists Then
|
||||
|
||||
@@ -218,6 +218,11 @@ Public Class frmStart
|
||||
If File.Exists(CURRENT_WORKFILE) = True And DTACTUAL_FILES.Rows.Count > 0 Then
|
||||
Open_IndexDialog()
|
||||
End If
|
||||
|
||||
' If multi-indexing is active, all files have been indexed by now, so we can leave the loop
|
||||
If MULTIINDEXING_ACTIVE Then
|
||||
Exit For
|
||||
End If
|
||||
Next
|
||||
|
||||
Show()
|
||||
|
||||
Reference in New Issue
Block a user