diff --git a/Icarus/SimulationPanel/MySimulation.vb b/Icarus/SimulationPanel/MySimulation.vb
index 6a16988..d1b262d 100644
--- a/Icarus/SimulationPanel/MySimulation.vb
+++ b/Icarus/SimulationPanel/MySimulation.vb
@@ -106,6 +106,7 @@ Public Class MySimulation
             MachineAxisList(Index).IsReadOnlyAxesValue = True
          Next
       End If
+      EgtSimSetUiStatus(GetStatus())
    End Sub
 
 #End Region    ' METHODS
diff --git a/Icarus/SimulationPanel/SimulationPanelVM.vb b/Icarus/SimulationPanel/SimulationPanelVM.vb
index 350e156..86c8545 100644
--- a/Icarus/SimulationPanel/SimulationPanelVM.vb
+++ b/Icarus/SimulationPanel/SimulationPanelVM.vb
@@ -29,7 +29,7 @@ Public Class SimulationPanelVM
          If EgtSetInfo(EgtGetCurrMachGroup(), KEY_MCHGRP_VM, value) Then
             m_VirtualAdditive_IsChecked = value
          Else
-            NotifyPropertyChanged(VirtualAdditive_IsChecked)
+            NotifyPropertyChanged(NameOf(VirtualAdditive_IsChecked))
          End If
       End Set
    End Property
@@ -153,8 +153,8 @@ Public Class SimulationPanelVM
          EgtRemoveInfo(EgtGetCurrMachGroup(), KEY_MCHGRP_VM)
          EgtEnableModified()
       End If
-      NotifyPropertyChanged(VirtualAdditive_IsChecked)
-      NotifyPropertyChanged(VirtualAdditive_Visibility)
+      NotifyPropertyChanged(NameOf(VirtualAdditive_IsChecked))
+      NotifyPropertyChanged(NameOf(VirtualAdditive_Visibility))
       ' nascondo slider strati e layer da visualizzare
       Map.refSliderManagerVM.SetSliderVisibility(False)
       Map.refViewLayerManagerVM.SetViewLayerManagerVisibility(False)