Correzione gestione Kerf

This commit is contained in:
NicolaP
2021-09-20 18:28:09 +02:00
parent f1ddce36d8
commit 0fe95e4ccc
+2 -2
View File
@@ -1542,7 +1542,7 @@ Public Class RawPartPageUC
StringToLen(WidthTxBx.Text, m_RawWidth)
StringToLen(OffsetXTxBx.Text, m_RawOffsX)
StringToLen(OffsetYTxBx.Text, m_RawOffsY)
UpdateRawPart()
' UpdateRawPart()
UpdateRawPartKerf()
' Recupero id contorno kerf
Dim nKerfId As Integer = EgtGetFirstNameInGroup(m_CurrProjPage.m_nRawId, NAME_KERF)
@@ -1567,7 +1567,7 @@ Public Class RawPartPageUC
m_RawOffsX = m_RawOffsX - m_RawKerf
StringToLen(OffsetYTxBx.Text, m_RawOffsY)
m_RawOffsY = m_RawOffsY - m_RawKerf
UpdateRawPart()
' UpdateRawPart()
m_RawKerf = -m_RawKerf
UpdateRawPartKerf()
' Recupero id contorno kerf