- modificata selezione feature in lista pezzi BTL

EgtBEAMWALL.Optimizer/BTLViewModel/BTLPartVM.vb

@@ -1571,6 +1571,31 @@ Public Class BTLPartVM
          NotifyPropertyChanged(NameOf(SelBTLFeatureVM))
       End Set
    End Property
+   Public Property SelBTLFeatureVMOnlyGraph As BTLFeatureVM
+      Get
+         Return m_SelBTLFeatureVM
+      End Get
+      Set(value As BTLFeatureVM)
+         m_SelBTLFeatureVM = value
+         If Not IsNothing(m_SelBTLFeatureVM) Then
+            DirectCast(m_SelBTLFeatureVM, BTLFeatureVM).SelGeomFeature()
+            ' deseleziono i parametri
+            If Not IsNothing(SelBTLFeatureVM.SelPBTLParam) Then SelBTLFeatureVM.SelPBTLParam = Nothing
+         Else
+            EgtDeselectAll()
+         End If
+         If Not IsNothing(Map.refFeatureListManagerVM) Then Map.refFeatureListManagerVM.FeatureSelectionChanged()
+         'End If
+         If Map.refMainMenuVM.SelPage = Pages.ONLYPRODPAGE Then
+            EgtResetCurrMachGroup()
+            ResetSearchFound()
+            Map.refStatisticsTimePanelVM.SetViewPage_Visibility(Visibility.Visible)
+            Map.refStatisticsTimePanelVM.SetMachiningPage_Visibility(Visibility.Collapsed)
+         End If
+         EgtDraw()
+         NotifyPropertyChanged(NameOf(SelBTLFeatureVM))
+      End Set
+   End Property
 
    Private m_Calc_PartEnd As Boolean = False
    Public ReadOnly Property Calc_PartEnd As Boolean

EgtBEAMWALL.Optimizer/BTLViewModel/BTLStructureVM.vb

@@ -206,7 +206,7 @@ Public Class BTLStructureVM
          End If
       End If
       ' seleziono la prima feature
-      If Not IsNothing(BtlPart) AndAlso Not IsNothing(BtlPart.BTLFeatureVMList) AndAlso BtlPart.BTLFeatureVMList.Count > 0 Then SelBTLPart.SelBTLFeatureVM = BtlPart.BTLFeatureVMList(0)
+      If Not IsNothing(BtlPart) AndAlso Not IsNothing(BtlPart.BTLFeatureVMList) AndAlso BtlPart.BTLFeatureVMList.Count > 0 Then SelBTLPart.SelBTLFeatureVMOnlyGraph = BtlPart.BTLFeatureVMList(0)
       ' aggiorno stato selezionato tutto
       Map.refShowBeamPanelVM.bShowAll = False
       Core.ViewPanelVM.BWSetView(If(Core.ViewPanelVM.Type = BWType.BEAM, VT.ISO_SW, VT.TOP), False)

EgtBEAMWALL.Optimizer/ItemParamList/OnlyProdBTLPartListV.xaml

@@ -428,7 +428,7 @@
       <DataGrid.RowDetailsTemplate>
          <DataTemplate>
             <ListBox ItemsSource="{Binding BTLFeatureVMList}"
-                     SelectedItem="{Binding SelBTLFeatureVM, UpdateSourceTrigger=PropertyChanged}"
+                     SelectedItem="{Binding SelBTLFeatureVMOnlyGraph, UpdateSourceTrigger=PropertyChanged}"
                      PreviewMouseWheel="ListBox_PreviewMouseWheel"
                      SelectionMode="Single" 
                      IsSynchronizedWithCurrentItem="True">