[Mounted images] Fixed sync issues and #169

MainForm.vb

@@ -176,6 +176,7 @@ Public Class MainForm
 
     ' Refactored listings for 0.6
     Public MountedImages As New List(Of MountedImage)
+    Public ImageDetectionComplete As Boolean
 
     Public MountedImageImgFiles(65535) As String
     Public MountedImageMountDirs(65535) As String
@@ -862,8 +863,13 @@ Public Class MainForm
                     imageStatus = ImageWatcher.Status.Invalid
             End Select
             Dim imageVersion As New Version()
-            imageVersion = New Version(FileVersionInfo.GetVersionInfo(imageInfo.MountPath & "\Windows\system32\ntoskrnl.exe").ProductVersion)
-            MountedImages.Add(New MountedImage(imageInfo.ImageFilePath, imageInfo.ImageIndex, imageInfo.MountPath, imageStatus, (imageInfo.MountMode = DismMountMode.ReadWrite), imageVersion))
+            If File.Exists(imageInfo.MountPath & "\Windows\system32\ntoskrnl.exe") Then
+                imageVersion = New Version(FileVersionInfo.GetVersionInfo(imageInfo.MountPath & "\Windows\system32\ntoskrnl.exe").ProductVersion)
+                MountedImages.Add(New MountedImage(imageInfo.ImageFilePath, imageInfo.ImageIndex, imageInfo.MountPath, imageStatus, (imageInfo.MountMode = DismMountMode.ReadWrite), imageVersion))
+            Else
+                ' Could not get image version. Skip mounted image
+                Continue For
+            End If
         Next
         MountedImageImgFiles = MountedImageImgFileList.ToArray()
         MountedImageImgIndexes = MountedImageImgIndexList.ToArray()
@@ -14820,13 +14826,18 @@ Public Class MainForm
 
     Private Sub MountedImageDetectorBW_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles MountedImageDetectorBW.DoWork
         Do
+            ImageDetectionComplete = False
             If MountedImageDetectorBW.CancellationPending Or ImgBW.IsBusy Then Exit Do
             DetectMountedImages(False)
+            ImageDetectionComplete = True
             Thread.Sleep(1000)
         Loop
     End Sub
 
     Private Sub MountedImageDetectorBW_RunWorkerCompleted(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs) Handles MountedImageDetectorBW.RunWorkerCompleted
+        If e.Error IsNot Nothing Then
+            Throw New Exception("The mounted image detector has stopped unexpectedly. Check the error information below:" & CrLf & CrLf, e.Error)
+        End If
         Select Case Language
             Case 0
                 Select Case My.Computer.Info.InstalledUICulture.ThreeLetterWindowsLanguageName

Panels/Img_Ops/MountedImgMgr.vb

@@ -377,6 +377,7 @@ Public Class MountedImgMgr
 
     Private Sub DetectorBW_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs) Handles DetectorBW.ProgressChanged
         If DetectorBW.CancellationPending Then Exit Sub
+        If Not MainForm.ImageDetectionComplete Then Exit Sub
         If MainForm.MountedImages.Count <= 0 Then
             ListView1.Items.Clear()
             Exit Sub