Versione 4.1.9

-Correzione bug selezione "Your choice: ....." ora è possibile inserire la selezione
astrgl · Apr 18, 2024 · b6c5e73 · b6c5e73
1 parent d77716b
commit b6c5e73
Show file tree

Hide file tree

Showing 3 changed files with 13 additions and 7 deletions.
diff --git a/.project b/.project
@@ -2,7 +2,7 @@
 Title=DnfDrake
 Startup=Fmain
 Icon=dnfdrake.svg
-Version=4.1.8
+Version=4.1.9
 Component=gb.image
 Component=gb.gui
 Component=gb.form

diff --git a/.src/FABOUT.form b/.src/FABOUT.form
@@ -19,7 +19,7 @@
       MoveScaled(0,0,51,5)
       Font = Font["+7"]
       Alignment = Align.Center
-      Text = ("DnfDrake 4.1.8")
+      Text = ("DnfDrake 4.1.9")
     }
   }
 }
diff --git a/.src/Fmain.class b/.src/Fmain.class
@@ -2828,19 +2828,25 @@ Public Sub SELECTIONVIEW()
      LBLSELECTION.Visible = True
      BTNOKSELECTION.Visible = True
      BTNANNULLASELECTION.Visible = True
-     If BTNOKSELECTION.Enabled = False Then
-        BTNOKSELECTION.Enabled = True
-     Endif
-     If BTNANNULLASELECTION.Enabled = False Then
-        BTNANNULLASELECTION.Enabled = True
+     If Fmain.Enabled = False Then
+       Fmain.Enabled = True
      Endif
+     ' If BTNOKSELECTION.Enabled = False Then
+     '    BTNOKSELECTION.Enabled = True
+     ' Endif
+     ' If BTNANNULLASELECTION.Enabled = False Then
+     '    BTNANNULLASELECTION.Enabled = True
+     ' Endif
      TXTSELECTION.SetFocus
   Else 
      TXTSELECTION.Visible = False
      LBLTXTSELECTION.Visible = False
      LBLSELECTION.Visible = False
      BTNOKSELECTION.Visible = False
      BTNANNULLASELECTION.Visible = False
+     If Fmain.Enabled = True And If FRUN.Visible = True Then
+       Fmain.Enabled = False
+     Endif
   Endif