- Aggiunto pulsante "Reset Macchina" al CALCPanel per scegliere la Macchina associata al progetto aperto

- La Macchina scelta nel "Reset Macchina" si rfilette sulla Macchina corrente nella pagina di Configurazione
- Modificata ProjectTypeWnd in modo che creando un nuovo progetto o importando un BTL chieda la Macchina da associare (e il Tipo Progetto se Macchina scelta è sia Travi che Pareti)

EgtBEAMWALL.ViewerOptimizer/ProjectFileVM/ProdFileVM.vb

@@ -125,7 +125,7 @@ Public Class ProdFileVM
       Dim sProjectDirPath As String = ""
       sProjectDirPath = CurrProject.sProdDirPath
       ' verifico se progetto modificato, e chiedo se salvare
-      If EgtGetModified() OrElse CurrProject.bIsNew Then
+      If EgtGetModified() OrElse CurrProject.bIsNew OrElse Map.refCALCPanelVM.IsMachineModified() Then
          Select Case MessageBox.Show(EgtMsg(61875), "", MessageBoxButton.YesNoCancel, MessageBoxImage.Question)
             Case MessageBoxResult.Yes
                ' salvo proj
@@ -134,6 +134,7 @@ Public Class ProdFileVM
                Return False
             Case Else   ' No
                EgtResetModified()
+               Map.refCALCPanelVM.RevertToOriginalMachine()
                If CurrProject.bIsNew Then
                   ' lo elimino
                   Directory.Delete(sProjectDirPath, True)