Version Control: Add a button that shows all the modifications in the version control panel.

[DEVELOPMENT ENVIRONMENT]
* NEW: Version Control: Add a button that shows all the modifications in the version control panel.

app/src/gambas3/.src/Debug/FDebugInfo.class

@@ -377,6 +377,8 @@ Public Sub ReadConfig()
     Project.SetSmallFont(hCtrl)
   Next
   
+  btnChanges.Picture = Picture["img/32/modified.png"].Stretch(Stock.GetSize("small"))
+  
   'H = Max(Stock.GetSize("small"), cmbWatch.Font.H) * 1.4
   'panWatch.H = H
   ' For Each hChild In panWatch.Children
@@ -1785,3 +1787,9 @@ Public Sub cmbWatch_Change()
   UpdateWatchButtons
 
 End
+
+Public Sub btnChanges_Click()
+
+  FFileInfoVC.Run(Project.Dir)
+
+End

app/src/gambas3/.src/Debug/FDebugInfo.form

@@ -285,26 +285,31 @@
         ToolTip = ("Clear console")
         Picture = Picture["icon:/small/clear"]
       }
+      { btnChanges ToolButton
+        MoveScaled(9,0,17,4)
+        AutoResize = True
+        Text = ("Modifications.") & "..."
+      }
       { btnVcCommit ToolButton
-        MoveScaled(9,0,12,4)
+        MoveScaled(28,0,12,4)
         AutoResize = True
         Text = ("Commit") & "..."
         Picture = Picture["icon:/small/upload"]
       }
       { btnVcUpdate ToolButton
-        MoveScaled(20,0,15,4)
+        MoveScaled(41,0,15,4)
         AutoResize = True
         Text = ("Synchronize")
         Picture = Picture["icon:/small/download"]
       }
       { btnVcRevert ToolButton
-        MoveScaled(34,0,20,4)
+        MoveScaled(57,0,9,4)
         AutoResize = True
         Text = ("Revert all changes") & "..."
         Picture = Picture["icon:/small/undo"]
       }
       { btnVcAddAll ToolButton
-        MoveScaled(54,0,27,4)
+        MoveScaled(68,0,13,4)
         AutoResize = True
         Text = ("Add everything to repository")
         Picture = Picture["icon:/small/add"]

app/src/gambas3/.src/Options/FOption.class

@@ -1828,7 +1828,12 @@ Public Sub gvwLayout_Select()
   Endif
 
   sName = $aLayout[gvwLayout.Row * 2]
-  btnDeleteLayout.Enabled = Exist(GetLayoutPath(sName)) 
+  If sName Then
+    btnDeleteLayout.Enabled = Exist(GetLayoutPath(sName)) 
+  Else 
+    btnDeleteLayout.Enabled = False
+  Endif 
+  
   LoadLayout(sName)
 
 End

app/src/gambas3/.src/Options/FOption.form

@@ -958,6 +958,7 @@
         }
         { btnDeleteLayout Button
           MoveScaled(0,5,19,4)
+          Enabled = False
           AutoResize = True
           Text = ("Delete")
           Picture = Picture["icon:/small/delete"]