diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb index 8cbec3b..8490867 100644 --- a/My Project/AssemblyInfo.vb +++ b/My Project/AssemblyInfo.vb @@ -60,5 +60,5 @@ Imports System.Windows ' by using the '*' as shown below: ' - - + + diff --git a/RawPartPageUC.xaml.vb b/RawPartPageUC.xaml.vb index f657d05..47d6248 100644 --- a/RawPartPageUC.xaml.vb +++ b/RawPartPageUC.xaml.vb @@ -1151,7 +1151,7 @@ Public Class RawPartPageUC ' Imposto parametri EgtLuaSetGlobNumVar("CMD.MIDRAWX", m_RawOffsX + m_RawLength / 2) EgtLuaSetGlobNumVar("CMD.MIDRAWY", m_RawOffsY + m_RawWidth / 2) - EgtLuaSetGlobNumVar("CMD.THICK", m_RawHeight) + EgtLuaSetGlobNumVar("CMD.THICK", m_RawHeight + m_CurrentMachine.dAdditionalTable) EgtLuaSetGlobNumVar("CMD.TABLEX", TableRef.x) EgtLuaSetGlobNumVar("CMD.TABLEY", TableRef.y) EgtLuaSetGlobNumVar("CMD.TABLEZ", TableRef.z) @@ -1255,6 +1255,8 @@ Public Class RawPartPageUC Else RawThickness *= ONEMM / 1000 End If + ' Sottraggo eventuale spessore sovratavola + RawThickness -= m_CurrentMachine.dAdditionalTable ' Imposto spessore misurato come altezza grezzo If RawThickness > -EPS_ZERO Then m_CurrProjPage.ClearMessage()