Merge commit 'd473c7ad886edd8d1b825942d37a6778837f45fb' into feature/DevExpress-RawPartList

This commit is contained in:
Demetrio Cassarino
2026-06-29 11:18:47 +02:00
9 changed files with 239 additions and 162 deletions
@@ -68,6 +68,7 @@ Public Class ConfigurationPageVM
End Get
End Property
Public OrigSelectedLanguage As Language
Private m_SelectedLanguage As Language
Public Property SelectedLanguage As Language
Get
@@ -80,6 +81,7 @@ Public Class ConfigurationPageVM
End Set
End Property
Public nOrigSelMeasureUnit As Integer = If(EgtUiUnitsAreMM(), MeasureUnitOpt.MM, MeasureUnitOpt.INCH)
Public Property SelMeasureUnit As Integer
Get
Return If(EgtUiUnitsAreMM(), MeasureUnitOpt.MM, MeasureUnitOpt.INCH)
@@ -94,6 +96,7 @@ Public Class ConfigurationPageVM
End Set
End Property
Public sOrigSectionTime As String
Private m_SectionTime As Double
Public Property SectionTime As String
Get
@@ -107,6 +110,7 @@ Public Class ConfigurationPageVM
End Set
End Property
Public sOrigPartTime As String
Private m_PartTime As Double
Public Property PartTime As String
Get
@@ -120,6 +124,7 @@ Public Class ConfigurationPageVM
End Set
End Property
Public bOrigPrintLabel_IsChecked As Boolean
Private m_bPrintLabel_IsChecked As Boolean
Public Property bPrintLabel_IsChecked As String
Get
@@ -144,6 +149,7 @@ Public Class ConfigurationPageVM
End Get
End Property
Public bOrigExternalBackupActive As Boolean
Private m_bExternalBackupActive As Boolean
Public Property bExternalBackupActive As Boolean
Get
@@ -155,6 +161,7 @@ Public Class ConfigurationPageVM
End Set
End Property
Public sOrigExternalBackupFolderPath As String
Private m_ExternalBackupFolderPath As String
Public Property ExternalBackupFolderPath As String
Get
@@ -173,6 +180,7 @@ Public Class ConfigurationPageVM
End Get
End Property
Public OrigSelReminder As IdNameStruct
Private m_SelReminder As IdNameStruct
Public Property SelReminder As IdNameStruct
Get
@@ -579,16 +587,23 @@ Public Class ConfigurationPageVM
Exit For
End If
Next
OrigSelectedLanguage = m_SelectedLanguage
' leggo SectionTime e PartTime
GetMainPrivateProfileString(S_NEST, K_SECTIONTIME, "", SectionTime)
sOrigSectionTime = SectionTime
GetMainPrivateProfileString(S_NEST, K_PARTTIME, "", PartTime)
sOrigPartTime = PartTime
m_bPrintLabel_IsChecked = (GetMainPrivateProfileInt(S_PRINTER, K_ENABLE, 0) <> 0)
bOrigPrintLabel_IsChecked = m_bPrintLabel_IsChecked
' leggo dati per backup
GetMainPrivateProfileString(S_BACKUPANDRESTORE, K_EXTERNALFILEPATH, "", m_ExternalBackupFolderPath)
sOrigExternalBackupFolderPath = m_ExternalBackupFolderPath
Dim nDefaultReminderFrequency As Integer = GetMainPrivateProfileInt(S_BACKUPANDRESTORE, K_REMINDERFREQUENCY, 1)
SelReminder = m_ReminderList.FirstOrDefault(Function(x) x.Id = nDefaultReminderFrequency)
OrigSelReminder = SelReminder
Dim nExternalBackupActive As Integer = GetMainPrivateProfileInt(S_BACKUPANDRESTORE, K_EXTERNALBACKUPACTIVE, 0)
m_bExternalBackupActive = nExternalBackupActive > 0
bOrigExternalBackupActive = m_bExternalBackupActive
SetMachineParameter_Visibility(False)
SetMachine_Visibility(False)
' Recupero flag per verificare se fare solo l'importazione del btl o anche la verifica
@@ -629,6 +644,26 @@ Public Class ConfigurationPageVM
Return False
End Function
Friend Function SaveConfigPage() As Boolean
If OrigSelectedLanguage.Name <> m_SelectedLanguage.Name OrElse
sOrigSectionTime <> SectionTime OrElse
sOrigPartTime <> PartTime OrElse
bOrigPrintLabel_IsChecked <> m_bPrintLabel_IsChecked OrElse
sOrigExternalBackupFolderPath <> m_ExternalBackupFolderPath OrElse
OrigSelReminder.Name <> SelReminder.Name OrElse
bOrigExternalBackupActive <> m_bExternalBackupActive OrElse
nOrigSelMeasureUnit <> SelMeasureUnit Then
Select Case EgtBEAMWALL.Core.EgtMessageBoxV.Show(Application.Current.MainWindow, EgtMsg(62593), EgtMsg(15003), MessageBoxButton.YesNo, MessageBoxImage.Question)
Case MessageBoxResult.Yes
VerifyConfigPageModification()
Return True
Case MessageBoxResult.No
Return False
End Select
End If
Return True
End Function
'''' <summary>
'''' Seleziona il tema se presente
'''' </summary>
@@ -19,19 +19,21 @@
Style="{StaticResource Optimizer_TabControl}">
<TabItem>
<TabItem.Header>
<TextBlock Text="{Binding General_Msg}"
Style="{StaticResource ConfigurationProgram_TextBlock}"/>
</TabItem.Header>
<TabItem.Content>
<StackPanel Style="{StaticResource ConfigurationProgram_StackPanel}">
<TextBlock Text="{Binding General_Msg}"
Style="{StaticResource ConfigurationProgram_TextBlock}"/>
<EgtBEAMWALLCORE:General_ConfigurationPageV/>
<Button Command="{Binding SaveCommand}"
ToolTip="{Binding SaveToolTip}"
Style="{StaticResource SaveOptionPanel_Button}">
Style="{StaticResource SaveConfig_Button}">
<Image Source="{StaticResource Save_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
</StackPanel>
</TabItem.Header>
<TabItem.Content>
<EgtBEAMWALLCORE:General_ConfigurationPageV/>
</TabItem.Content>
</TabItem>
<TabItem>
@@ -29,10 +29,22 @@ Public Class ForcedStrategyPanelVM
End Get
Set(value As Strategy)
m_SelStrategy = value
SetUpdate_Visibility(False)
NotifyPropertyChanged(NameOf(SelStrategy))
End Set
End Property
Private m_bUpdate_Visibility As Visibility = Visibility.Collapsed
Public ReadOnly Property Update_Visibility As Visibility
Get
Return m_bUpdate_Visibility
End Get
End Property
Friend Sub SetUpdate_Visibility(value As Boolean)
m_bUpdate_Visibility = If(value, Visibility.Visible, Visibility.Collapsed)
NotifyPropertyChanged(NameOf(Update_Visibility))
End Sub
Private m_CurrentFeature As BTLFeatureM
' Definizione Comandi
@@ -56,6 +56,13 @@ Public Class MainWindowV
e.Cancel = True
Return
End If
If Map.refStrategyManagerVM.bIsModifyStrategy Then
Map.refStrategyManagerVM.SaveCustomConfigJson()
End If
If Not Map.refConfigurationPageVM.SaveConfigPage() Then
e.Cancel = True
Return
End If
If (Keyboard.Modifiers And ModifierKeys.Alt) = ModifierKeys.Alt OrElse Keyboard.IsKeyDown(Key.F4) Then
e.Cancel = True
Return
@@ -4,137 +4,151 @@
xmlns:OPTIMIZER="clr-namespace:EgtBEAMWALL.Optimizer"
VerticalAlignment="Top"
Margin="5,10,0,0">
<ItemsControl ItemsSource="{Binding Tag.ParameterList,
RelativeSource={RelativeSource AncestorType={x:Type UserControl}}}"
Style="{StaticResource ParameterStrategy_ItemsControl}">
<ItemsControl.Resources>
<DataTemplate DataType="{x:Type OPTIMIZER:BooleanStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bBooleanVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<CheckBox IsChecked="{Binding bValue, UpdateSourceTrigger=PropertyChanged}"
Style="{StaticResource FeatureInPartInRawPartList_CheckBox}"/>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:DoubleStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bDoubleVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<TextBox Text="{Binding sValue}"
Style="{StaticResource ColorPicker_TextBox}"/>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:ComboStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bComboBoxVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<ComboBox ItemsSource="{Binding ComboList}"
SelectedItem="{Binding SelValue}"
DisplayMemberPath="sValue"
Style="{StaticResource ProjectParameters_ComboBox}">
</ComboBox>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:StringStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bStringVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<TextBox Text="{Binding sValue}"
Style="{StaticResource ColorPicker_TextBox}"/>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:ListStrategyParameter}">
<Grid Visibility="{Binding bListBoxVisibility}"
Style="{StaticResource AddRawPartWnd_Grid}">
<Grid.RowDefinitions>
<RowDefinition Height="Auto"/>
<RowDefinition Height="Auto"/>
</Grid.RowDefinitions>
<Grid.ColumnDefinitions>
<ColumnDefinition Width="1.3*"/>
<ColumnDefinition Width="1*"/>
</Grid.ColumnDefinitions>
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategyDescription_TextBlock}"/>
<StackPanel Grid.Column="1"
Style="{StaticResource PartManager_StackPanel}">
<StackPanel Style="{StaticResource ProjectParameters_StackPanel}">
<Button ToolTip="{Binding OpenToolListToolTip}"
IsEnabled="{Binding OpenToolListIsEnable}"
Command="{Binding OpenToolListCommand}"
Style="{StaticResource ProjectParameters_Button}">
<Image Source="{StaticResource Plus_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<Button ToolTip="{Binding DeselectAllToolTip}"
IsEnabled="{Binding ActiveToolListIsEnable}"
Command="{Binding DeselectAllCommand}"
Style="{StaticResource CloseProjectParameters_Button}">
<Image Source="{StaticResource DeselectAll_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<Grid>
<Grid.RowDefinitions>
<RowDefinition Height="1*"/>
<RowDefinition Height="Auto"/>
</Grid.RowDefinitions>
<ItemsControl ItemsSource="{Binding Tag.ParameterList,
RelativeSource={RelativeSource AncestorType={x:Type UserControl}}}"
Style="{StaticResource ParameterStrategy_ItemsControl}">
<ItemsControl.Resources>
<DataTemplate DataType="{x:Type OPTIMIZER:BooleanStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bBooleanVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<CheckBox IsChecked="{Binding bValue, UpdateSourceTrigger=PropertyChanged}"
Style="{StaticResource FeatureInPartInRawPartList_CheckBox}"/>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:DoubleStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bDoubleVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<TextBox Text="{Binding sValue}"
Style="{StaticResource ColorPicker_TextBox}"/>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:ComboStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bComboBoxVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<ComboBox ItemsSource="{Binding ComboList}"
SelectedItem="{Binding SelValue}"
DisplayMemberPath="sValue"
Style="{StaticResource ProjectParameters_ComboBox}">
</ComboBox>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:StringStrategyParameter}">
<UniformGrid Columns="2"
Visibility="{Binding bStringVisibility}"
Style="{StaticResource ParamStrategy_UniformGrid}">
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategy_TextBlock}"/>
<TextBox Text="{Binding sValue}"
Style="{StaticResource ColorPicker_TextBox}"/>
</UniformGrid>
</DataTemplate>
<DataTemplate DataType="{x:Type OPTIMIZER:ListStrategyParameter}">
<Grid Visibility="{Binding bListBoxVisibility}"
Style="{StaticResource AddRawPartWnd_Grid}">
<Grid.RowDefinitions>
<RowDefinition Height="Auto"/>
<RowDefinition Height="Auto"/>
</Grid.RowDefinitions>
<Grid.ColumnDefinitions>
<ColumnDefinition Width="1.3*"/>
<ColumnDefinition Width="1*"/>
</Grid.ColumnDefinitions>
<TextBlock Text="{Binding sDescriptionShort}"
Style="{StaticResource ParamStrategyDescription_TextBlock}"/>
<StackPanel Grid.Column="1"
Style="{StaticResource PartManager_StackPanel}">
<StackPanel Style="{StaticResource ProjectParameters_StackPanel}">
<Button ToolTip="{Binding OpenToolListToolTip}"
IsEnabled="{Binding OpenToolListIsEnable}"
Command="{Binding OpenToolListCommand}"
Style="{StaticResource ProjectParameters_Button}">
<Image Source="{StaticResource Plus_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<Button ToolTip="{Binding DeselectAllToolTip}"
IsEnabled="{Binding ActiveToolListIsEnable}"
Command="{Binding DeselectAllCommand}"
Style="{StaticResource CloseProjectParameters_Button}">
<Image Source="{StaticResource DeselectAll_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
</StackPanel>
<Border Style="{StaticResource ForcedStrategyBTL_Border}">
<ItemsControl ItemsSource="{Binding ActiveToolList_View}"
Style="{StaticResource ProjectParameters_ItemsControl}">
<ItemsControl.ItemTemplate>
<DataTemplate>
<StackPanel Style="{StaticResource ExpanderElemen_StackPanel}">
<CheckBox IsChecked="{Binding bIsActive, UpdateSourceTrigger=PropertyChanged}"
Style="{StaticResource FreeContourInput_CheckBox}"/>
<TextBlock Text="{Binding sName}"
Style="{StaticResource DialogWindow_TextBlock}"/>
</StackPanel>
</DataTemplate>
</ItemsControl.ItemTemplate>
</ItemsControl>
</Border>
</StackPanel>
<Border Style="{StaticResource ForcedStrategyBTL_Border}">
<ItemsControl ItemsSource="{Binding ActiveToolList_View}"
Style="{StaticResource ProjectParameters_ItemsControl}">
<ItemsControl.ItemTemplate>
<DataTemplate>
<StackPanel Style="{StaticResource ExpanderElemen_StackPanel}">
<CheckBox IsChecked="{Binding bIsActive, UpdateSourceTrigger=PropertyChanged}"
Style="{StaticResource FreeContourInput_CheckBox}"/>
<TextBlock Text="{Binding sName}"
Style="{StaticResource DialogWindow_TextBlock}"/>
</StackPanel>
</DataTemplate>
</ItemsControl.ItemTemplate>
</ItemsControl>
</Border>
</StackPanel>
<StackPanel Grid.Row="1"
Grid.Column="1"
Visibility="{Binding AvailableToolListVisibility}"
Style="{StaticResource PartManager_StackPanel}">
<StackPanel Style="{StaticResource ProjectParameters_StackPanel}">
<Button ToolTip="{Binding CloseToolListToolTip}"
Command="{Binding CloseToolListCommand}"
Style="{StaticResource ProjectParameters_Button}">
<Image Source="{StaticResource Delete_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<Button ToolTip="{Binding SelectAllToolTip}"
IsEnabled="{Binding AvailableToolListIsEnable}"
Command="{Binding SelectAllCommand}"
Style="{StaticResource ProjectParameters_Button}">
<Image Source="{StaticResource SelectAll_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<StackPanel Grid.Row="1"
Grid.Column="1"
Visibility="{Binding AvailableToolListVisibility}"
Style="{StaticResource PartManager_StackPanel}">
<StackPanel Style="{StaticResource ProjectParameters_StackPanel}">
<Button ToolTip="{Binding CloseToolListToolTip}"
Command="{Binding CloseToolListCommand}"
Style="{StaticResource ProjectParameters_Button}">
<Image Source="{StaticResource Delete_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<Button ToolTip="{Binding SelectAllToolTip}"
IsEnabled="{Binding AvailableToolListIsEnable}"
Command="{Binding SelectAllCommand}"
Style="{StaticResource ProjectParameters_Button}">
<Image Source="{StaticResource SelectAll_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
</StackPanel>
<Border Style="{StaticResource ProjectParamters_Border}">
<ItemsControl ItemsSource="{Binding AvailableToolList_View}"
Style="{StaticResource AvailableToolList_ItemsControl}">
<ItemsControl.ItemTemplate>
<DataTemplate>
<StackPanel Style="{StaticResource ExpanderElemen_StackPanel}">
<CheckBox IsChecked="{Binding bIsActive, UpdateSourceTrigger=PropertyChanged}"
Style="{StaticResource FreeContourInput_CheckBox}"/>
<TextBlock Text="{Binding sName}"
Style="{StaticResource DialogWindow_TextBlock}"/>
</StackPanel>
</DataTemplate>
</ItemsControl.ItemTemplate>
</ItemsControl>
</Border>
</StackPanel>
<Border Style="{StaticResource ProjectParamters_Border}">
<ItemsControl ItemsSource="{Binding AvailableToolList_View}"
Style="{StaticResource AvailableToolList_ItemsControl}">
<ItemsControl.ItemTemplate>
<DataTemplate>
<StackPanel Style="{StaticResource ExpanderElemen_StackPanel}">
<CheckBox IsChecked="{Binding bIsActive, UpdateSourceTrigger=PropertyChanged}"
Style="{StaticResource FreeContourInput_CheckBox}"/>
<TextBlock Text="{Binding sName}"
Style="{StaticResource DialogWindow_TextBlock}"/>
</StackPanel>
</DataTemplate>
</ItemsControl.ItemTemplate>
</ItemsControl>
</Border>
</StackPanel>
</Grid>
</DataTemplate>
</ItemsControl.Resources>
</ItemsControl>
</Grid>
</DataTemplate>
</ItemsControl.Resources>
</ItemsControl>
<Button Grid.Row="1" Margin="5,135,0,0"
Command="{Binding UpdateFeatureCommand}"
Visibility="{Binding Update_Visibility}"
Style="{StaticResource Update_Button}">
<Image Source="{StaticResource Update_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
</Grid>
</UserControl>
@@ -144,21 +144,8 @@
<ColumnDefinition Width="1*"/>
<!--<ColumnDefinition Width="1*"/>-->
</Grid.ColumnDefinitions>
<Grid>
<Grid.RowDefinitions>
<RowDefinition Height="Auto"/>
<RowDefinition Height="1*"/>
</Grid.RowDefinitions>
<Button Command="{Binding UpdateFeatureCommand}"
Visibility="{Binding Update_Visibility}"
Style="{StaticResource Update_Button}">
<Image Source="{StaticResource Update_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<TextBlock Grid.Column="1"
Text="{Binding SelTreeItem.sName}"
Style="{StaticResource TreeItemName_TextBlock}"/>
</Grid>
<TextBlock Text="{Binding SelTreeItem.sName}"
Style="{StaticResource TreeItemName_TextBlock}"/>
<Image Grid.Row="1"
Source="{Binding SelTreeItem.sImage}"
Style="{StaticResource StrategyManager_Image}"/>
@@ -106,9 +106,8 @@ Public Class StrategyManagerVM
TmpImage = ImageRoot & Item.sImage
Item.sImage = TmpImage
End If
' Gestisco visibilita' pulsante Update Feature
SetUpdate_Visibility(If(Item.sName <> "Feature", True, False))
m_SelTreeItem = Item
SetUpdate_Visibility(False)
NotifyPropertyChanged(NameOf(SelTreeItem))
End Sub
@@ -528,6 +527,11 @@ Public Class StrategyManagerVM
Public Sub MoveUpSelectedStrategy()
' Controllo se SelectedActiveStrategy se è nullo esco
If IsNothing(m_SelTreeItem.SelActiveStrategy) Then Return
' Trova lelemento con indice -1
Dim mRemovedItemStrategyList As List(Of Strategy) = m_SelTreeItem.StrategyList.Where(Function(s) s.nIndexInList = -1).ToList()
For Each RemovedItemStrategy In mRemovedItemStrategyList
m_SelTreeItem.StrategyList.Remove(RemovedItemStrategy)
Next
' Recupero indice elemento selezionato in lista
Dim IndexActiveStrategy As Integer = m_SelTreeItem.StrategyList.IndexOf(m_SelTreeItem.SelActiveStrategy)
' Recupero indice elemento selezionato in lista
@@ -543,9 +547,14 @@ Public Class StrategyManagerVM
For Index As Integer = 0 To m_SelTreeItem.StrategyList.Count - 1
m_SelTreeItem.StrategyList(Index).nIndexInList = Index
Next
' Reinserisco elementi rimossi
For Each RemovedItemStrategy In mRemovedItemStrategyList
m_SelTreeItem.StrategyList.Add(RemovedItemStrategy)
Next
' Setto a true booleano per modifica
SetbIsModifyStrategy(True)
' Aggiorno la lista
m_SelTreeItem.AvailableStrategyList_View.Refresh()
m_SelTreeItem.ActiveStrategyList_View.Refresh()
End Sub
@@ -567,6 +576,11 @@ Public Class StrategyManagerVM
''' </summary>
Public Sub MoveDownSelectedStrategy()
If IsNothing(m_SelTreeItem.SelActiveStrategy) Then Return
' Trova lelemento con indice -1
Dim mRemovedItemStrategyList As List(Of Strategy) = m_SelTreeItem.StrategyList.Where(Function(s) s.nIndexInList = -1).ToList()
For Each RemovedItemStrategy In mRemovedItemStrategyList
m_SelTreeItem.StrategyList.Remove(RemovedItemStrategy)
Next
' Recupero indice elemento selezionato in lista
Dim IndexActiveStrategy As Integer = m_SelTreeItem.StrategyList.IndexOf(m_SelTreeItem.SelActiveStrategy)
' Recupero indice elemento selezionato in lista
@@ -582,9 +596,14 @@ Public Class StrategyManagerVM
For Index As Integer = 0 To m_SelTreeItem.StrategyList.Count - 1
m_SelTreeItem.StrategyList(Index).nIndexInList = Index
Next
' Reinserisco elementi rimossi
For Each RemovedItemStrategy In mRemovedItemStrategyList
m_SelTreeItem.StrategyList.Add(RemovedItemStrategy)
Next
' Setto a true booleano per modifica
SetbIsModifyStrategy(True)
' Aggiorno la lista
m_SelTreeItem.AvailableStrategyList_View.Refresh()
m_SelTreeItem.ActiveStrategyList_View.Refresh()
End Sub
@@ -1086,6 +1105,8 @@ Public Class Topology
End Get
Set(value As Strategy)
m_SelParamStrategy = value
' Gestisco visibilita' pulsante Update Feature
Map.refStrategyManagerVM.SetUpdate_Visibility(If(Map.refStrategyManagerVM.SelTreeItem.sName <> "Feature", True, False))
NotifyPropertyChanged(NameOf(SelParamStrategy))
End Set
End Property
@@ -70,14 +70,6 @@
</ListBox.ItemContainerStyle>
</ListBox>
</Border>
<Button Grid.Column="3"
Command="{Binding UpdateFeatureCommand}"
Visibility="{Binding Update_Visibility}"
Style="{StaticResource Update_Button}">
<Image Source="{StaticResource Update_Image}"
Style="{StaticResource BTLDataWnd_Image}"/>
</Button>
<StackPanel Grid.Column="3"
Style="{StaticResource Strategy_StackPanel}">
@@ -836,6 +836,13 @@
<Setter Property="Margin" Value="0,0,5,0"/>
</Style>
<Style x:Key="SaveConfig_Button" TargetType="{x:Type Button}" BasedOn="{StaticResource Optimizer_Button}">
<Setter Property="VerticalAlignment" Value="Top"/>
<Setter Property="Height" Value="40"/>
<Setter Property="Width" Value="40"/>
<Setter Property="Margin" Value="10,15,10,10"/>
</Style>
<!--#endregion Optimizer-->
<!--#region ProdManager-->