OmagCUT 2.3b1:

-> limitazione tolleranza colori (max = 50, min = 0) in "OptionPage"
-> correzione abilitazione comando FiloTop.
This commit is contained in:
Nicola Pievani
2021-02-17 10:53:06 +00:00
parent e57638e2ad
commit 6249d02a2c
2 changed files with 17 additions and 0 deletions
+1
View File
@@ -973,6 +973,7 @@ Public Class DrawPageUC
LeftButtonGrd.Children.Remove(m_CompoDimension.m_InternalCompoPage)
End If
VariablesGrd.Children.Add(m_SideAngleUC)
FiloTopBtn.IsEnabled = False
SideAngleBtn.IsEnabled = False
DripCutBtn.IsEnabled = False
MessageGrid.Visibility = Windows.Visibility.Hidden
+16
View File
@@ -675,6 +675,14 @@ Public Class OptionsPageUC
If Not StringToInt(ToleranceMsgTxBx.Text, nToler) Then
nToler = 25
ToleranceMsgTxBx.Text = nToler.ToString()
Else
If nToler > 50 Then
nToler = 50
ToleranceMsgTxBx.Text = nToler.ToString()
ElseIf nToler < 0 Then
nToler = 0
ToleranceMsgTxBx.Text = nToler.ToString()
End If
End If
WritePrivateProfileString(S_COLORTOSIDEANG, K_CTSA_TOLERANCE, nToler.ToString(), m_MainWindow.GetIniFile())
End Sub
@@ -965,6 +973,14 @@ Public Class OptionsPageUC
If Not StringToInt(ToleranceEMsgTxBx.Text, nToler) Then
nToler = 25
ToleranceEMsgTxBx.Text = nToler.ToString()
Else
If nToler > 50 Then
nToler = 50
ToleranceEMsgTxBx.Text = nToler.ToString()
ElseIf nToler < 0 Then
nToler = 0
ToleranceEMsgTxBx.Text = nToler.ToString()
End If
End If
WritePrivateProfileString(S_COLORTOENGRAVE, K_CTE_TOLERANCE, nToler.ToString(), m_MainWindow.GetIniFile())
End Sub