Greaseweazle flux export: UI, validation, workflow overhaul

Major improvements to the Greaseweazle "Read Disk" dialog for flux image output:
- Added separate root folder, folder name, and prefix fields for better organization of flux sets.
- New Vista-style folder picker for modern Windows experience.
- Toggle Sequence Token button (and Alt+S shortcut) for easy insertion/removal of number tokens in file/folder/prefix fields.
- Robust validation for file and folder names, including reserved device names and Windows path rules, with error messages.
- Refactored filename/path sanitization and placeholder handling.
- Image format combo now displays "(Double-step)" when appropriate.
- Revs (number of revolutions) are cached separately for flux/non-flux output.
- UI layout and control visibility dynamically adapts to output type.
- Warning label replaced with color-coded image format label.
- Resource strings and project file updated; version bumped to 2.38.0.

These changes greatly improve usability, error prevention, and flexibility for flux image export.

Author: Digitoxin1

DiskImageTool/DiskImage/Modules/FloppyDiskFunctions.vb

@@ -674,6 +674,7 @@
                 Me.FileExtension = FileExtension
                 Me.DriveType = DriveType
                 Me.Detected = False
+                Me.Doublestep = False
             End Sub
 
             Public ReadOnly Property BitRateKbps As UShort
@@ -770,6 +771,10 @@
                         D &= $" ({Sides}, {Density})"
                     End If
 
+                    If Me.Doublestep Then
+                        D &= "  (Double-step)"
+                    End If
+
                     If Me.Detected Then
                         D &= " *"
                     End If
@@ -779,6 +784,7 @@
             End Property
 
             Public Property Detected As Boolean
+            Public Property Doublestep As Boolean
             Public ReadOnly Property FileExtension As String
             Public ReadOnly Property Format As FloppyDiskFormat
             Public ReadOnly Property Gaps As FloppyDiskGaps

DiskImageTool/DiskImageTool.vbproj

@@ -30,8 +30,8 @@
     <TargetCulture>en-US</TargetCulture>
     <ProductName>DiskImageTool</ProductName>
     <PublisherName>Digitoxin</PublisherName>
-    <ApplicationRevision>2</ApplicationRevision>
-    <ApplicationVersion>2.37.0.%2a</ApplicationVersion>
+    <ApplicationRevision>0</ApplicationRevision>
+    <ApplicationVersion>2.38.0.%2a</ApplicationVersion>
     <UseApplicationTrust>false</UseApplicationTrust>
     <PublishWizardCompleted>true</PublishWizardCompleted>
     <BootstrapperEnabled>true</BootstrapperEnabled>
@@ -219,6 +219,7 @@
     <Compile Include="ImageFormats\TD0\TD0SectorHeader.vb" />
     <Compile Include="ImageFormats\TD0\TD0Track.vb" />
     <Compile Include="ImageFormats\TD0\TD0TrackHeader.vb" />
+    <Compile Include="Lib\VistaFolderPicker.vb" />
     <Compile Include="Modules\Dialogs.vb" />
     <Compile Include="Modules\FileIO.vb" />
     <Compile Include="Modules\XMLDump.vb" />
@@ -855,6 +856,7 @@
   </ItemGroup>
   <ItemGroup>
     <Folder Include="Flux\Kryoflux\Forms\" />
+    <Folder Include="ImageFormats\DMK\" />
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
   <PropertyGroup>

DiskImageTool/Flux/Forms/ConvertImageForm.vb

@@ -917,7 +917,7 @@ Namespace Flux
                 ClearStatusBar()
             End If
             Dim ImageFormat = ReadImageFormat()
-            PopulateImageFormats(ComboImageFormat, ImageFormat, ImageFormat, False)
+            PopulateImageFormats(ComboImageFormat, ImageFormat, ImageFormat, False, False)
             PopulateOutputTypes()
             PopulateFileExtensions()
             RefreshButtonState()
@@ -1545,7 +1545,7 @@ Namespace Flux
 
         Private Sub TextBoxFileName_Validating(sender As Object, e As CancelEventArgs) Handles TextBoxFileName.Validating
             Dim tb As TextBox = DirectCast(sender, TextBox)
-            tb.Text = SanitizeFileName(tb.Text)
+            tb.Text = SanitizeFileName(tb.Text, False)
             RefreshImportButtonState()
         End Sub