- Aggiunti i campi Raggio Epicicli e Distanza Epicicli al MachiningParameterExpander, visibili per Pocketing nel caso di Macchina Stone e utensile Polishing

2022-02-09 09:41:43 +01:00
parent 5b01e4ebfe
commit 687933571d
2 changed files with 26 additions and 0 deletions
@@ -168,6 +168,18 @@ Public Class MachiningParameterExpanderVM
               StoneSawFinishParamExpanderV.DataContext = m_CurrOperation
               Return StoneSawFinishParamExpanderV
            Case MCH_OY.POCKETING
+               If MatType = MaterialType.STONE Or MatType = MaterialType.STONE5 Then
+                  ' se macchina di tipo STONE ricavo il tipo di utensile
+                  Dim sMachiningToolName = String.Empty
+                  EgtMdbSetCurrMachining(sName)
+                  EgtMdbGetCurrMachiningParam(MCH_MP.TOOL, sMachiningToolName)
+                  EgtTdbSetCurrTool(sMachiningToolName)
+                  Dim dValue As Double = 0
+                  Dim nToolType As Integer
+                  EgtTdbGetCurrToolParam(MCH_TP.TYPE, nToolType)
+                  ' se utensile di tipo POLISHING rendo visibili i campi sugli epicicli
+                  If nToolType = MCH_TY.MILL_POLISHING Then m_CurrOperation.Epicycles_Visibility = Visibility.Visible
+               End If
               PocketParamExpanderV.DataContext = m_CurrOperation
               Return PocketParamExpanderV
            Case MCH_OY.MORTISING
@@ -146,6 +146,20 @@
                                 UpdateSourceTrigger=PropertyChanged,
                                 ValidatesOnDataErrors=True}" 
                                 Style="{DynamicResource StringParamV_Margin}"/>
+                    <EgtWPFLib5:StringParamV 
+                               ParamTxBl="{Binding EpicyclesRadTxBl}" 
+                               ParamTxBx="{Binding Path=EpicyclesRad,
+                                UpdateSourceTrigger=PropertyChanged,
+                                ValidatesOnDataErrors=True}" 
+                               Style="{DynamicResource StringParamV_Margin}"
+                               Visibility="{Binding Epicycles_Visibility}"/>
+                    <EgtWPFLib5:StringParamV 
+                               ParamTxBl="{Binding EpicyclesDistTxBl}" 
+                               ParamTxBx="{Binding Path=EpicyclesDist,
+                                UpdateSourceTrigger=PropertyChanged,
+                                ValidatesOnDataErrors=True}" 
+                               Style="{DynamicResource StringParamV_Margin}"
+                               Visibility="{Binding Epicycles_Visibility}"/>
                    <EgtWPFLib5:StringParamV
                                 ParamTxBl="{Binding SideAngleTxBl}" 
                                 ParamTxBx="{Binding Path=SideAngle,