EgtWPFLib5 :

- corretto problema con inserimento espressioni numeriche valide in diametro totale (non si abilitava bottone Salva).
This commit is contained in:
Dario Sassi
2025-06-26 17:15:48 +02:00
parent 2c013c8214
commit 917b44be8d
+7 -7
View File
@@ -329,9 +329,9 @@ Public Class ToolTreeViewItem
Dim dValue As Double = 0
EgtSetCurrentContext(ToolDbWindowVM.m_ProjectSceneContext)
EgtTdbGetCurrToolParam(MCH_TP.DIAM, DbDiam)
StringToLen(value, dValue)
Dim bIsNumeric As Boolean = StringToLen(value, dValue)
m_IsModifiedDiam = Math.Abs(dValue - DbDiam) > 10 * EPS_ANG_SMALL
If Not GetValidationError("Diam") Or GetNonNumericTextBox(m_Diam) Then
If Not GetValidationError("Diam") Or Not bIsNumeric Then
m_delErrorOnTool(True)
m_delIsEnabledBtns(False, False, True)
Else
@@ -362,18 +362,18 @@ Public Class ToolTreeViewItem
Dim dValue As Double = 0
EgtSetCurrentContext(ToolDbWindowVM.m_ProjectSceneContext)
EgtTdbGetCurrToolParam(MCH_TP.TOTDIAM, DbTotDiam)
StringToLen(value, dValue)
Dim bIsNumeric As Boolean = StringToLen(value, dValue)
m_IsModifiedTotDiam = Math.Abs(dValue - DbTotDiam) > 5 * EPS_SMALL
If Not m_SuspendToolDrawUpdate Then
UpdateSceneToolDraw()
End If
If Not GetValidationError("Diam") Or Not GetValidationError("TotDiam") Or GetNonNumericTextBox(m_TotDiam) Then
If Not GetValidationError("Diam") Or Not GetValidationError("TotDiam") Or Not bIsNumeric Then
m_delErrorOnTool(True)
m_delIsEnabledBtns(False, False, True)
Else
m_delErrorOnTool(Not IsValid)
m_delIsEnabledBtns(IsValid And Not IsModified, IsValid, True)
End If
If Not m_SuspendToolDrawUpdate Then
UpdateSceneToolDraw()
End If
NotifyPropertyChanged(NameOf(TotDiam))
End If
End Set