From c87210873f232edd5fa36eb10a8d8525ea3f9df4 Mon Sep 17 00:00:00 2001 From: DarioS Date: Thu, 3 Feb 2022 21:21:31 +0100 Subject: [PATCH] EgtBEAMWALL : - modifiche pe rimpostare vista e origini default macchina quando fallisce l'esecuzione del relativo file lua. --- EgtBEAMWALL.Core/ViewPanel/ViewPanelVM.vb | 2 +- EgtBEAMWALL.ViewerOptimizer/Utility/CurrentMachine.vb | 4 ++++ 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/EgtBEAMWALL.Core/ViewPanel/ViewPanelVM.vb b/EgtBEAMWALL.Core/ViewPanel/ViewPanelVM.vb index 6efe9075..3b75529b 100644 --- a/EgtBEAMWALL.Core/ViewPanel/ViewPanelVM.vb +++ b/EgtBEAMWALL.Core/ViewPanel/ViewPanelVM.vb @@ -13,7 +13,7 @@ Public Class ViewPanelVM End Property ' Posizione vista - Private Shared m_nViewDir As VT + Private Shared m_nViewDir As VT = VT.ISO_SW Public Shared Function BWSetView(nView As VT, Optional bRedraw As Boolean = True) ' condizioni che cambiano la vista del progetto diff --git a/EgtBEAMWALL.ViewerOptimizer/Utility/CurrentMachine.vb b/EgtBEAMWALL.ViewerOptimizer/Utility/CurrentMachine.vb index e45a2b1b..24255b84 100644 --- a/EgtBEAMWALL.ViewerOptimizer/Utility/CurrentMachine.vb +++ b/EgtBEAMWALL.ViewerOptimizer/Utility/CurrentMachine.vb @@ -193,6 +193,10 @@ Public Module CurrentMachine Case "BR" m_NestingCorner = MCH_CR.BR End Select + Else + m_nViewDir = VT.ISO_SW + m_OrigCorner = MCH_CR.BL + m_NestingCorner = MCH_CR.BL End If ' Cancello tavola globale EgtLuaResetGlobVar("GWD")