Sostituzione ioniczip con dotnetzip

(cherry picked from commit c01972f99e)

Constants/ConstIni.vb

@@ -104,6 +104,7 @@ Module ConstIni
    Public Const K_ENGRAVENUMBER2 As String = "EngraveNumber2"
    Public Const K_ENGRAVEDEPTH As String = "EngraveDepth"
    Public Const K_ENGRAVESHORT As String = "EngraveShort"
+   Public Const K_ENGRAVEANGLE As String = "EngraveAngle"
    Public Const K_ENGRAVEDEPTH2 As String = "EngraveDepth2"
    Public Const K_DRIPOFFSET As String = "DripOffset"
    Public Const K_DRIPOFFSET2 As String = "DripOffset2"
@@ -125,6 +126,7 @@ Module ConstIni
    Public Const K_AUTOMATICOPTIMIZE As String = "AutomaticOptimize"
    Public Const K_AUTOMATICMAXTIME As String = "AutomaticMaxTime"
    Public Const K_DRAGRECTANGLE As String = "DragRectangle"
+   Public Const K_STARTENDMODIFYONINTCORNER As String = "StartEndModifyOnIntCorner"
 
    Public Const S_SPLIT As String = "Split"
    Public Const K_MOVE_LEV As String = "MoveLevel"

CurrMachWindow/CurrMachWindowV.xaml

@@ -6,19 +6,21 @@
    IsResizable="False"
    IsMinimizable="False"
    IsClosable="False"
-   ShowInTaskbar="False"
+   ShowInTaskbar="False"                         
    Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
-   WindowStartupLocation="CenterOwner"
+   WindowStartupLocation="CenterOwner"  
    Width="270" ResizeMode="NoResize" SizeToContent="Height">
 
    <StackPanel Margin="5,5,5,0">
 <!--TAGLIO-->
       <TextBlock Text="{Binding CurrSawingMsg}"
                  Visibility="{Binding CurrSawing_Visibility}"
+                 Style="{StaticResource RawTextBlock}"
                  Margin="0,0,0,5"/>
       <ComboBox ItemsSource="{Binding CurrSawingList}"
                 SelectedItem="{Binding SelCurrSawing}"
                 Visibility="{Binding CurrSawing_Visibility}"
+                Style="{DynamicResource Raw_ComboBox}"
                 Margin="0,0,0,5"/>
 
       <!--<TextBlock Text="{Binding AuxMachTypeMsg}"
@@ -33,30 +35,37 @@
 <!--FORATURA-->
       <TextBlock Text="{Binding CurrDrillingMsg}"
                  Visibility="{Binding CurrDrilling_Visibility}"
+                 Style="{StaticResource RawTextBlock}"
                  Margin="0,0,0,5"/>
       <ComboBox ItemsSource="{Binding CurrDrillingList}"
                 SelectedItem="{Binding SelCurrDrilling}"
                 Visibility="{Binding CurrDrilling_Visibility}"
+                Style="{DynamicResource Raw_ComboBox}"
                 Margin="0,0,0,5"/>
 <!--FRESATURA-->
       <TextBlock Text="{Binding CurrMillingMsg}"
                  Visibility="{Binding CurrMilling_Visibility}"
+                 Style="{StaticResource RawTextBlock}"
                  Margin="0,0,0,5"/>
       <ComboBox ItemsSource="{Binding CurrMillingList}"
                 SelectedItem="{Binding SelCurrMilling}"
                 Visibility="{Binding CurrMilling_Visibility}"
+                Style="{DynamicResource Raw_ComboBox}"
                 Margin="0,0,0,5"/>
 <!--SVUOTATURA-->
       <TextBlock Text="{Binding CurrPocketingMsg}"
                Visibility="{Binding CurrPocketing_Visibility}"
+                 Style="{StaticResource RawTextBlock}"
                Margin="0,0,0,5"/>
       <ComboBox ItemsSource="{Binding CurrPocketingList}"
               SelectedItem="{Binding SelCurrPocketing}"
               Visibility="{Binding CurrPocketing_Visibility}"
+              Style="{DynamicResource Raw_ComboBox}"  
               Margin="0,0,0,5"/>
 <!--WATERJET-->
       <TextBlock Text="{Binding CurrWaterjettingMsg}"
                Visibility="{Binding CurrWaterjetting_Visibility}"
+                 Style="{StaticResource RawTextBlock}"
                Margin="0,0,0,5"/>
       <Grid>
           <Grid.ColumnDefinitions>
@@ -66,12 +75,14 @@
           <ComboBox ItemsSource="{Binding CurrWaterjettingList}"
             SelectedItem="{Binding SelCurrWaterjetting}"
             Visibility="{Binding CurrWaterjetting_Visibility}"
+                    Style="{DynamicResource Raw_ComboBox}"
             Margin="0,0,5,5"/>
 
           <!--Quality-->
           <ComboBox ItemsSource="{Binding CurrWaterjettingQualityList}"
                     SelectedItem="{Binding SelCurrWaterjettingQuality}"
                     Visibility="{Binding CurrWaterjetting_Visibility}"
+                    Style="{DynamicResource Raw_ComboBox}"
                     Margin="5,0,0,5"
                     Grid.Column="1">
           </ComboBox>

CurrMachWindow/CurrMachWindowV.xaml.vb

@@ -9,6 +9,12 @@
       Me.DataContext = CurrMachWindowVM
       ' Assegno al riferimento locale al VM il VM preso dal DataContext
       m_CurrMachWindowVM = CurrMachWindowVM
+
+   End Sub
+
+   Private Sub Me_Initialized(sender As Object, e As EventArgs) Handles Me.Initialized
+      Me.Top = Owner.Top + Owner.Height / 2 - Me.ActualHeight / 2
+      Me.Left = Owner.Left + Owner.Width / 2 - Me.ActualWidth / 2
    End Sub
 
    Private Sub OkBtn_Click(sender As Object, e As RoutedEventArgs) Handles OkBtn.Click

CurrMachWindow/CurrMachWindowVM.vb

@@ -29,9 +29,17 @@ Public Class CurrMachWindowVM
             m_SelCurrSawing = value
          End If
          CurrentMachine.sCurrSawing = m_SelCurrSawing
+         ' salvo la lvorazione corrente
+         WritePrivateProfileString(S_MACH_MACH, K_CURRSAWING_OFFICE, m_SelCurrSawing, sMachIniFile)
       End Set
    End Property
 
+   Public Sub SetCurrSawing(sCurrOfficeSawing As String)
+      m_SelCurrSawing = sCurrOfficeSawing
+      CurrentMachine.sCurrSawing = m_SelCurrSawing
+      NotifyPropertyChanged("SelCurrSawing")
+   End Sub
+
    Public ReadOnly Property CurrSawing_Visibility As Visibility
       Get
          If EgtGetHeadId("H1") = GDB_ID.NULL Then
@@ -149,10 +157,18 @@ Public Class CurrMachWindowVM
          If value <> m_SelCurrDrilling Then
             m_SelCurrDrilling = value
             CurrentMachine.sCurrDrilling = m_SelCurrDrilling
+            ' salvo la lvorazione corrente
+            WritePrivateProfileString(S_MACH_MACH, K_CURRDRILLING_OFFICE, m_SelCurrDrilling, sMachIniFile)
          End If
       End Set
    End Property
 
+   Public Sub SetCurrDrilling(sCurrOfficeDrilling As String)
+      m_SelCurrDrilling = sCurrOfficeDrilling
+      CurrentMachine.sCurrDrilling = m_SelCurrDrilling
+      NotifyPropertyChanged("SelCurrDrilling")
+   End Sub
+
    Private m_CurrDrilling_Visibility As Visibility
    Public Property CurrDrilling_Visibility As Visibility
       Get
@@ -187,10 +203,18 @@ Public Class CurrMachWindowVM
          If value <> m_SelCurrMilling Then
             m_SelCurrMilling = value
             CurrentMachine.sCurrMilling = m_SelCurrMilling
+            ' salvo la lvorazione corrente
+            WritePrivateProfileString(S_MACH_MACH, K_CURRMILLING_OFFICE, m_SelCurrMilling, sMachIniFile)
          End If
       End Set
    End Property
 
+   Public Sub SetCurrMilling(sCurrOfficeMilling As String)
+      m_SelCurrMilling = sCurrOfficeMilling
+      CurrentMachine.sCurrMilling = m_SelCurrMilling
+      NotifyPropertyChanged("SelCurrMilling")
+   End Sub
+
    Private m_CurrMilling_Visibility As Visibility
    Public Property CurrMilling_Visibility As Visibility
       Get
@@ -225,10 +249,18 @@ Public Class CurrMachWindowVM
          If value <> m_SelCurrPocketing Then
             m_SelCurrPocketing = value
             CurrentMachine.sCurrPocketing = m_SelCurrPocketing
+            ' salvo la lvorazione corrente
+            WritePrivateProfileString(S_MACH_MACH, K_CURRPOCKETING_OFFICE, m_SelCurrPocketing, sMachIniFile)
          End If
       End Set
    End Property
 
+   Public Sub SetCurrPocketing(sCurrOfficePocketing As String)
+      m_SelCurrPocketing = sCurrOfficePocketing
+      CurrentMachine.sCurrPocketing = m_SelCurrPocketing
+      NotifyPropertyChanged("SelCurrPocketing")
+   End Sub
+
    Private m_CurrPocketing_Visibility As Visibility
    Public Property CurrPocketing_Visibility As Visibility
       Get
@@ -263,10 +295,18 @@ Public Class CurrMachWindowVM
          If value <> m_SelCurrWaterjetting Then
             m_SelCurrWaterjetting = value
             CurrentMachine.sCurrWaterJetting = m_SelCurrWaterjetting
+            ' salvo la lvorazione corrente
+            WritePrivateProfileString(S_MACH_MACH, K_CURRWATERJETTING_OFFICE, m_SelCurrWaterjetting, sMachIniFile)
          End If
       End Set
    End Property
 
+   Public Sub SetCurrWaterjetting(sCurrOfficeWaterjetting As String)
+      m_SelCurrWaterjetting = sCurrOfficeWaterjetting
+      CurrentMachine.sCurrWaterJetting = m_SelCurrWaterjetting
+      NotifyPropertyChanged("SelCurrWaterjetting")
+   End Sub
+
    Private m_CurrWaterjettingQualityList As New List(Of String)
    Public Property CurrWaterjettingQualityList As List(Of String)
       Get
@@ -286,10 +326,18 @@ Public Class CurrMachWindowVM
          If value <> m_SelCurrWaterjettingQuality Then
             m_SelCurrWaterjettingQuality = value
             CurrentMachine.sCurrWaterJettingQuality = m_SelCurrWaterjettingQuality
+            ' salvo la lvorazione corrente
+            WritePrivateProfileString(S_MACH_MACH, K_CURRWATERJETTINGQUALITY_OFFICE, m_SelCurrWaterjettingQuality, sMachIniFile)
          End If
       End Set
    End Property
 
+   Public Sub SetCurrWaterjettingQuality(sCurrOfficeWaterjettingQuality As String)
+      m_SelCurrWaterjettingQuality = sCurrOfficeWaterjettingQuality
+      CurrentMachine.sCurrWaterJettingQuality = m_SelCurrWaterjettingQuality
+      NotifyPropertyChanged("SelCurrWaterjetting")
+   End Sub
+
    Private m_CurrWaterjetting_Visibility As Visibility = Visibility.Collapsed
    Public Property CurrWaterjetting_Visibility As Visibility
       Get
@@ -472,11 +520,13 @@ Public Class CurrMachWindowVM
 
       If m_CurrSawingList.Count > 0 Then
          If CurrentMachine.sCurrSawing <> String.Empty Then
-            SelCurrSawing = CurrentMachine.sCurrSawing
+            SetCurrSawing(CurrentMachine.sCurrSawing)
          Else
             Dim sCurrSawing As String = ""
-            GetPrivateProfileString(S_MACH_MACH, K_CURRSAWING, Nothing, sCurrSawing, sMachIniFile)
-            SelCurrSawing = sCurrSawing
+            ' GetPrivateProfileString(S_MACH_MACH, K_CURRSAWING, Nothing, sCurrSawing, sMachIniFile)
+            GetPrivateProfileString(S_MACH_MACH, K_CURRSAWING_OFFICE, Nothing, sCurrSawing, sMachIniFile)
+            'SelCurrSawing = sCurrSawing
+            SetCurrSawing(sCurrSawing)
          End If
       Else
          CurrentMachine.sCurrSawing = String.Empty
@@ -486,7 +536,11 @@ Public Class CurrMachWindowVM
       If CurrentMachine.bDrilling And m_CurrDrillingList.Count > 1 Then
          CurrDrilling_Visibility = Visibility.Visible
          If CurrentMachine.sCurrDrilling <> String.Empty Then
-            SelCurrDrilling = CurrentMachine.sCurrDrilling
+            SetCurrDrilling(CurrentMachine.sCurrDrilling)
+         Else
+            Dim sCurrMachining As String = ""
+            GetPrivateProfileString(S_MACH_MACH, K_CURRDRILLING_OFFICE, Nothing, sCurrMachining, sMachIniFile)
+            SetCurrDrilling(sCurrMachining)
          End If
       Else
          CurrDrilling_Visibility = Visibility.Collapsed
@@ -495,7 +549,11 @@ Public Class CurrMachWindowVM
       If CurrentMachine.bMilling And m_CurrMillingList.Count > 1 Then
          CurrMilling_Visibility = Visibility.Visible
          If CurrentMachine.sCurrMilling <> String.Empty Then
-            SelCurrMilling = CurrentMachine.sCurrMilling
+            SetCurrMilling(CurrentMachine.sCurrMilling)
+         Else
+            Dim sCurrMachining As String = ""
+            GetPrivateProfileString(S_MACH_MACH, K_CURRMILLING_OFFICE, Nothing, sCurrMachining, sMachIniFile)
+            SetCurrMilling(sCurrMachining)
          End If
       Else
          CurrMilling_Visibility = Visibility.Collapsed
@@ -504,7 +562,11 @@ Public Class CurrMachWindowVM
       If CurrentMachine.bPocketing And CurrPocketingList.Count > 1 Then
          CurrPocketing_Visibility = Visibility.Visible
          If CurrentMachine.sCurrPocketing <> String.Empty Then
-            SelCurrPocketing = CurrentMachine.sCurrPocketing
+            SetCurrPocketing(CurrentMachine.sCurrPocketing)
+         Else
+            Dim sCurrMachining As String = ""
+            GetPrivateProfileString(S_MACH_MACH, K_CURRPOCKETING_OFFICE, Nothing, sCurrMachining, sMachIniFile)
+            SetCurrPocketing(sCurrMachining)
          End If
       Else
          CurrPocketing_Visibility = Visibility.Collapsed
@@ -515,10 +577,18 @@ Public Class CurrMachWindowVM
          ' se DB WaterJet abilitato avrò anche la CmBx della Quality solo la CmBx del Waterjetting corrente
          If CurrentMachine.bFromDBWaterJet Then
             If CurrentMachine.sCurrWaterJetting <> String.Empty Then
-               SelCurrWaterjetting = CurrentMachine.sCurrWaterJetting
+               SetCurrWaterjetting(CurrentMachine.sCurrWaterJetting)
+            Else
+               Dim sCurrMachining As String = ""
+               GetPrivateProfileString(S_MACH_MACH, K_CURRWATERJETTING_OFFICE, Nothing, sCurrMachining, sMachIniFile)
+               SetCurrWaterjetting(sCurrMachining)
             End If
             If CurrentMachine.sCurrWaterJettingQuality <> String.Empty Then
-               SelCurrWaterjettingQuality = CurrentMachine.sCurrWaterJettingQuality
+               SetCurrWaterjettingQuality(CurrentMachine.sCurrWaterJettingQuality)
+            Else
+               Dim sCurrMachining As String = ""
+               GetPrivateProfileString(S_MACH_MACH, K_CURRWATERJETTINGQUALITY_OFFICE, Nothing, sCurrMachining, sMachIniFile)
+               SetCurrWaterjettingQuality(sCurrMachining)
             End If
             CurrWaterjettingQuality_Visibility = Visibility.Visible
          Else

DxfImportWindow/DxfImportWindowV.xaml

@@ -8,12 +8,12 @@
    ShowInTaskbar="False"
    Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}" WindowStartupLocation="CenterOwner">
 
-   <DockPanel>
+    <DockPanel>
 
-      <DockPanel DockPanel.Dock="Left"
+        <DockPanel DockPanel.Dock="Left"
                  Width="200"
                  Margin="5,5,5,0">
-          
+
             <UniformGrid Columns="{Binding nButton}" Rows="1"
                          Margin="0,0,0,5"
                          DockPanel.Dock="Top">
@@ -40,145 +40,154 @@
                 </Button>
 
             </UniformGrid>
-        
 
-         <GroupBox Header="{Binding TypeMsg}"
+
+            <GroupBox Header="{Binding TypeMsg}"
                    DockPanel.Dock="Top"
                    IsEnabled="{Binding Type_IsEnabled}"
+                   BorderThickness="{StaticResource BorderGpBx_Thickness}"
+                   Foreground="{StaticResource Omag_White}"
                    Margin="0,0,0,5">
-            <UniformGrid Columns="2" Rows="2">
-               <Button Content="{Binding UseRegionMsg}"
+                <UniformGrid Columns="2" Rows="2">
+                    <Button Content="{Binding UseRegionMsg}"
                        IsEnabled="{Binding UseRegionIsEnabled}"
                        Command="{Binding UseRegionCommand}"
                        Style="{StaticResource OptionPanel_TextButton}"/>
-               <Button Content="{Binding UseLayerMsg}"
+                    <Button Content="{Binding UseLayerMsg}"
                        IsEnabled="{Binding UseLayerIsEnabled}"
                        Command="{Binding UseLayerCommand}"
                        Style="{StaticResource OptionPanel_TextButton}"/>
-               <Button Content="{Binding UseClosedCurveMsg}"
+                    <Button Content="{Binding UseClosedCurveMsg}"
                        IsEnabled="{Binding UseClosedCurveIsEnabled}"
                        Command="{Binding UseClosedCurveCommand}"
                        Style="{StaticResource OptionPanel_TextButton}"/>
-               <Button Content="{Binding ResetMsg}"
+                    <Button Content="{Binding ResetMsg}"
                        IsEnabled="{Binding ResetIsEnabled}"
                        Command="{Binding ResetCommand}"
                        Style="{StaticResource OptionPanel_TextButton}"/>
-            </UniformGrid>
-         </GroupBox>
+                </UniformGrid>
+            </GroupBox>
 
-         <GroupBox Header="{Binding MeasureUnitMsg}"
+            <GroupBox Header="{Binding MeasureUnitMsg}"
                    IsEnabled="{Binding Measure_IsEnabled}"
                    DockPanel.Dock="Top"
+                   BorderThickness="{StaticResource BorderGpBx_Thickness}"
+                   Foreground="{StaticResource Omag_White}"
                    Margin="0,0,0,5">
-            <UniformGrid Columns="2">
-               <RadioButton Content="{Binding MmMsg}"
+                <UniformGrid Columns="2">
+                    <RadioButton Content="{Binding MmMsg}"
                        IsChecked="{Binding MmIsChecked}"
                        Style="{StaticResource OptionPanel_ToggleButton}"/>
-               <RadioButton Content="{Binding InchMsg}"
+                    <RadioButton Content="{Binding InchMsg}"
                        IsChecked="{Binding InchIsChecked, Mode=OneWay}"
                        Style="{StaticResource OptionPanel_ToggleButton}"/>
-            </UniformGrid>
-         </GroupBox>
+                </UniformGrid>
+            </GroupBox>
 
-         <UniformGrid Columns="4"
+            <UniformGrid Columns="4"
                    DockPanel.Dock="Top"
                    IsEnabled="{Binding SideEntity_IsEnabled}"
-                   Margin="0,0,0,5">             
-            <!--Inclina lati-->
-            <ToggleButton Content="{Binding SideAngleMsg}"
+                   Margin="0,0,0,5">
+                <!--Inclina lati-->
+                <ToggleButton Content="{Binding SideAngleMsg}"
                        IsChecked="{Binding SideAngle_IsChecked}"
                        Style="{StaticResource CompoWindow_WrapToggleButton}"/>
 
-            <!--Filo Top-->
-            <ToggleButton Content="{Binding FiloTopMsg}"
+                <!--Filo Top-->
+                <ToggleButton Content="{Binding FiloTopMsg}"
                    IsChecked="{Binding FiloTop_IsChecked}"
                    Style="{StaticResource CompoWindow_WrapToggleButton}"/>
 
                 <!--Incidi da sotto-->
-            <ToggleButton Content="{Binding DripMsg}"
+                <ToggleButton Content="{Binding DripMsg}"
                       IsChecked="{Binding Drip_IsChecked}"
                       Style="{StaticResource CompoWindow_WrapToggleButton}"
                       IsEnabled="{Binding Drip_IsEnabled}"/>
-            <!--Fora da sotto-->
-            <ToggleButton Content="{Binding UnderDrillMsg}"
+                <!--Fora da sotto-->
+                <ToggleButton Content="{Binding UnderDrillMsg}"
                        IsChecked="{Binding UnderDrill_IsChecked}"
                        Style="{StaticResource CompoWindow_WrapToggleButton}"
                        IsEnabled="{Binding Drip_IsEnabled}"/>
-         </UniformGrid>
+            </UniformGrid>
 
-         <UniformGrid DockPanel.Dock="Bottom"
+            <UniformGrid DockPanel.Dock="Bottom"
                       Columns="2"
                       Margin="0,0,0,5">
-            <Button x:Name="OkBtn"
+                <Button x:Name="OkBtn"
                     Content="{Binding OkMsg}"
                     IsEnabled="{Binding OkIsEnabled}"
                     Style="{StaticResource OptionPanel_TextButton}"/>
-            <Button x:Name="CancelBtn"
+                <Button x:Name="CancelBtn"
                     Content="{Binding CancelMsg}"
                     Style="{StaticResource OptionPanel_TextButton}"/>
-         </UniformGrid>
+            </UniformGrid>
 
-         <Grid DockPanel.Dock="Bottom"
-               Visibility="{Binding PartData_Visibility}"
-               Margin="0,0,0,10">
-            <Grid.ColumnDefinitions>
-               <ColumnDefinition Width="1.8*"/>
-               <ColumnDefinition Width="1.2*"/>
-            </Grid.ColumnDefinitions>
+            <GroupBox Header="Dati pezzo"
+                      
+                      BorderThickness="{StaticResource BorderGpBx_Thickness}"
+                      Foreground="{StaticResource Omag_White}"
+                      Margin="0">
 
-            <TextBlock Text="{Binding PartNumMsg}"/>
-            <EgtWPFLib5:EgtTextBox Text="{Binding PartNum}"
+                <StackPanel>
+                    <Grid Visibility="{Binding PartData_Visibility}"
+                         Margin="0,0,0,10">
+                        <Grid.ColumnDefinitions>
+                            <ColumnDefinition Width="1.8*"/>
+                            <ColumnDefinition Width="1.2*"/>
+                        </Grid.ColumnDefinitions>
+
+                        <TextBlock Text="{Binding PartNumMsg}"/>
+                        <EgtWPFLib5:EgtTextBox Text="{Binding PartNum}"
                                    Grid.Column="1"/>
-         </Grid>
+                    </Grid>
 
-         <Grid DockPanel.Dock="Bottom"
-               Visibility="{Binding PartData_Visibility}"
-               Margin="0,0,0,10">
-            <TextBlock Text="{Binding TopMsg}"/>
-            <CheckBox IsChecked="{Binding TopIsChecked}"
-               HorizontalAlignment="Right" Margin="6,0,6,0"/>
-         </Grid>
+                    <Grid Visibility="{Binding PartData_Visibility}"
+                          Margin="0,0,0,10">
+                        <TextBlock Text="{Binding TopMsg}"/>
+                        <CheckBox IsChecked="{Binding TopIsChecked}"
+                                  HorizontalAlignment="Right" Margin="6,0,6,0"/>
+                    </Grid>
 
-         <Grid DockPanel.Dock="Bottom"
-               Visibility="{Binding OrderList_Visibility}"
-               Margin="0,0,0,10">
-            <Grid.ColumnDefinitions>
-               <ColumnDefinition Width="1.8*"/>
-               <ColumnDefinition Width="1.2*"/>
-            </Grid.ColumnDefinitions>
+                    <Grid Visibility="{Binding OrderList_Visibility}"
+                          Margin="0,0,0,10">
+                        <Grid.ColumnDefinitions>
+                            <ColumnDefinition Width="1.8*"/>
+                            <ColumnDefinition Width="1.2*"/>
+                        </Grid.ColumnDefinitions>
 
-            <TextBlock Text="{Binding ListMsg}"/>
-            <EgtWPFLib5:EgtTextBox Text="{Binding List}"
+                        <TextBlock Text="{Binding ListMsg}"/>
+                        <EgtWPFLib5:EgtTextBox Text="{Binding List}"
                                    Grid.Column="1"/>
-         </Grid>
+                    </Grid>
 
-         <Grid DockPanel.Dock="Bottom"
-               Visibility="{Binding OrderList_Visibility}"
-               Margin="0,0,0,10">
-            <Grid.ColumnDefinitions>
-               <ColumnDefinition Width="1.8*"/>
-               <ColumnDefinition Width="1.2*"/>
-            </Grid.ColumnDefinitions>
+                    <Grid Visibility="{Binding OrderList_Visibility}"
+                          Margin="0,0,0,10">
+                        <Grid.ColumnDefinitions>
+                            <ColumnDefinition Width="1.8*"/>
+                            <ColumnDefinition Width="1.2*"/>
+                        </Grid.ColumnDefinitions>
 
-            <TextBlock Text="{Binding OrderMsg}"/>
-            <EgtWPFLib5:EgtTextBox Text="{Binding Order}"
+                        <TextBlock Text="{Binding OrderMsg}"/>
+                        <EgtWPFLib5:EgtTextBox Text="{Binding Order}"
                                    Grid.Column="1"/>
-         </Grid>
+                    </Grid>
 
-         <TextBlock Text="{Binding OutputMessage}"
-                 Foreground="{Binding MsgColor}"
-                 DockPanel.Dock="Bottom"
-                 TextWrapping="Wrap"
-                 TextAlignment="Center"
-                 Margin="0,0,0,20"/>
+                    <TextBlock Text="{Binding OutputMessage}"
+                                Foreground="{Binding MsgColor}"
+                                DockPanel.Dock="Bottom"
+                                TextWrapping="Wrap"
+                                TextAlignment="Center"
+                                Margin="0,0,0,20"/>
 
-         <ContentControl VerticalAlignment="Center"
+                    <ContentControl VerticalAlignment="Center"
                          Content="{Binding SideEntityControl}"/>
+                </StackPanel>
+            </GroupBox>
 
-      </DockPanel>
+        </DockPanel>
+
+        <OmagOFFICE:DxfImportSceneHostV/>
+
+    </DockPanel>
 
-      <OmagOFFICE:DxfImportSceneHostV/>
-      
-   </DockPanel>
-   
 </EgtWPFLib5:EgtCustomWindow>

DxfImportWindow/DxfImportWindowVM.vb

@@ -925,9 +925,9 @@ Public Class DxfImportWindowVM
    Private Sub SetMsgColor(nMsgType As MSG_TYPE)
       Select Case nMsgType
          Case MSG_TYPE.INFO
-            m_MsgColor = Brushes.Black
+            m_MsgColor = Brushes.White
          Case MSG_TYPE.WARNING
-            m_MsgColor = Brushes.SaddleBrown
+            m_MsgColor = Brushes.Gold
          Case MSG_TYPE.ERROR_
             m_MsgColor = Brushes.Red
       End Select

EgtStoneLib/ConstMach.vb

@@ -326,6 +326,9 @@ Module ConstMach
    Public Function COL_MCH_DRIPCUT() As Color3d
       Return New Color3d(255, 0, 165)
    End Function
+   Public Function COL_MCH_ONENGRAVE_ANG() As Color3d
+      Return New Color3d(255, 255, 100)
+   End Function
    Public Function COL_MCH_DRIPFREE() As Color3d
       Return New Color3d(192, 0, 128)
    End Function

EgtStoneLib/ConstMachIni.vb

@@ -247,9 +247,13 @@
    Public Const K_CURRDRIPDRILL As String = "CurrDripDrill"
    Public Const K_CURRWATERJET As String = "CurrWaterJet"
    Public Const K_CURRSAWING As String = "CurrSawing"
+   Public Const K_CURRSAWING_OFFICE As String = "CurrOfficeSawing"
    Public Const K_CURRDRILLING As String = "CurrDrilling"
+   Public Const K_CURRDRILLING_OFFICE As String = "CurrOfficeDrilling"
    Public Const K_CURRMILLING As String = "CurrMilling"
+   Public Const K_CURRMILLING_OFFICE As String = "CurrOfficeMilling"
    Public Const K_CURRPOCKETING As String = "CurrPocketing"
+   Public Const K_CURRPOCKETING_OFFICE As String = "CurrOfficePocketing"
    Public Const K_CURRSAWROUGHING As String = "CurrSawRoughing"
    Public Const K_CURRSAWFINISHING As String = "CurrSawFinishing"
    Public Const K_CURRSAWSIDEFINISHING As String = "CurrSawSideFinishing"
@@ -257,7 +261,9 @@
    Public Const K_CURRDRIPSAWING As String = "CurrDripSawing"
    Public Const K_CURRDRIPDRILLING As String = "CurrDripDrilling"
    Public Const K_CURRWATERJETTING As String = "CurrWaterJetting"
+   Public Const K_CURRWATERJETTING_OFFICE As String = "CurrOfficeWaterJetting"
    Public Const K_CURRWATERJETTINGQUALITY As String = "CurrWaterJettingQuality"
+   Public Const K_CURRWATERJETTINGQUALITY_OFFICE As String = "CurrWaterJettingQuality"
 
    Public Const S_MATERIALS As String = "Materials"
    Public Const K_CURRMATERIAL As String = "CurrMaterial"

EgtStoneLib/EstCalc.vb

@@ -247,7 +247,7 @@ Module EstCalc
    Friend Function SetCurrSawing(sCurrSawing As String) As Boolean
       Dim nOperId As Integer = EgtGetFirstNameInGroup(EgtGetCurrMachGroup(), "Opers")
       If nOperId = GDB_ID.NULL Then Return False
-      Return EgtSetInfo(nOperId, INFO_CURRSAWING, sCurrSawing)
+      Return EgtSetInfo(nOperId, INFO_CURRSAWING, sCurrSawing, True)
    End Function
 
    Friend Function GetCurrSawing() As String
@@ -261,7 +261,7 @@ Module EstCalc
    Friend Function SetCurrMilling(sCurrMilling As String) As Boolean
       Dim nOperId As Integer = EgtGetFirstNameInGroup(EgtGetCurrMachGroup(), "Opers")
       If nOperId = GDB_ID.NULL Then Return False
-      Return EgtSetInfo(nOperId, INFO_CURRMILLING, sCurrMilling)
+      Return EgtSetInfo(nOperId, INFO_CURRMILLING, sCurrMilling, True)
    End Function
 
    Friend Function GetCurrMilling() As String
@@ -275,7 +275,7 @@ Module EstCalc
    Friend Function SetCurrDrilling(sCurrDrilling As String) As Boolean
       Dim nOperId As Integer = EgtGetFirstNameInGroup(EgtGetCurrMachGroup(), "Opers")
       If nOperId = GDB_ID.NULL Then Return False
-      Return EgtSetInfo(nOperId, INFO_CURRDRILLING, sCurrDrilling)
+      Return EgtSetInfo(nOperId, INFO_CURRDRILLING, sCurrDrilling, True)
    End Function
 
    Friend Function GetCurrDrilling() As String
@@ -289,7 +289,7 @@ Module EstCalc
    Friend Function SetCurrPocketing(sCurrMilling As String) As Boolean
       Dim nOperId As Integer = EgtGetFirstNameInGroup(EgtGetCurrMachGroup(), "Opers")
       If nOperId = GDB_ID.NULL Then Return False
-      Return EgtSetInfo(nOperId, INFO_CURRPOCKETING, sCurrMilling)
+      Return EgtSetInfo(nOperId, INFO_CURRPOCKETING, sCurrMilling, True)
    End Function
 
    Friend Function GetCurrPocketing() As String
@@ -303,7 +303,7 @@ Module EstCalc
    Friend Function SetCurrWaterjetting(sCurrMilling As String) As Boolean
       Dim nOperId As Integer = EgtGetFirstNameInGroup(EgtGetCurrMachGroup(), "Opers")
       If nOperId = GDB_ID.NULL Then Return False
-      Return EgtSetInfo(nOperId, INFO_CURRWATERJETTING, sCurrMilling)
+      Return EgtSetInfo(nOperId, INFO_CURRWATERJETTING, sCurrMilling, True)
    End Function
 
    Friend Function GetCurrWaterjetting() As String

EgtStoneLib/SplitAuto.vb

@@ -92,11 +92,12 @@ Public Module SplitAuto
                   Mach.m_dStartFreeLen = FREELEN_INF + 1
                   Mach.m_dEndFreeLen = FREELEN_INF + 1
                   Dim nEntId, nSub As Integer
-                  If EgtGetMachiningGeometry( 0, nEntId, nSub) Then
-                     If EgtGetType( nEntId) = GDB_TY.CRV_ARC OrElse EgtGetType( nEntId) = GDB_TY.CRV_COMPO Then Mach.m_bIsLine = False
-                     EgtGetInfo( nEntId, If( Not Mach.m_bInvert, INFO_PREVANG, INFO_NEXTANG), Mach.m_dPrevAng)
-                     EgtGetInfo( nEntId, If( Not Mach.m_bInvert, INFO_NEXTANG, INFO_PREVANG), Mach.m_dNextAng)
-                     EgtGetInfo( nEntId, If( Not Mach.m_bInvert, INFO_START_FREELEN, INFO_END_FREELEN), Mach.m_dStartFreeLen)
+                  If EgtGetMachiningGeometry(0, nEntId, nSub) Then
+                     ' EgtGetType( nEntId) = GDB_TY.CRV_ARC OrElse
+                     If EgtGetType(nEntId) = GDB_TY.CRV_COMPO Then Mach.m_bIsLine = False
+                     EgtGetInfo(nEntId, If(Not Mach.m_bInvert, INFO_PREVANG, INFO_NEXTANG), Mach.m_dPrevAng)
+                     EgtGetInfo(nEntId, If(Not Mach.m_bInvert, INFO_NEXTANG, INFO_PREVANG), Mach.m_dNextAng)
+                     EgtGetInfo(nEntId, If(Not Mach.m_bInvert, INFO_START_FREELEN, INFO_END_FREELEN), Mach.m_dStartFreeLen)
                      EgtGetInfo(nEntId, If(Not Mach.m_bInvert, INFO_END_FREELEN, INFO_START_FREELEN), Mach.m_dEndFreeLen)
                      Mach.m_bEnableInvert = GetEnableInvert(nEntId)
                      EgtMidVector(nEntId, GDB_ID.ROOT, Mach.m_vtDir)
@@ -383,28 +384,53 @@ Public Module SplitAuto
       For Each nCut As Integer In vCuts
          RemoveMachiningPreview(nCut)
       Next
-      ' Sposto tutte le lavorazioni disabilitate e le eventuali inglobate nella nuova fase
+      ' ---------------------------------- LAVORAZIONI ----------------------------------
+      ChangeOperationPhase(nNewPhase)
+      ' ---------------------------------- LAVORAZIONI ----------------------------------
+      Return True
+   End Function
+
+   Friend Sub ChangeOperationPhase(nNewPhase As Integer)
+      ' creo l'elenco delle lavorazioni che devono essere sposate
+      Dim MchList As New List(Of Integer)
+      ' Recupero le lavorazioni disabilitate e le eventuali inglobate nella nuova fase
       Dim nId = EgtGetFirstOperation()
       While nId <> GDB_ID.NULL
          Dim nNextId = EgtGetNextOperation(nId)
          If IsValidMachining(nId) And EgtGetOperationPhase(nId) = nNewPhase - 1 And EgtExistsInfo(nId, INFO_MCH_USER_OFF) Then
-            ' sposto la lavorazione
-            EgtChangeOperationPhase(nId, nNewPhase)
+            ' Provo ad inserire la lavorazione nell'elenco
+            AddMach(MchList, nId)
             ' sposto le inglobate
             Dim sInfo As String = String.Empty
             If EgtGetInfo(nId, INFO_MCH_OTHMID, sInfo) Then
                Dim sItems() As String = sInfo.Split(",".ToCharArray)
-               For Each sId2 In sItems
+               For Each sId2 As String In sItems
                   Dim nId2 As Integer = 0
                   StringToInt(sId2, nId2)
-                  If nId2 > 0 Then EgtChangeOperationPhase(nId2, nNewPhase)
+                  If nId2 > 0 Then
+                     ' Provo ad inserire la lavorazione nell'elenco
+                     AddMach(MchList, nId2)
+                  End If
                Next
             End If
          End If
          nId = nNextId
       End While
-      Return True
-   End Function
+      ' Procedo ora a spostare le lavorazioni nella nuova disposizione
+      For Each ItemMchId As Integer In MchList
+         EgtChangeOperationPhase(ItemMchId, nNewPhase)
+      Next
+   End Sub
+
+   ' Inserisce gli inidici delle lavorazioni evitando di inserire dei doppioni
+   Private Sub AddMach(MchList As List(Of Integer), IdMch As Integer)
+      For Each Item As Integer In MchList
+         If IdMch = Item Then
+            Return
+         End If
+      Next
+      MchList.Add(IdMch)
+   End Sub
 
    '-----------------------------------------------------------------------------------------------
    Friend Function CalculateSplitAuto() As Boolean

EgtStoneLib/VacuumCups.vb

@@ -444,15 +444,14 @@ Module VacuumCups
          Dim dLen, dAngVertDeg, dAngOrizzDeg As Double
          frMinRect.VersX().ToSpherical(dLen, dAngVertDeg, dAngOrizzDeg)
          dRotAngDeg = dAngOrizzDeg
-         If b3Vac.DimY() > b3Vac.DimX() + EPS_SMALL Then dRotAngDeg -= 90
          Dim dPreferredRot As Double = m_dPreferredRot
-         If bRotateVacuumNearExtraStrokeX And (Math.Abs(dRotAngDeg - 90) < 45 Or Math.Abs(dRotAngDeg - 270) < 45) Then
+         If bRotateVacuumNearExtraStrokeX And Not IsHorizontal(dAngOrizzDeg) Then
             If frMinRect.Orig().x < b3Tab.Center().x Then
                dPreferredRot = m_dPrefVertRotXMinus
             Else
                dPreferredRot = m_dPrefVertRotXPlus
             End If
-         ElseIf bRotateVacuumNearExtraStrokeY And (Math.Abs(dRotAngDeg - 90) > 45 Or Math.Abs(dRotAngDeg - 270) > 45) Then
+         ElseIf bRotateVacuumNearExtraStrokeY And IsHorizontal(dAngOrizzDeg) Then
             ' se l'orientemanto è orizzontale e la macchina è stata abilitata
             If frMinRect.Orig().y < b3Tab.Center().y Then
                dPreferredRot = m_dPrefVertRotYPlus
@@ -460,6 +459,7 @@ Module VacuumCups
                dPreferredRot = m_dPrefVertRotYMinus
             End If
          End If
+         If b3Vac.DimY() > b3Vac.DimX() + EPS_SMALL Then dRotAngDeg -= 90
          Dim dAngDelta As Double = If( Math.Abs( b3Vac.DimY() - b3Vac.DimX()) < 10 * EPS_SMALL, 90, 180)
          While dRotAngDeg - dPreferredRot >= dAngDelta / 2
             dRotAngDeg -= dAngDelta
@@ -530,16 +530,34 @@ Module VacuumCups
       Return dDist
    End Function
 
+   Private Function IsHorizontal(dDegAng As Double) As Boolean
+      If (Math.Abs(dDegAng) > 45 And Math.Abs(dDegAng) < 135) Or (Math.Abs(dDegAng) > 225 And Math.Abs(dDegAng) < 315) Then
+         Return False
+      End If
+      Return True
+   End Function
+
    ' assegante le posizioni del centro delle ventose e l'angolo di posizionamento orizzontale verifica che la posizione sia raggiungibile
    Public Function VerifyOutOfStrokes(ptRef As Point3d, dRotAngDeg As Double) As Integer
-      Dim dX, dY, dZ As Double
-      Dim nStat As Integer
+      ' Posizione Home dell'asse rotante
       Dim dCHome As Double
       EgtGetAxisHomePos("C", dCHome)
-      ' imposto la l'uscita della ventosa come fosse l'uscita di un utensile
+      ' Corse dell'asse
+      Dim dCMin As Double
+      EgtGetAxisMin("C", dCMin)
+      Dim dCMax As Double
+      EgtGetAxisMax("C", dCMax)
+      ' Porto l'angolo nel range
+      Dim dRotAngMachDeg As Double = dRotAngDeg + dCHome
+      AdjustAngleInRange(dRotAngMachDeg, dCMin, dCMax)
+      ' Imposto la ventosa come fosse un utensile
       EgtSetCalcTool("", "H4", 1)
-      EgtGetCalcPositions(ptRef, dRotAngDeg + dCHome, 0, nStat, dX, dY, dZ)
-      EgtVerifyOutstroke(dX, dY, dZ, dRotAngDeg + dCHome, 0, nStat)
+      ' Calcolo gli assi macchina
+      Dim dX, dY, dZ As Double
+      Dim nStat As Integer
+      EgtGetCalcPositions(ptRef, dRotAngMachDeg, 0, nStat, dX, dY, dZ)
+      ' Verifico le corse
+      EgtVerifyOutstroke(dX, dY, dZ, dRotAngMachDeg, 0, nStat)
       Return nStat
    End Function
 

EgtStoneLib/VeinMatchingWindow.xaml

@@ -20,6 +20,7 @@
                        Margin="0,5,0,0"
                        Content="Verify"/>
          <ToggleButton Name="MagneticBtn" Height="40" Width="80"
+                       Visibility="Collapsed"
                        Margin="0,5,0,0"
                        Content="Magnetic"/>
          <Button Name="ExportBtn" Height="40" Width="80"

EgtStoneLib/VeinMatchingWindow.xaml.vb

@@ -4,6 +4,7 @@ Imports System.Collections.ObjectModel
 Imports System.Runtime.InteropServices
 Imports EgtUILib
 Imports EgtWPFLib5
+Imports OmagOFFICE.VeinMatchingWindow
 
 Public Class VeinMatchingWindow
 
@@ -29,6 +30,18 @@ Public Class VeinMatchingWindow
    Private m_locPrev As System.Drawing.Point
    Private m_ptPrev As Point3d
    Private m_ptCen As Point3d
+   ' Gestione rotazione pezzi in fase di Drag
+   Private m_bKeyCtrlPressed As Boolean = False
+   Private m_bKeyLeftShiftPressed As Boolean = False
+   Private m_dAngTotal As Double = 0
+   Private m_dStartAng As Double = 0
+   Private m_bStartRot As Boolean = False
+   Private m_bStartMove As Boolean = False
+
+   Enum ALETTE
+      F = 2
+      A = 1
+   End Enum
 
    Private Sub Window_Initialized(sender As Object, e As EventArgs)
       ' Assegnazione scena all'host e posizionamento nella PlacePageGrid
@@ -249,14 +262,14 @@ Public Class VeinMatchingWindow
                      EgtMovePartToSnapPointOnCollision(nMoveId, True, m_dSnapDist, bSnapMoved)
                   End If
                End If
-            ' Standard
+               ' Standard
             Else
                EgtMove(nMoveId, vtMove)
             End If
             VeinMatching.SetProjectModified()
             EgtDraw()
          End If
-      ' altrimenti rotazione
+         ' altrimenti rotazione
       Else
          ' Ricavo l'angolo di movimento
          Dim vtPrev As Vector3d = m_ptPrev - m_ptCen
@@ -266,7 +279,7 @@ Public Class VeinMatchingWindow
             ' Con verifica di collisione
             If m_bCurrVerify Then
                EgtRotatePart(nMoveId, True, m_ptCen, dAngRotDeg)
-            ' Standard
+               ' Standard
             Else
                EgtRotate(nMoveId, m_ptCen, Vector3d.Z_AX(), dAngRotDeg, GDB_RT.GLOB)
             End If
@@ -286,15 +299,15 @@ Public Class VeinMatchingWindow
          ' Se eseguito drag
          If Not m_bDragToStart Then
             ' Non serve fare alcunché
-         ' Se selezione da eseguire
+            ' Se selezione da eseguire
          ElseIf m_nIdToSel <> GDB_ID.NULL Then
             ' Eseguo la selezione
             EgtSelectObj(m_nIdToSel)
-         ' Se deselezione da eseguire
+            ' Se deselezione da eseguire
          ElseIf m_nIdToDesel <> GDB_ID.NULL Then
             EgtDeselectObj(m_nIdToDesel)
          End If
-      ' Altrimenti selezione/deselezione anche per nesting
+         ' Altrimenti selezione/deselezione anche per nesting
       Else
          ' Se selezione da eseguire
          If m_nIdToSel <> GDB_ID.NULL Then
@@ -322,7 +335,7 @@ Public Class VeinMatchingWindow
             EgtSetCurrentContext(VeinMatchingScene.GetCtx())
             ' Se selezione riuscita, la eseguo anche in VME
             If bSelected Then EgtSelectObj(m_nIdToSel)
-         ' Se deselezione da eseguire
+            ' Se deselezione da eseguire
          ElseIf m_nIdToDesel <> GDB_ID.NULL Then
             ' Eseguo la deselezione in Nesting
             Dim bDeselected As Boolean = False
@@ -500,31 +513,31 @@ Friend Module VeinMatching
       Dim PartId As Integer = EgtGetFirstPart()
       While PartId <> GDB_ID.NULL
          Dim b3Tmp As New BBox3d()
-         if EgtGetBBoxGlob( PartId, GDB_BB.STANDARD, b3Tmp) Then b3Parts.Add( b3Tmp)
+         If EgtGetBBoxGlob(PartId, GDB_BB.STANDARD, b3Tmp) Then b3Parts.Add(b3Tmp)
          PartId = EgtGetNextPart(PartId)
       End While
       ' Se ingombro troppo grande, errore
-      If b3Parts.DimX() > 2 * ( DIM_REG - SAFE_DIST) Or b3Parts.DimY() > 2 * ( DIM_REG - SAFE_DIST) Then
+      If b3Parts.DimX() > 2 * (DIM_REG - SAFE_DIST) Or b3Parts.DimY() > 2 * (DIM_REG - SAFE_DIST) Then
          Return False
       End If
       ' Se fuori dalla regione di validità, li muovo
       Dim vtMove As New Vector3d
       If b3Parts.Min().x < -DIM_REG + SAFE_DIST Then
-         vtMove += New Vector3d( -DIM_REG + SAFE_DIST - b3Parts.Min().x, 0, 0)
-      End If 
+         vtMove += New Vector3d(-DIM_REG + SAFE_DIST - b3Parts.Min().x, 0, 0)
+      End If
       If b3Parts.Min().y < -DIM_REG + SAFE_DIST Then
-         vtMove += New Vector3d( 0, -DIM_REG + SAFE_DIST - b3Parts.Min().y, 0)
-      End If 
+         vtMove += New Vector3d(0, -DIM_REG + SAFE_DIST - b3Parts.Min().y, 0)
+      End If
       If b3Parts.Max().x > DIM_REG - SAFE_DIST Then
-         vtMove += New Vector3d( DIM_REG - SAFE_DIST - b3Parts.Max().x, 0, 0)
-      End If 
+         vtMove += New Vector3d(DIM_REG - SAFE_DIST - b3Parts.Max().x, 0, 0)
+      End If
       If b3Parts.Max().y > DIM_REG - SAFE_DIST Then
-         vtMove += New Vector3d( 0, DIM_REG - SAFE_DIST - b3Parts.Max().y, 0)
-      End If 
+         vtMove += New Vector3d(0, DIM_REG - SAFE_DIST - b3Parts.Max().y, 0)
+      End If
       If Not vtMove.IsSmall() Then
          PartId = EgtGetFirstPart()
          While PartId <> GDB_ID.NULL
-            EgtMove( PartId, vtMove, GDB_RT.GLOB)
+            EgtMove(PartId, vtMove, GDB_RT.GLOB)
             PartId = EgtGetNextPart(PartId)
          End While
       End If
@@ -573,9 +586,9 @@ Friend Module VeinMatching
       EgtSetInfo(nVeinId2, KEY_ORI_ID, nPartId)
       ' Ne garantisco la visibilità
       Dim nStat As Integer = GDB_ST.OFF
-      If Not EgtGetStatus( nVeinId2, nStat) OrElse nStat <> GDB_ST.ON_ Then
-         EgtSetStatus( nVeinId2, GDB_ST.ON_)
-      End If 
+      If Not EgtGetStatus(nVeinId2, nStat) OrElse nStat <> GDB_ST.ON_ Then
+         EgtSetStatus(nVeinId2, GDB_ST.ON_)
+      End If
       ' Se impostato, nascondo scritte, sono nel layer "Region"
       If Not m_bShowText Then
          Dim nVeinRegId As Integer = EgtGetFirstNameInGroup(nVeinId2, NAME_REGION)
@@ -984,7 +997,7 @@ Friend Module VeinMatching
       ' Esporto il file come immagine
       EgtSetCurrentContext(m_nVeinCtx)
       Dim bOk As Boolean = (EgtGetFileType(sFilePath) = FT.IMG)
-      bOk = bOk AndAlso EgtGetImage(DirectCast( EgtGetShowMode(), EgtInterface.SM),
+      bOk = bOk AndAlso EgtGetImage(DirectCast(EgtGetShowMode(), EgtInterface.SM),
                                     New Color3d(255, 255, 255), New Color3d(255, 255, 255),
                                     m_nImgWidth, m_nImgHeight, sFilePath)
       ' Ripristino il contesto originale
@@ -1072,7 +1085,7 @@ Friend Module VeinMatching
       Return (GetVeinPartId(nPartId) <> GDB_ID.NULL)
    End Function
 
-   Friend Function ModifyPartText( nPartId As Integer, sNewText As String, Optional bDraw As Boolean = True) As Boolean
+   Friend Function ModifyPartText(nPartId As Integer, sNewText As String, Optional bDraw As Boolean = True) As Boolean
       ' Verifico esista il contesto del VeinMatching
       If m_nVeinCtx = 0 Then Return True
       ' Recupero il contesto corrente (principale)
@@ -1090,7 +1103,7 @@ Friend Module VeinMatching
          Dim nCurrId As Integer = EgtGetFirstInGroup(nVeinRegId)
          While nCurrId <> GDB_ID.NULL
             If EgtGetType(nCurrId) = GDB_TY.EXT_TEXT Then
-               EgtModifyText( nCurrId, sNewText)
+               EgtModifyText(nCurrId, sNewText)
                Exit While
             End If
             nCurrId = EgtGetNext(nCurrId)
@@ -1706,43 +1719,44 @@ Friend Module VeinMatching
    End Function
 
    Friend Function MoveAlettaSolid(ByRef Item As Aletta, ByRef ThicknessRaw As Double) As Boolean
-
+      ' A: alzatina, F: frontalino
       Dim nType As Integer
       If Not EgtGetInfo(Item.IdSideRef, "AF", nType) Then Return False
 
-      Dim ptSRef, ptERef, ptE As Point3d
+      Dim ptSRef, ptERef, ptS, ptE As Point3d
+      ' Piano cucina
       If Not EgtStartPoint(Item.IdSideRef, GDB_ID.ROOT, ptSRef) Then Return False
       If Not EgtEndPoint(Item.IdSideRef, GDB_ID.ROOT, ptERef) Then Return False
+      ' AlzFront
+      If Not EgtStartPoint(Item.SideId, GDB_ID.ROOT, ptS) Then Return False
       If Not EgtEndPoint(Item.SideId, GDB_ID.ROOT, ptE) Then Return False
 
-      ' verifco che sia già stato ruotato 
-      Dim nInfo3D As Integer = 0
-      EgtGetInfo(Item.SideId, "Info3D", nInfo3D)
+      ' vettore lato cucina
+      Dim vtRotRef As Vector3d = ptERef - ptSRef
+      ' vettore lato AlzFront
+      Dim vtRot As Vector3d = ptE - ptS
 
-      If nInfo3D <> 1 Then
-         ' ruoto il solido intorno al lato di riferimento
-         Dim vtRot As Vector3d = ptERef - ptSRef
-         If nType = 1 Then
-            EgtRotate(Item.PartId, ptE, vtRot, -90, GDB_RT.GLOB)
-         ElseIf nType = 2 Then
-            EgtRotate(Item.PartId, ptE, vtRot, 90, GDB_RT.GLOB)
-         End If
+      ' ruoto il solido intorno al lato di riferimento
+      If nType = ALETTE.A Then
+         EgtRotate(Item.PartId, ptE, vtRot, 90, GDB_RT.GLOB)
+      ElseIf nType = ALETTE.F Then
+         EgtRotate(Item.PartId, ptE, vtRot, -90, GDB_RT.GLOB)
       End If
 
       ' punto di riferimento per la traslazione sul solido
       Dim ptSolid As Point3d
-      If nType = 1 Then
+      If nType = ALETTE.A Then
          ' cerco id della curva che definisce la front face
          Dim nSolidGrp As Integer = EgtGetFirstNameInGroup(Item.PartId, NAME_VM_SOLID)
          Dim nFrontCrvId As Integer = EgtGetFirstInGroup(nSolidGrp)
-         EgtStartPoint(nFrontCrvId, ptSolid)
-      ElseIf nType = 2 Then
-         EgtStartPoint(Item.SideId, ptSolid)
+         EgtStartPoint(nFrontCrvId, GDB_ID.ROOT, ptSolid)
+      ElseIf nType = ALETTE.F Then
+         EgtStartPoint(Item.SideId, GDB_ID.ROOT, ptSolid)
       End If
 
-      Dim ItemFrame As New Frame3d
-      If Not EgtGetGroupGlobFrame(Item.PartId, ItemFrame) Then Return False
-      ptSolid.ToGlob(ItemFrame)
+      ' Dim ItemFrame As New Frame3d
+      ' If Not EgtGetGroupGlobFrame(Item.PartId, ItemFrame) Then Return False
+      ' ptSolid.ToGlob(ItemFrame)
 
       'punto di riferimento per la traslazione sul piano cucina
       Dim ptKitchen As Point3d = ptERef
@@ -1750,6 +1764,16 @@ Friend Module VeinMatching
       Dim vtMove As Vector3d = ptKitchen - ptSolid
       EgtMove(Item.PartId, vtMove, GDB_RT.GLOB)
 
+      ' eventualmente ruoto per allineare l'alzatina al piano cucina
+      Dim dLRef, dAngVRef, dAngHRef As Double
+      vtRotRef.ToSpherical(dLRef, dAngVRef, dAngHRef)
+      Dim dL, dAngV, dAngH As Double
+      vtRot.Rotate(Vector3d.Z_AX, 180)
+      vtRot.ToSpherical(dL, dAngV, dAngH)
+      Dim dDelta As Double = dAngHRef - dAngH
+      If Math.Abs(dDelta) < EPS_ANG_SMALL Then Return True
+      EgtRotate(Item.PartId, ptKitchen, Vector3d.Z_AX, dDelta, GDB_RT.GLOB)
+
       Return True
    End Function
 End Module

InstrumentPanel/InstrumentPanelV.xaml

@@ -1,9 +1,7 @@
-<EgtFloating:EgtFloatingPanel x:Class="InstrumentPanelV"
+<DockPanel x:Class="InstrumentPanelV"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-   xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
-   IsTopDockable="True" IsBottomDockable="False" IsLeftDockable="False"
-   IsRightDockable="False" Style="{StaticResource ToolBar_EgtFloatingPanel}">
+   xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5">
 
       <ToggleButton ToolTip="{Binding GetDistToolTip}"
                     Style="{StaticResource ToolBar_ToggleButton}"
@@ -11,4 +9,4 @@
          <Image Source="/Resources/InstrumentPanel/GetDist.png" Stretch="Uniform"/>
       </ToggleButton>
 
-</EgtFloating:EgtFloatingPanel>
+</DockPanel>

InstrumentPanel/PrintPanelV.xaml

@@ -0,0 +1,12 @@
+<DockPanel x:Class="PrintPanelV"
+   xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+   xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5">
+
+   <Button ToolTip="{Binding PrintToolTip}"
+           Style="{StaticResource ToolBar_Button}"
+           Command="{Binding PrintCommand}">
+      <Image Source="/Resources/InstrumentPanel/Print.png" Stretch="Uniform"/>
+   </Button>
+
+</DockPanel>

InstrumentPanel/PrintPanelV.xaml.vb

@@ -0,0 +1,3 @@
+Public Class PrintPanelV
+
+End Class

InstrumentPanel/PrintPanelVM.vb

@@ -0,0 +1,91 @@
+Imports EgtUILib
+Imports EgtWPFLib5
+Public Class PrintPanelVM
+
+   ' Definizione comandi
+   Private m_cmdPrint As ICommand
+
+   Public ReadOnly Property PrintToolTip As String
+      Get
+         ' "Print shading" & vbCrLf & "Print hidden line (Shift)"
+         Return "Print"
+      End Get
+   End Property
+
+#Region "PrintCommand"
+
+   Public ReadOnly Property PrintCommand As ICommand
+      Get
+         If m_cmdPrint Is Nothing Then
+            m_cmdPrint = New Command(AddressOf Print)
+         End If
+         Return m_cmdPrint
+      End Get
+   End Property
+
+   Public Sub Print(ByVal param As Object)
+      Dim SM_Select As SM = SM.SHADING
+
+      ' Imposto la stampa HiddenLine (non è gestita la stampa WireFrame)
+      'If (Keyboard.Modifiers And ModifierKeys.Shift) > 0 Then
+      '   SM_Select = SM.HIDDENLINE
+      '   EgtSetLineAttribs(3)
+      'End If
+
+      ' Gestione stampa in funzione del della visualizzazione corrente
+      If OmagOFFICEMap.refShowPanelVM.WireframeIsChecked Then
+         SM_Select = SM.WIREFRAME
+         EgtSetLineAttribs(3)
+      ElseIf OmagOFFICEMap.refShowPanelVM.HiddenLineIsChecked Then
+         SM_Select = SM.HIDDENLINE
+         EgtSetLineAttribs(3)
+      End If
+
+      Dim printDlg As New PrintDialog
+      Dim sPath = OmagOFFICEMap.refMainWindowVM.MainWindowM.sTempDir & "\Image.png"
+      If printDlg.ShowDialog() Then
+         ' Recupero le dimensioni dell'area di stampa
+         Dim dW As Double = printDlg.PrintableAreaWidth
+         Dim dH As Double = printDlg.PrintableAreaHeight
+         Try
+            ' Prendo l'immagine corrente per la stampa
+            Dim colWhite As New Color3d(255, 255, 255)
+            ' Recupero le dimensioni correnti della pagina di disegno
+            Dim nImgW As Integer = GetWidthDimProjectV()
+            Dim nImgH As Integer = GetHeightDimProjectV()
+            If Not EgtGetImage(SM_Select, colWhite, colWhite, nImgW, nImgH, sPath) Then
+               ' Error in creating the print image
+               EgtOutLog(EgtMsg(50181))
+               EgtSetLineAttribs(1)
+               Return
+            End If
+            EgtSetLineAttribs(1)
+            'Metodo complesso di stampa che permette di rilasciare il file :
+            'carico la bitmap e la metto in uno stream in memoria
+            Dim stream As System.IO.Stream = New System.IO.MemoryStream()
+            Dim bitmap As System.Drawing.Bitmap = New System.Drawing.Bitmap(sPath)
+            bitmap.Save(stream, System.Drawing.Imaging.ImageFormat.Png)
+            bitmap.Dispose()
+            ' la sposto in una BitmapImage
+            Dim bitImage As New System.Windows.Media.Imaging.BitmapImage()
+            bitImage.BeginInit()
+            bitImage.StreamSource = stream
+            bitImage.EndInit()
+            ' la sposto in un Visual Control
+            Dim tmpImg As New Image
+            tmpImg.BeginInit()
+            tmpImg.Source = bitImage
+            tmpImg.Stretch = Stretch.Uniform
+            tmpImg.EndInit()
+            ' eseguo la stampa
+            printDlg.PrintVisual(tmpImg, "Parts Layout")
+         Catch
+            ' Rrror in executing print
+            EgtOutLog(EgtMsg(50182))
+         End Try
+      End If
+   End Sub
+
+#End Region ' PrintCommand
+
+End Class

MachOptionWindow/MachOptionWindowV.xaml

@@ -28,16 +28,19 @@
       </Grid.RowDefinitions>
 
       <!--Seconda Colonna Terza riga-->
-      <GroupBox Header="{Binding SetUpMsg}" Grid.Column="1" Grid.Row="2">
+      <GroupBox Header="{Binding SetUpMsg}" Grid.Column="1" Grid.Row="2"
+                Style="{StaticResource GroupBoxOptionWnd}">
           <Grid>
               <ComboBox ItemsSource="{Binding ArchivedSetUpList}"
+                        Style="{StaticResource OptionWnd_ComboBox}"
                     SelectedItem="{Binding SelectedDefaultSetUp}"
                     VerticalAlignment="Center"/>
           </Grid>
       </GroupBox>
 
       <!--Seconda colonna Prima Riga-->
-      <GroupBox Header="{Binding HolesMsg}" Grid.Column="1" Grid.Row="0">
+      <GroupBox Header="{Binding HolesMsg}" Grid.Column="1" Grid.Row="0"
+                Style="{StaticResource GroupBoxOptionWnd}">
 
          <Grid>
             <Grid.RowDefinitions>
@@ -75,7 +78,8 @@
 
        <!--Prima Colonna quarta riga - Lista Materiali-->
       <GroupBox Header="{Binding MaterialsMsg}" Grid.Column="0"
-                Grid.Row="3" Grid.RowSpan="5" Visibility="{Binding Materials_Visibility}">
+                Grid.Row="3" Grid.RowSpan="5" Visibility="{Binding Materials_Visibility}"
+                Style="{StaticResource GroupBoxOptionWnd}">
 
          <DockPanel>
 
@@ -116,17 +120,19 @@
                 </Grid>
              
                 <ListBox ItemsSource="{Binding MaterialList}"
-                     SelectedItem="{Binding SelMaterial}"
-                     DisplayMemberPath="sName"
-                     Grid.RowSpan="2"
-                     Margin="0,0,0,5"/>
+                          SelectedItem="{Binding SelMaterial}"
+                          Style="{StaticResource OptionWnd_ListBox}"
+                          DisplayMemberPath="sName"
+                          Grid.RowSpan="2"
+                          Margin="0,0,0,5"/>
             
          </DockPanel>
 
       </GroupBox>
 
        <!--Parametri taglio lama-->
-      <GroupBox Header="{Binding SawParamMsg}" Visibility="{Binding SawParam_Visibility}">
+      <GroupBox Header="{Binding SawParamMsg}" Visibility="{Binding SawParam_Visibility}"
+                Style="{StaticResource GroupBoxOptionWnd}">
          <UniformGrid Columns="2" >
 
             <TextBlock Text="{Binding CutExtraLenMsg}"
@@ -157,7 +163,8 @@
       </GroupBox>
 
        <!--Seconda colonna, seconda riga-->
-      <GroupBox Header="{Binding MachineParamMsg}" Grid.Column="1" Grid.Row="1">
+      <GroupBox Header="{Binding MachineParamMsg}" Grid.Column="1" Grid.Row="1"
+                Style="{StaticResource GroupBoxOptionWnd}">
          <UniformGrid Columns="2">
 
             <TextBlock Text="{Binding SafeZMsg}"
@@ -168,7 +175,8 @@
 
       </GroupBox>
 
-      <GroupBox Header="{Binding MillingParamMsg}" Grid.Column="0" Grid.Row="1" Grid.RowSpan="2">
+      <GroupBox Header="{Binding MillingParamMsg}" Grid.Column="0" Grid.Row="1" Grid.RowSpan="2"
+                Style="{StaticResource GroupBoxOptionWnd}">
          <UniformGrid Rows="3">
             
             <Grid Visibility="{Binding MillingParam_Visibility}">
@@ -194,7 +202,8 @@
       </GroupBox>
 
         <!--Nesting-->
-      <GroupBox Header="{Binding NestingParamMsg}" Grid.Column="1" Grid.Row="3" Grid.RowSpan="2">
+      <GroupBox Header="{Binding NestingParamMsg}" Grid.Column="1" Grid.Row="3" Grid.RowSpan="2"
+                Style="{StaticResource GroupBoxOptionWnd}">
          <UniformGrid Columns="2" >
 
           

MachinePanel/MachinePanelV.xaml

@@ -1,29 +1,25 @@
-<EgtFloating:EgtFloatingPanel x:Class="MachinePanelV"
+<DockPanel x:Class="MachinePanelV"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
-   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-   xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
-   IsTopDockable="True" IsBottomDockable="False" IsLeftDockable="False"
-   IsRightDockable="False"
-   Background="{StaticResource Omag_Gray}" BorderBrush="{StaticResource Omag_Gray}"
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"                          
    IsEnabled="{Binding MachPanel_IsEnabled}">
 
    <!--Combobox per selezionare la macchina corrente--><!--
    <ComboBox ItemsSource="{Binding Path=MachineList}" DisplayMemberPath="Name"
             SelectedItem="{Binding Path=SelectedMachine}" SelectedValuePath="Name"
             Height="20" Width="150"/>-->
-   
-   <Button Command="{Binding ToolDbCommand}" ToolTip="{Binding ToolDBToolTip}"
-           Style="{StaticResource ToolBar_TextButton}" Width="70" Content="{Binding ToolDBMsg}"/>
-   <Button Command="{Binding MachDbCommand}" ToolTip="{Binding MachiningDbToolTip}"
-           Style="{StaticResource ToolBar_TextButton}" Width="70" Content="{Binding MachiningDbMsg}"/>
-   <Button Command="{Binding SetUpCommand}" ToolTip="{Binding SetUpToolTip}"
+
+    <Button Command="{Binding ToolDbCommand}" ToolTip="{Binding ToolDBToolTip}" Style="{StaticResource ToolBar_Button}">
+        <Image Source="/Resources/NewIcons/DB-utensili.png" Stretch="Uniform"/>
+    </Button>
+    <Button Command="{Binding MachDbCommand}" ToolTip="{Binding MachiningDbToolTip}" Style="{StaticResource ToolBar_Button}">
+        <Image Source="/Resources/NewIcons/DB-lavorazioni.png" Stretch="UniformToFill"/>
+    </Button>
+    <Button Command="{Binding MachOptionsCommand}" ToolTip="{Binding OptionsToolTip}" Style="{StaticResource ToolBar_Button}">
+        <Image Source="/Resources/TopCommandBar/Options.png" Stretch="Uniform" />
+    </Button>
+    <Button Command="{Binding SetUpCommand}" ToolTip="{Binding SetUpToolTip}"
            Style="{StaticResource ToolBar_TextButton}" Width="70" Content="{Binding SetUpMsg}"
            Background="{Binding SetUp_Background}"/>
-   <Button Command="{Binding WaterjetDbCommand}" ToolTip="{Binding WaterjetDbToolTip}"
-           Style="{StaticResource ToolBar_Button}" Width="70" Content="{Binding WaterjetDbMsg}" Visibility="{Binding WjDb_Visibility}"/>
-   <Button Command="{Binding MachOptionsCommand}" ToolTip="{Binding OptionsToolTip}">
-      <Image Source="/Resources/TopCommandBar/Options.png" Height="22" />
-   </Button>
-   
-
-</EgtFloating:EgtFloatingPanel>
+    <Button Command="{Binding WaterjetDbCommand}" ToolTip="{Binding WaterjetDbToolTip}"
+           Style="{StaticResource ToolBar_TextButton}" Width="70" Content="{Binding WaterjetDbMsg}" Visibility="{Binding WjDb_Visibility}"/>
+</DockPanel>

MachinePanel/MachinePanelV.xaml.vb

@@ -1,3 +1,4 @@
-Public Class MachinePanelV
+
+Public Class MachinePanelV
 
 End Class

MachinePanel/MyMachinePanelVM.vb

@@ -121,9 +121,70 @@ Public Class MyMachinePanelVM
       End If
 
       Dim ToolDbWindowVM As New ToolDbWindowVM(CurrentMachine.sMachDir, CurrentMachine.sMachIniFile, OmagOFFICEMap.refSceneHostVM.MainScene.GetCtx(), "Stone", OmagOFFICEMap.refMainWindowVM.MainWindowM.nUserLevel > 5)
-      Dim ToolDbWindowV As New ToolDbWindowV(Application.Current.MainWindow, ToolDbWindowVM)
+      ' imposto colori sfondo
+      Dim BackTopColor As New Color3d(192, 192, 192)
+      GetMainPrivateProfileColor(S_SCENE, K_BACKTOP, BackTopColor)
+      Dim BackBotColor As New Color3d(BackTopColor)
+      GetMainPrivateProfileColor(S_SCENE, K_BACKBOTTOM, BackBotColor)
+      ToolDbWindowVM.SetBackgroundColor(BackTopColor, BackBotColor)
+
+      ToolDbWindowVM.bPersonalInterface = True
+
+      ' Collegata allo stile della GroupBox
+      ToolDbWindowVM.MyBorderGrbThickness = 0.25
+      ToolDbWindowVM.MyForegroundGrbColor = Brushes.White
+
+      ' Definisco lo stile della pagina
+      ToolDbWindowVM.BorderBrushIsMouseOver = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.GeneralBorderBrush = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.BorderBrushIsFocused = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.BackgroundBrdEnable = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.BackgroundBrdDisable = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.BackgroundTxBlDisable = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.ForegroundTxBlEnable = Brushes.White
+      ToolDbWindowVM.ForegroundTxBlDisable = Brushes.White
+      ToolDbWindowVM.GeneralForeground = Brushes.White
+      ToolDbWindowVM.GeneralBackground = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+
+      ' Definisco lo stile della ComboBox
+      ToolDbWindowVM.BackgroundCmBxTxBl = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.ForegroundCmBxTxBl = Brushes.White
+      ToolDbWindowVM.BorderThicknessCmBxTxBl = 1.0
+      ToolDbWindowVM.VerticalContentAlignmentCmBxTxBl = "Center"
+      ToolDbWindowVM.HeightCmBxTxBl = "25"
+      ToolDbWindowVM.WidthCmBxTxBl = "Auto"
+      ToolDbWindowVM.ForegroundTextBoxCmBxTxBl = Brushes.White
+
+      'Definisco lo stile del Button
+      ToolDbWindowVM.BackgroundButton = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.ForegroundButton = Brushes.White
+      ToolDbWindowVM.BorderBrushButton = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      ToolDbWindowVM.BorderThicknessButton = 1.0
+
+      ''Definisco lo stile della DataGrid
+      'ToolDbWindowVM.HeaderVisibility = DataGridHeadersVisibility.Column
+      'ToolDbWindowVM.BackgroundDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'ToolDbWindowVM.BackGroundHeader = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'ToolDbWindowVM.ForegroundHeader = Brushes.White
+      'ToolDbWindowVM.BorderBrushHeader = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'ToolDbWindowVM.BorderThicknessHeader = 0.0
+      'ToolDbWindowVM.FontWeightHeader = FontWeights.Bold
+      'ToolDbWindowVM.BackgroundDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'ToolDbWindowVM.BorderBrushDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'ToolDbWindowVM.BackgroundDataGridRow = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'ToolDbWindowVM.ForegroundDataGridRow = Brushes.White
+      'ToolDbWindowVM.BorderBrushDataGridRow = Brushes.DarkGray
+      'ToolDbWindowVM.BorderThicknessDataGridRow = "0 0 0 1"
+      'ToolDbWindowVM.BorderBrushDataGridCell = Brushes.DarkGray
+      'ToolDbWindowVM.BorderThicknessDataGridCell = "0 0 1 0"
+
+      ' Definisco stile New Mach Grouo
+
+
+      ' Dim ToolDbWindowV As New ToolDbWindowV(Application.Current.MainWindow, ToolDbWindowVM)
+      Dim ToolDbWindowV As New MyToolDbWindowV(Application.Current.MainWindow, ToolDbWindowVM)
       If ToolDbWindowVM.MatType <> 0 Then
-         ToolDbWindowV.Height = 640
+         ToolDbWindowV.Height = 768
          ToolDbWindowV.Width = 1024
          ToolDbWindowV.ShowDialog()
       Else
@@ -142,6 +203,7 @@ Public Class MyMachinePanelVM
    ''' </summary>
    Public Overrides Sub MachDb(ByVal param As Object)
       If Not VerifyMachinesDir(m_sMachinesRoot) Then Return
+
       ' ricarico il database per intercettare eventuali aggiornamenti fatti da altre istanze del programma (se la cartella Machines è condivisa)
       If Not EgtMdbReload() Then
          EgtOutLog("Impossible reloading machining Db")
@@ -149,7 +211,60 @@ Public Class MyMachinePanelVM
          Return
       End If
       Dim MachDbWindowVM As New EgtWPFLib5.MachiningDbWindowVM(CurrentMachine.sMachIniFile, OmagOFFICEMap.refSceneHostVM.MainScene.GetCtx(), "Stone", OmagOFFICEMap.refMainWindowVM.MainWindowM.nUserLevel > 5)
-      Dim MachDbWindowV As New EgtWPFLib5.MachiningDbWindowV(Application.Current.MainWindow, MachDbWindowVM)
+      ' Dim MachDbWindowV As New EgtWPFLib5.MachiningDbWindowV(Application.Current.MainWindow, MachDbWindowVM)
+
+      MachDbWindowVM.bPersonalInterface = True
+
+      ' Collegata allo stile della GroupBox
+      MachDbWindowVM.MyBorderGrbThickness = 0.25
+      MachDbWindowVM.MyForegroundGrbColor = Brushes.White
+
+      ' Definisco lo stile della pagina
+      MachDbWindowVM.BorderBrushIsMouseOver = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.GeneralBorderBrush = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.BorderBrushIsFocused = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.BackgroundBrdEnable = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.BackgroundBrdDisable = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.BackgroundTxBlDisable = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.ForegroundTxBlEnable = Brushes.White
+      MachDbWindowVM.ForegroundTxBlDisable = Brushes.White
+      MachDbWindowVM.GeneralForeground = Brushes.White
+      MachDbWindowVM.GeneralBackground = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+
+      ' Definisco lo stile della ComboBox
+      MachDbWindowVM.BackgroundCmBxTxBl = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.ForegroundCmBxTxBl = Brushes.White
+      MachDbWindowVM.BorderThicknessCmBxTxBl = 1.0
+      MachDbWindowVM.VerticalContentAlignmentCmBxTxBl = "Center"
+      MachDbWindowVM.HeightCmBxTxBl = "25"
+      MachDbWindowVM.WidthCmBxTxBl = "Auto"
+      MachDbWindowVM.ForegroundTextBoxCmBxTxBl = Brushes.White
+
+      'Definisco lo stile del ToggleButton
+      MachDbWindowVM.BackgroundIsChecked = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.ForegroundIsChecked = Brushes.White
+      MachDbWindowVM.BorderBrushIsChecked = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      MachDbWindowVM.BorderThicknessIsChecked = 1.0
+      MachDbWindowVM.OpacityIsChecked = 0.25
+
+      'Definisco lo stile della DataGrid
+      'MachDbWindowVM.HeaderVisibility = DataGridHeadersVisibility.Column
+      'MachDbWindowVM.BackgroundDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#484D55"), Brush)
+      'MachDbWindowVM.BackGroundHeader = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#484D55"), Brush)
+      'MachDbWindowVM.ForegroundHeader = Brushes.White
+      'MachDbWindowVM.BorderBrushHeader = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'MachDbWindowVM.BorderThicknessHeader = 0.0
+      'MachDbWindowVM.FontWeightHeader = FontWeights.Bold
+      'MachDbWindowVM.BorderBrushDataGrid = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'MachDbWindowVM.BackgroundDataGridRow = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
+      'MachDbWindowVM.ForegroundDataGridRow = Brushes.White
+      'MachDbWindowVM.BorderBrushDataGridRow = Brushes.DarkGray
+      'MachDbWindowVM.BorderThicknessDataGridRow = "0 0 0 1"
+      'MachDbWindowVM.BorderBrushDataGridCell = Brushes.DarkGray
+      'MachDbWindowVM.BorderThicknessDataGridCell = "0 0 1 0"
+
+      Dim MachDbWindowV As New MyMachiningDbWindowV(Application.Current.MainWindow, MachDbWindowVM)
+
 
       If EgtWPFLib5.MachiningTreeViewItem.m_MatType <> 0 Then
          MachDbWindowV.Height = 768
@@ -206,14 +321,14 @@ Public Class MyMachinePanelVM
       If Not bOkSetUp Then
          SetUp_Background = Brushes.Red
       Else
-         SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+         SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
       End If
       If Not bOkMatThick Then
          OmagOFFICEMap.refOptionPanelVM.RawPart_Background = Brushes.Red
          OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = Brushes.Red
       Else
          OmagOFFICEMap.refOptionPanelVM.RawPart_Background = OmagOFFICEDictionary.TabControl_Header_Background
-         OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+         OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
       End If
    End Sub
 
@@ -252,7 +367,8 @@ Public Class MyMachinePanelVM
       ' Reset lua
       EgtLuaResetGlobVar("STU")
 
-      Dim SetUpWindow As New SetUpWindowV(Application.Current.MainWindow, New MySetUpWindowVM(CurrentMachine.sMachDir, CurrentMachine.sMachineName))
+      ' Dim SetUpWindow As New SetUpWindowV(Application.Current.MainWindow, New MySetUpWindowVM(CurrentMachine.sMachDir, CurrentMachine.sMachineName))
+      Dim SetUpWindow As New MySetUpWindowV(Application.Current.MainWindow, New MySetUpWindowVM(CurrentMachine.sMachDir, CurrentMachine.sMachineName))
       SetUpWindow.Height = 614
       SetUpWindow.Width = 1024
       SetUpWindow.ShowDialog()
@@ -338,7 +454,8 @@ Public Class MyMachinePanelVM
    ''' Execute the Exec.  This method is invoked by the ExecCommand.
    ''' </summary>
    Public Sub WaterjetDb(ByVal param As Object)
-      Dim WaterjetDbWindow As New WaterjetDbWindowV(Application.Current.MainWindow, New WaterjetDbWindowVM(CurrentMachine.sMachDir))
+      ' Dim WaterjetDbWindow As New WaterjetDbWindowV(Application.Current.MainWindow, New WaterjetDbWindowVM(CurrentMachine.sMachDir))
+      Dim WaterjetDbWindow As New MyWaterjetDbWindowV(Application.Current.MainWindow, New WaterjetDbWindowVM(CurrentMachine.sMachDir))
       WaterjetDbWindow.Height = 546
       WaterjetDbWindow.Width = 846
       WaterjetDbWindow.ShowDialog()

MainWindow/MainWindowM.vb

@@ -223,8 +223,8 @@ Public Class MainWindowM
       ' Verifico abilitazione nesting automatico
       m_bAutoNestOption = Not String.IsNullOrWhiteSpace( sNestKey)
       ' Recupero livello e opzioni della chiave
-      Dim bKey As Boolean = EgtGetKeyLevel(9423, 2410, 1, m_nKeyLevel) And
-                            EgtGetKeyOptions(9423, 2410, 1, m_nKeyOptions)
+      Dim bKey As Boolean = EgtGetKeyLevel(9423, 2509, 1, m_nKeyLevel) And
+                            EgtGetKeyOptions(9423, 2509, 1, m_nKeyOptions)
       ' Verifico abilitazione prodotto
       Dim bProd As Boolean = GetKeyOption(KEY_OPT.OFFICE_BASE)
       ' Inizializzazione generale di EgtInterface

MainWindow/MainWindowV.xaml

@@ -4,24 +4,25 @@
    xmlns:OmagOFFICE="clr-namespace:OmagOFFICE"
    xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
    DataContext="{StaticResource MainWindowVM}"
-   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
+   Style="{DynamicResource MainWindowStyle}"
    Title="{Binding Title}" Icon="/Resources/OmagOFFICE.ico"
    MinHeight="600" MinWidth="800"
    AboutBoxCommand="{Binding AboutBoxCommand}" WindowStyle="None" ResizeMode="NoResize"
-   CloseCommand="{Binding CloseApplicationCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}">
+   CloseCommand="{Binding CloseApplicationCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}"
+                            Background="{StaticResource Omag_DarkGray}">
    <EgtWPFLib5:EgtCustomWindow.TitlePanel>
       <OmagOFFICE:TopCommandBarV DataContext="{StaticResource TopCommandBarVM}"/>
    </EgtWPFLib5:EgtCustomWindow.TitlePanel>
 
    <!--Pannello principale -->
-   <DockPanel>
+    <DockPanel>
 
-      <!--StatusBar -->
-      <OmagOFFICE:StatusBarV DataContext="{StaticResource StatusBarVM}"
+        <!--StatusBar -->
+        <OmagOFFICE:StatusBarV DataContext="{StaticResource StatusBarVM}"
                              DockPanel.Dock="Bottom"/>
-      <!--Progetto corrente -->
-      <OmagOFFICE:ProjectV DataContext="{StaticResource ProjectVM}"/>
+        <!--Progetto corrente -->
+        <OmagOFFICE:ProjectV DataContext="{StaticResource ProjectVM}"/>
+
+    </DockPanel>
 
-   </DockPanel>
-   
 </EgtWPFLib5:EgtCustomWindow>

My Project/AssemblyInfo.vb

@@ -29,8 +29,8 @@ Imports System.Windows
 #End If
 #End If
 <Assembly: AssemblyCompany("Egalware s.r.l.")> 
-<Assembly: AssemblyProduct("OmagOFFICE")> 
-<Assembly: AssemblyCopyright("Copyright ©  2017-2022 by Egalware s.r.l.")> 
+<Assembly: AssemblyProduct("OmagOFFICE")>
+<Assembly: AssemblyCopyright("Copyright ©  2017-2023 by Egalware s.r.l.")>
 <Assembly: AssemblyTrademark("")> 
 <Assembly: ComVisible(false)>
 'In order to begin building localizable applications, set 
@@ -69,6 +69,6 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.4.10.1")>
-<Assembly: AssemblyFileVersion("2.4.10.1")>
+<Assembly: AssemblyVersion("2.5.9.5")>
+<Assembly: AssemblyFileVersion("2.5.9.5")>
 

My Project/app.manifest

@@ -0,0 +1,79 @@
+<?xml version="1.0" encoding="utf-8"?>
+<assembly manifestVersion="1.0" xmlns="urn:schemas-microsoft-com:asm.v1">
+  <assemblyIdentity version="1.0.0.0" name="MyApplication.app"/>
+  <trustInfo xmlns="urn:schemas-microsoft-com:asm.v2">
+    <security>
+      <requestedPrivileges xmlns="urn:schemas-microsoft-com:asm.v3">
+        <!-- Opzioni manifesto di Controllo dell'account utente
+             Per modificare il livello di Controllo dell'account utente di Windows, sostituire il 
+             nodo requestedExecutionLevel con uno dei seguenti.
+
+        <requestedExecutionLevel  level="asInvoker" uiAccess="false" />
+        <requestedExecutionLevel  level="requireAdministrator" uiAccess="false" />
+        <requestedExecutionLevel  level="highestAvailable" uiAccess="false" />
+
+            Se si specifica l'elemento requestedExecutionLevel, la funzionalità Virtualizzazione file system e registro di sistema verrà disabilitata. 
+            Rimuovere questo elemento se l'applicazione richiede questa virtualizzazione per
+            compatibilità con le versioni precedenti.
+        -->
+        <requestedExecutionLevel level="asInvoker" uiAccess="false" />
+      </requestedPrivileges>
+    </security>
+  </trustInfo>
+
+  <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
+    <application>
+      <!-- Elenco delle versioni di Windows in cui è stata testata questa applicazione e
+           per cui è stato previsto l'uso. Rimuovere il commento dagli elementi appropriati per
+           fare in modo che Windows selezioni automaticamente l'ambiente più compatibile. -->
+
+      <!-- Windows Vista -->
+      <!--<supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}" />-->
+
+      <!-- Windows 7 -->
+      <!--<supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}" />-->
+
+      <!-- Windows 8 -->
+      <!--<supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}" />-->
+
+      <!-- Windows 8.1 -->
+      <!--<supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}" />-->
+
+      <!-- Windows 10 -->
+      <!--<supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}" />-->
+
+    </application>
+  </compatibility>
+
+  <!-- Indica che l'applicazione è sensibile ai valori DPI e non verrà scalata automaticamente da Windows in caso di
+       valori DPI maggiori. Le applicazioni Windows Presentation Foundation (WPF) sono automaticamente sensibili ai valori DPI, pertanto non è necessario 
+       acconsentire esplicitamente. Con le applicazioni Windows Forms destinate a .NET Framework 4.6 per cui è stato acconsentito esplicitamente a questa impostazione, 
+       è anche necessario impostare 'EnableWindowsFormsHighDpiAutoResizing' su 'true' nel relativo file app.config. 
+       
+       Imposta l'applicazione in modo riconosca i percorsi lunghi. Vedere https://docs.microsoft.com/windows/win32/fileio/maximum-file-path-limitation -->
+  <!--
+  <application xmlns="urn:schemas-microsoft-com:asm.v3">
+    <windowsSettings>
+      <dpiAware xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">true</dpiAware>
+      <longPathAware xmlns="http://schemas.microsoft.com/SMI/2016/WindowsSettings">true</longPathAware>
+    </windowsSettings>
+  </application>
+  -->
+
+  <!-- Abilita i temi per finestre di dialogo e controlli comuni di Windows (Windows XP e versioni successive) -->
+  <!--
+  <dependency>
+    <dependentAssembly>
+      <assemblyIdentity
+          type="win32"
+          name="Microsoft.Windows.Common-Controls"
+          version="6.0.0.0"
+          processorArchitecture="*"
+          publicKeyToken="6595b64144ccf1df"
+          language="*"
+        />
+    </dependentAssembly>
+  </dependency>
+  -->
+
+</assembly>

MyMachGroupPanel/MyMachGroupPanelV.xaml

@@ -0,0 +1,109 @@
+<UserControl x:Class="MyMachGroupPanelV"
+             xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+             xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+             xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
+             Visibility="{Binding MachGroupPanel_Visibility}">
+
+    <!--<EgtFloating:EgtFloatingPanel.Resources>
+        <SolidColorBrush x:Key="ListBox.Static.Background" Color="#FFFFFFFF"/>
+        <SolidColorBrush x:Key="ListBox.Static.Border" Color="#FFABADB3"/>
+        <SolidColorBrush x:Key="ListBox.Disabled.Background" Color="#FFFFFFFF"/>
+        <SolidColorBrush x:Key="ListBox.Disabled.Border" Color="#FFD9D9D9"/>
+        <Style x:Key="MachiningGroupListBox" TargetType="{x:Type ListBox}">
+            <Setter Property="Background" Value="Transparent"/>
+            <Setter Property="BorderBrush" Value="Transparent"/>
+            <Setter Property="BorderThickness" Value="0"/>
+            <Setter Property="Foreground" Value="{DynamicResource {x:Static SystemColors.ControlTextBrushKey}}"/>
+            <Setter Property="ScrollViewer.HorizontalScrollBarVisibility" Value="Auto"/>
+            <Setter Property="ScrollViewer.VerticalScrollBarVisibility" Value="Hidden"/>
+            <Setter Property="ScrollViewer.CanContentScroll" Value="False"/>
+            <Setter Property="ScrollViewer.PanningMode" Value="Both"/>
+            <Setter Property="Stylus.IsFlicksEnabled" Value="False"/>
+            <Setter Property="VerticalContentAlignment" Value="Center"/>
+        </Style>
+    </EgtFloating:EgtFloatingPanel.Resources>-->
+
+    <Grid Margin="5">
+        <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="Auto"/>
+            <ColumnDefinition Width="Auto"/>
+        </Grid.ColumnDefinitions>
+
+        <ListBox ItemsSource="{Binding MachGroupList}" SelectedItem="{Binding SelectedMachGroup}" 
+                 Background="Transparent" BorderThickness="0"> 
+            <ListBox.ItemsPanel>
+                <ItemsPanelTemplate>
+                    <VirtualizingStackPanel IsItemsHost="True" Orientation="Horizontal"/>
+                </ItemsPanelTemplate>
+            </ListBox.ItemsPanel>
+            <ListBox.ItemContainerStyle>
+                <Style TargetType="ListBoxItem">
+                    <Setter Property="IsEnabled" Value="{Binding IsEnabled}"/>
+                    <Setter Property="Template">
+                        <Setter.Value>
+                            <ControlTemplate TargetType="ListBoxItem">
+                                <ContentPresenter/>
+                            </ControlTemplate>
+                        </Setter.Value>
+                    </Setter>
+                </Style>
+            </ListBox.ItemContainerStyle>
+            <ListBox.ItemTemplate>
+                <DataTemplate>
+                    <RadioButton GroupName="MachiningGroups"
+                                 Height="30" MaxWidth="150" MinWidth="50" Padding="5,0,5,0"
+                                 ToolTip="{Binding MachGroupToolTip}"
+                                 IsChecked="{Binding Path=IsSelected,
+                                      RelativeSource={RelativeSource AncestorType={x:Type ListBoxItem}},
+                                                      Mode=TwoWay}"
+                                 IsEnabled="{Binding IsEnabled, Mode=TwoWay}"
+                                 VerticalContentAlignment="Center" HorizontalContentAlignment="Center"
+                                 Style="{StaticResource ToolBar_TextToggleButton}">
+                        <RadioButton.Content>
+                            <TextBlock Text="{Binding Name}" Foreground="white"/>
+                        </RadioButton.Content>
+
+                    </RadioButton>
+                </DataTemplate>
+            </ListBox.ItemTemplate>
+            <ListBox.Template>
+                <ControlTemplate TargetType="{x:Type ListBox}">
+                    <Border x:Name="Bd" BorderBrush="{TemplateBinding BorderBrush}" BorderThickness="{TemplateBinding BorderThickness}" Background="{TemplateBinding Background}" Padding="0" SnapsToDevicePixels="true">
+                        <EgtWPFLib5:EgtScrollViewer IsPageSlideCommand="True" Focusable="false" Padding="{TemplateBinding Padding}" IsCustom="True" Orientation="Horizontal" RepeatButtonDimension="20">
+                            <ItemsPresenter SnapsToDevicePixels="{TemplateBinding SnapsToDevicePixels}"/>
+                        </EgtWPFLib5:EgtScrollViewer>
+                    </Border>
+                    <ControlTemplate.Triggers>
+                        <Trigger Property="IsEnabled" Value="false">
+                            <Setter Property="Background" TargetName="Bd" Value="DeepPink"/>
+                            <Setter Property="BorderBrush" TargetName="Bd" Value="LightPink"/>
+                        </Trigger>
+                        <MultiTrigger>
+                            <MultiTrigger.Conditions>
+                                <Condition Property="IsGrouping" Value="true"/>
+                                <!--<Condition Property="VirtualizingPanel.IsVirtualizingWhenGrouping" Value="false"/>-->
+                            </MultiTrigger.Conditions>
+                            <Setter Property="ScrollViewer.CanContentScroll" Value="false"/>
+                        </MultiTrigger>
+                    </ControlTemplate.Triggers>
+                </ControlTemplate>
+            </ListBox.Template>
+        </ListBox>
+
+        <Button Content="+" Height="20" Width="20" VerticalAlignment="Center" Focusable="False"
+                Background="{StaticResource Omag_Black}"
+                Foreground="{StaticResource Omag_White}"
+                Padding="0,0,0,5"
+              Margin="3,0,5,0" Command="{Binding AddMachGroupCommand}" Grid.Column="1"
+              IsEnabled="{Binding IsEnabledAddRemove}"/>
+        <Button Content="-" Height="20" Width="20" VerticalAlignment="Center" Focusable="False"
+                Background="{StaticResource Omag_Black}"
+                Foreground="{StaticResource Omag_White}"
+                Padding="0,0,0,5"
+              Margin="0,0,5,0" Command="{Binding RemoveMachGroupCommand}" Grid.Column="2"
+              IsEnabled="{Binding IsEnabledAddRemove}"/>
+
+    </Grid>
+
+</UserControl>

MyMachGroupPanel/MyMachGroupPanelV.xaml.vb

@@ -0,0 +1,3 @@
+Public Class MyMachGroupPanelV
+
+End Class

MyMachGroupPanel/MyMachGroupPanelVM.vb

@@ -189,6 +189,10 @@ Public Class MyMachGroupPanelVM
       End If
       ' Verifico che gli utensili delle lavorazioni correnti siano attrezzati (necessario perchè potrei aver cambiato gli utensili delle lavorazioni)
       ' e che le lavorazioni correnti siano compatibili con materiale e spessore
+
+      ' Inizializzo l'elenco delle lavorazioni correnti
+      Dim CurrMachining As New CurrMachWindowVM
+
       ' Lama
       Dim bOkCurrSawing As Boolean = True
       Dim bOkCurrWaterjetting As Boolean = True
@@ -229,23 +233,24 @@ Public Class MyMachGroupPanelVM
       Else
          bOkCurrWaterjetting = False
       End If
-
+      ' Imposto il colore del pulsante SetUp 
       If Not bOkSetUp Then
          OmagOFFICEMap.refMachinePanelVM.SetUp_Background = Brushes.Red
       Else
-         OmagOFFICEMap.refMachinePanelVM.SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+         OmagOFFICEMap.refMachinePanelVM.SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
       End If
+      ' Imposto il colore di sfondo del pulsante SettingMachinig
       If Not bOkMatThick Or Not bOkCurrSawing Then
          If Not bOkMatThick Or Not bOkCurrWaterjetting Then
             OmagOFFICEMap.refOptionPanelVM.RawPart_Background = Brushes.Red
             OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = Brushes.Red
          Else
             OmagOFFICEMap.refOptionPanelVM.RawPart_Background = OmagOFFICEDictionary.TabControl_Header_Background
-            OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+            OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
          End If
       Else
          OmagOFFICEMap.refOptionPanelVM.RawPart_Background = OmagOFFICEDictionary.TabControl_Header_Background
-         OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+         OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
       End If
 
       ' Se non esiste il grezzo vado subito alla sua definizione

MyMachiningDbWindow/MyMachiningDbWindowV.xaml

@@ -92,38 +92,70 @@
         <sys:Int32 x:Key="LpTurns">69</sys:Int32>
         <sys:Int32 x:Key="HpTurns">70</sys:Int32>
         <sys:Int32 x:Key="ThicknessFeed">71</sys:Int32>
+        <SolidColorBrush x:Key="ListBorder" Color="#828790"/>
     </EgtWPFLib5:EgtCustomWindow.Resources>
 
-    <Grid>
+    <Grid Background="Transparent">
         <Grid.ColumnDefinitions>
-            <ColumnDefinition Width="0.75*"/>
+            <ColumnDefinition Width="0.95*"/>
             <ColumnDefinition Width="2*"/>
             <ColumnDefinition Width="1*"/>
         </Grid.ColumnDefinitions>
 
-        <Grid>
+        <Grid Background="Transparent">
             <Grid.RowDefinitions>
-                <RowDefinition Height="1*"/>
-                <RowDefinition Height="11*"/>
+                <RowDefinition Height="0.75*"/>
+                <RowDefinition Height="12*"/>
             </Grid.RowDefinitions>
 
-            <UniformGrid Grid.Row="0" Columns="3">
-                <Button Content="New" Command="{Binding NewCommand}"
+            <UniformGrid Grid.Row="0" Columns="8">
+                <Button ToolTip="New" Command="{Binding NewCommand}"
                CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
-               IsEnabled="{Binding IsEnabledNewBtn, Mode=OneWay}"/>
-                <Button Content="Save" Command="{Binding SaveCommand}"
+               IsEnabled="{Binding IsEnabledNewBtn, Mode=OneWay}"              
+               Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/New.png" Stretch="Uniform"/>
+                </Button>
+                <Button ToolTip="Save" Command="{Binding SaveCommand}"
                CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
-               IsEnabled="{Binding IsEnabledSaveBtn, Mode=OneWay}"/>
-                <Button Content="Remove" Command="{Binding RemoveCommand}"
+               IsEnabled="{Binding IsEnabledSaveBtn, Mode=OneWay}"        
+               Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Save.png" Stretch="Uniform"/>
+                </Button>
+                <Button ToolTip="Remove" Command="{Binding RemoveCommand}"
                CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
-               IsEnabled="{Binding IsEnabledRemoveBtn, Mode=OneWay}"/>
+               IsEnabled="{Binding IsEnabledRemoveBtn, Mode=OneWay}"        
+               Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Remove.png" Stretch="Uniform"/>
+                </Button>
+
+                <Button ToolTip="Import" Command="{Binding ImportCommand}"
+               CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
+               IsEnabled="{Binding IsEnabledNewBtn, Mode=OneWay}"         
+               Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Import.png" Stretch="Uniform"/>
+                </Button>
+                <Button ToolTip="Export" Command="{Binding ExportCommand}"
+               CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
+               IsEnabled="{Binding IsEnabledSaveBtn, Mode=OneWay}"       
+               Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Export_1.png" Stretch="Uniform"/>
+                </Button>
+                <Button ToolTip="Reset" Command="{Binding ReloadMachiningCommand}"
+               CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
+               IsEnabled="{Binding IsEnabledRemoveBtn, Mode=OneWay}"      
+               Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Reset.png" Stretch="Uniform"/>
+                </Button>
             </UniformGrid>
 
-            <TreeView Name="MachiningsTreeView" Grid.Row="1"
-            ItemsSource="{Binding Path=MachiningsList}">
 
+            <TreeView Name="MachiningsTreeView" Grid.Row="1"
+                      Background="Transparent" BorderThickness="0"
+                      ItemsSource="{Binding Path=MachiningsList}">
                 <TreeView.ItemContainerStyle>
                     <Style TargetType="{x:Type TreeViewItem}">
+                        <Setter Property="FontSize" Value="10" />
+                        <Setter Property="Foreground" Value="{StaticResource Omag_White}" />
                         <Setter Property="IsSelected" Value="{Binding IsSelected, Mode=TwoWay}" />
                         <Setter Property="IsExpanded" Value="{Binding IsExpanded, Mode=TwoWay}" />
                         <Setter Property="IsEnabled" Value="{Binding IsEnabled, Mode=TwoWay}" />
@@ -133,23 +165,23 @@
                 <TreeView.Resources>
                     <HierarchicalDataTemplate DataType="{x:Type EgtWPFLib5:FamilyMachiningTreeViewItem}" ItemsSource="{Binding Items}">
 
-                        <Grid >
+                        <Grid  Background="Transparent">
                             <Grid.ColumnDefinitions>
                                 <ColumnDefinition Width="Auto"/>
                                 <ColumnDefinition Width="1*"/>
                                 <ColumnDefinition Width="Auto"/>
                             </Grid.ColumnDefinitions>
 
-                            <Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Width="32" Margin="0,8,6,4" />
-                            <TextBlock Grid.Column="1" Text="{Binding Name}" FontSize="15" Margin="10" />
+                            <Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Width="32" Margin="0" />
+                            <TextBlock Grid.Column="1" Text="{Binding Name}" FontSize="15" Margin="5,0,10,0" VerticalAlignment="Center" HorizontalAlignment="left" />
                             <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding FamilyColor}" />
 
                         </Grid>
 
                     </HierarchicalDataTemplate>
-
+                    
                     <DataTemplate DataType="{x:Type EgtWPFLib5:MachiningTreeViewItem}">
-                        <Grid >
+                        <Grid  Background="Transparent">
                             <Grid.ColumnDefinitions>
                                 <ColumnDefinition Width="Auto"/>
                                 <ColumnDefinition Width="1*"/>
@@ -157,14 +189,17 @@
                             </Grid.ColumnDefinitions>
 
                             <!--<Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Margin="0,8,6,4" />-->
-                            <TextBlock Grid.Column="1" Text="{Binding NamePar}" Height="18" FontSize="15"  Margin="10"/>
+                            <TextBlock Grid.Column="1" Text="{Binding NamePar}" Height="21" FontSize="13"  Margin="30,0,10,0"
+                                       VerticalAlignment="Center" HorizontalAlignment="left"/>
                             <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding ToolColor}" />
 
                         </Grid>
+
                     </DataTemplate>
                 </TreeView.Resources>
-
+                
             </TreeView>
+            
 
         </Grid>
 

MyMachiningDbWindow/MyMachiningDbWindowV.xaml.vb

@@ -1,21 +1,21 @@
-'Imports EgtWPFLib5
+Imports EgtWPFLib5
 
 Public Class MyMachiningDbWindowV
 
-   '   Private WithEvents m_MachiningDbWindowVM As MyMachiningDbWindowVM
+   Private WithEvents m_MachiningDbWindowVM As EgtWPFLib5.MachiningDbWindowVM
 
-   '   Sub New(Owner As Window, MachiningDbWindowVM As MyMachiningDbWindowVM)
-   '      MyBase.New(Owner)
-   '      ' This call is required by the designer.
-   '      InitializeComponent()
-   '      Me.DataContext = MachiningDbWindowVM
-   '      ' Assegno al riferimento locale al VM il VM preso dal DataContext
-   '      m_MachiningDbWindowVM = MachiningDbWindowVM
-   '   End Sub
+   Sub New(Owner As Window, MachiningDbWindowVM As EgtWPFLib5.MachiningDbWindowVM)
+      MyBase.New(Owner)
+      ' This call is required by the designer.
+      InitializeComponent()
+      Me.DataContext = MachiningDbWindowVM
+      ' Assegno al riferimento locale al VM il VM preso dal DataContext
+      m_MachiningDbWindowVM = MachiningDbWindowVM
+   End Sub
 
-   '   Private Sub CloseWindow(bDialogResult As Boolean) Handles m_MachiningDbWindowVM.m_CloseWindow
-   '      Me.DataContext = Nothing
-   '      Me.DialogResult = bDialogResult
-   '   End Sub
+   Private Sub CloseWindow(bDialogResult As Boolean) Handles m_MachiningDbWindowVM.m_CloseWindow
+      Me.DataContext = Nothing
+      Me.DialogResult = bDialogResult
+   End Sub
 
 End Class

MySceneHost/MySceneHostVM.vb

@@ -152,17 +152,19 @@ Public Class MySceneHostVM
       MainScene.SetSnapPointType(SP.PT_SKETCH)
    End Sub
 
-   Public Overrides Sub SaveProject()
-      MyBase.SaveProject()
+   Public Overrides Function SaveProject() As Boolean
+      Dim bOk As Boolean = MyBase.SaveProject()
       ' Imposto stato gestione mouse diretto della scena a nessuno
       MainScene.SetStatusNull()
-   End Sub
+      Return bOk
+   End Function
 
-   Public Overrides Sub SaveAsProject()
-      MyBase.SaveAsProject()
+   Public Overrides Function SaveAsProject() As Boolean
+      Dim bOk As Boolean = MyBase.SaveAsProject()
       ' Imposto stato gestione mouse diretto della scena a nessuno
       MainScene.SetStatusNull()
-   End Sub
+      Return bOk
+   End Function
 
    Private Function GetMachineBaseDirs() As String
       ' Trasformo l'elenco dei direttori radice macchina in una stringa del tipo "..\Dir1\Example01|..\Dir2\|Example02"
@@ -183,7 +185,7 @@ Public Class MySceneHostVM
 
 #Region "ProjectManager"
 
-   Public Overrides Sub NewProject()
+   Public Overrides Function NewProject() As Boolean
       EgtSetCurrentContext(MainScene.GetCtx())
       Dim bOk As Boolean = MainController.NewProject()
       ' Eventuale reset VM
@@ -191,9 +193,10 @@ Public Class MySceneHostVM
          VeinMatching.Clear()
       End If
       MainScene.SetStatusNull()
-   End Sub
+      Return bOk
+   End Function
 
-   Public Overrides Sub OpenProject(sFilePath As String)
+   Public Overrides Function OpenProject(sFilePath As String) As Boolean
       EgtSetCurrentContext(MainScene.GetCtx())
       Dim bOk As Boolean = False
       If String.IsNullOrEmpty(sFilePath) Then
@@ -216,33 +219,38 @@ Public Class MySceneHostVM
          Dim sVmFile As String = Path.ChangeExtension(sFile, ".vme")
          VeinMatching.Open(sVmFile)
       End If
-   End Sub
+      Return bOk
+   End Function
 
-   Public Overrides Sub ExportProject()
+   Public Overrides Function ExportProject() As Boolean
+      Dim bOk As Boolean = False
       EgtSetCurrentContext(MainScene.GetCtx())
       ' Verifico che il progetto sia salvato
       If EgtGetModified() Then
-         MessageBox.Show(EgtMsg( 91501), "", MessageBoxButton.OK, MessageBoxImage.Exclamation)
-         Return
+         MessageBox.Show(EgtMsg(91501), "", MessageBoxButton.OK, MessageBoxImage.Exclamation)
+         Return bOk
       End If
       ' Scelta del direttorio di destinazione
       Dim sLastExportDir As String = String.Empty
       GetMainPrivateProfileString(S_GENERAL, K_EXPORTDIR, "", sLastExportDir)
       Dim DirDlg As New System.Windows.Forms.FolderBrowserDialog
-      DirDlg.Description = EgtMsg( 91502)   ' Seleziona il direttorio di esportazione
+      DirDlg.Description = EgtMsg(91502)   ' Seleziona il direttorio di esportazione
       DirDlg.SelectedPath = sLastExportDir
-      If DirDlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return
+      If DirDlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return bOk
       WriteMainPrivateProfileString(S_GENERAL, K_EXPORTDIR, DirDlg.SelectedPath)
       ' Eseguo esportazione
-      If ExecExport(DirDlg.SelectedPath) Then
+      bOk = ExecExport(DirDlg.SelectedPath)
+      If bOk Then
          ' Esportazione conclusa con successo
-         OmagOFFICEMap.refStatusBarVM.SetOutputMessage( EgtMsg( 91504), 5, MSG_TYPE.INFO)
+         OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(91504), 5, MSG_TYPE.INFO)
+         bOk = True
       Else
          ' Errore nell'esportazione
-         MessageBox.Show( EgtMsg( 91503), "", MessageBoxButton.OK, MessageBoxImage.Error)
+         MessageBox.Show(EgtMsg(91503), "", MessageBoxButton.OK, MessageBoxImage.Error)
       End If
       EgtSetCurrentContext(MainScene.GetCtx())
-   End Sub
+      Return bOk
+   End Function
 
    Private Function ExecExport(sDirDest As String) As Boolean
       ' salvo il nome della macchina correntemente selezionata
@@ -388,31 +396,33 @@ Public Class MySceneHostVM
       Return bOk
    End Function
 
-   Public Sub DxfOutProject()
+   Public Function DxfOutProject() As Boolean
       EgtSetCurrentContext(MainScene.GetCtx())
       ' Verifico che il progetto sia salvato
       If EgtGetModified() Then
-         MessageBox.Show(EgtMsg( 91501), "", MessageBoxButton.OK, MessageBoxImage.Exclamation)
-         Return
+         MessageBox.Show(EgtMsg(91501), "", MessageBoxButton.OK, MessageBoxImage.Exclamation)
+         Return False
       End If
       ' Scelta del direttorio di destinazione
       Dim sLastDxfOutDir As String = String.Empty
       GetMainPrivateProfileString(S_GENERAL, K_DXFOUTDIR, "", sLastDxfOutDir)
       Dim DirDlg As New System.Windows.Forms.FolderBrowserDialog
-      DirDlg.Description = EgtMsg( 91502)   ' Seleziona il direttorio di esportazione
+      DirDlg.Description = EgtMsg(91502)   ' Seleziona il direttorio di esportazione
       DirDlg.SelectedPath = sLastDxfOutDir
-      If DirDlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return
+      If DirDlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return False
       WriteMainPrivateProfileString(S_GENERAL, K_DXFOUTDIR, DirDlg.SelectedPath)
       ' Eseguo esportazione
-      If ExecDxfOut(DirDlg.SelectedPath) Then
+      Dim bOk As Boolean = ExecDxfOut(DirDlg.SelectedPath)
+      If bOk Then
          ' Esportazione conclusa con successo
-         OmagOFFICEMap.refStatusBarVM.SetOutputMessage( EgtMsg( 91504), 5, MSG_TYPE.INFO)
+         OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(91504), 5, MSG_TYPE.INFO)
       Else
          ' Errore nell'esportazione
-         MessageBox.Show( EgtMsg( 91503), "", MessageBoxButton.OK, MessageBoxImage.Error)
+         MessageBox.Show(EgtMsg(91503), "", MessageBoxButton.OK, MessageBoxImage.Error)
       End If
       EgtSetCurrentContext(MainScene.GetCtx())
-   End Sub
+      Return bOk
+   End Function
 
    Private Function ExecDxfOut(sDirDest As String) As Boolean
       ' Path completa del progetto corrente

MySetUpWindow/MySetUpWindowV.xaml

@@ -0,0 +1,200 @@
+<EgtWPFLib5:EgtCustomWindow x:Class="MySetUpWindowV"
+   xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+   xmlns:sys="clr-namespace:System;assembly=mscorlib"
+   xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
+   Title="{Binding Title}"
+   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
+   WindowStyle="None" ResizeMode="NoResize" TitleBarHeight="30" IsResizable="False"
+   IsMinimizable="False" WindowStartupLocation="CenterOwner" ShowInTaskbar="False"
+   CloseCommand="{Binding CloseSetUpCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}"
+   CloseCommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
+   Height="900">
+    <EgtWPFLib5:EgtCustomWindow.InputBindings>
+        <KeyBinding Key="Escape" Command="{Binding ReloadToolCommand}"
+         CommandParameter="{Binding Path=SelectedItem,ElementName=ToolsTreeView}"/>
+    </EgtWPFLib5:EgtCustomWindow.InputBindings>
+
+    <Grid Background="Transparent">
+        <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="0.95*"/>
+            <ColumnDefinition Width="2*"/>
+            <ColumnDefinition Width="1*"/>
+        </Grid.ColumnDefinitions>
+
+        <Grid Background="Transparent">
+            <Grid.RowDefinitions>
+                <RowDefinition Height="0.75*"/>
+                <RowDefinition Height="12*"/>
+            </Grid.RowDefinitions>
+
+            <UniformGrid Grid.Row="0" Columns="8">
+                <Button ToolTip="{Binding ApplyMsg}" Command="{Binding ApplyCommand}"
+                        IsEnabled="{Binding IsEnabledApplyBtn}"              
+                        Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Export_1.png" Stretch="Uniform"/>
+                </Button>
+                <Button ToolTip="{Binding ArchiveMsg}" Command="{Binding ArchiveCommand}"       
+                        Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Insert.png" Stretch="Uniform"/>
+                </Button>
+                <Button ToolTip="{Binding RetrievesMsg}" Command="{Binding RetrievesCommand}"
+                        CommandParameter="{Binding SelectedItem,ElementName=ToolsTreeView}" 
+                        Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Open.png" Stretch="Uniform"/>
+                </Button>
+                <Button ToolTip="{Binding AutomaticMsg}" Command="{Binding AutomaticCommand}"
+                        CommandParameter="{Binding SelectedItem,ElementName=ToolsTreeView}"        
+                        Style = "{DynamicResource MachiningDB_Button}">
+                    <Image Source="/Resources/TopCommandBar/Automatic.png" Stretch="Uniform"/>
+                </Button>
+            </UniformGrid>
+
+
+            <TreeView Name="SetUpTreeView" Grid.Row="1"
+                      Background="Transparent" BorderThickness="0"
+                      ItemsSource="{Binding ToolsList}">
+                <TreeView.ItemContainerStyle>
+                    <Style TargetType="{x:Type TreeViewItem}">
+                        <Setter Property="FontSize" Value="10" />
+                        <Setter Property="Foreground" Value="{StaticResource Omag_White}" />
+                        <Setter Property="IsSelected" Value="{Binding IsSelected, Mode=TwoWay}" />
+                        <Setter Property="IsExpanded" Value="{Binding IsExpanded, Mode=TwoWay}" />
+                        <Setter Property="IsEnabled" Value="{Binding IsEnabled, Mode=TwoWay}" />
+                        <EventSetter Event="MouseDoubleClick" Handler="Tool_DoubleClick"/>
+               </Style>
+                </TreeView.ItemContainerStyle>
+
+                <TreeView.Resources>
+                    <HierarchicalDataTemplate DataType="{x:Type EgtWPFLib5:FamilyToolItem}" 
+                                              ItemsSource="{Binding Items}">
+
+                        <Grid  Background="Transparent">
+                            <Grid.ColumnDefinitions>
+                                <ColumnDefinition Width="Auto"/>
+                                <ColumnDefinition Width="1*"/>
+                                <ColumnDefinition Width="Auto"/>
+                            </Grid.ColumnDefinitions>
+
+                            <Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Width="32" Margin="0"/>
+                            <TextBlock Grid.Column="1" Text="{Binding Name}" FontSize="15" Margin="5,0,10,0" VerticalAlignment="Center" HorizontalAlignment="left" />
+                            <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding FamilyColor}"/>
+                        </Grid>
+
+                    </HierarchicalDataTemplate>
+
+                    <DataTemplate DataType="{x:Type EgtWPFLib5:ToolItem}">
+                        <Grid  Background="Transparent">
+                            <Grid.ColumnDefinitions>
+                                <ColumnDefinition Width="Auto"/>
+                                <ColumnDefinition Width="1*"/>
+                                <ColumnDefinition Width="Auto"/>
+                            </Grid.ColumnDefinitions>
+
+
+                            <!--<Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Margin="0,8,6,4" />-->
+                            <TextBlock Grid.Column="1" Text="{Binding Name}" Height="21" FontSize="13"  Margin="30,0,10,0"
+                                       VerticalAlignment="Center" HorizontalAlignment="left"/>
+                            <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding ToolColor}" />
+
+                        </Grid>
+
+                    </DataTemplate>
+                </TreeView.Resources>
+            </TreeView>
+        </Grid>
+
+        <Grid Grid.Column="1">
+            <Grid.ColumnDefinitions>
+                <ColumnDefinition Width="Auto"/>
+                <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+
+            <Image Source="{Binding SetUpImage}" MaxWidth="300"/>
+
+            <!--Style="{DynamicResource HorizontalScrollViewerItemsControlStyle}"-->
+            <ItemsControl Grid.Column="1" ItemsSource="{Binding PositionGroupList}">
+                <ItemsControl.ItemsPanel>
+                    <ItemsPanelTemplate>
+                        <StackPanel Orientation="Horizontal"/>
+                    </ItemsPanelTemplate>
+                </ItemsControl.ItemsPanel>
+                <ItemsControl.ItemTemplate>
+                    <DataTemplate>
+
+                        <ItemsControl Grid.Column="1" ItemsSource="{Binding PositionList}" Margin="0,0,20,0">
+                            <ItemsControl.ItemsPanel>
+                                <ItemsPanelTemplate>
+                                    <WrapPanel Orientation="Vertical"/>
+                                </ItemsPanelTemplate>
+                            </ItemsControl.ItemsPanel>
+                            <ItemsControl.ItemTemplate>
+                                <DataTemplate>
+                                    <Grid Margin="5,5,15,5">
+                                        <Grid.ColumnDefinitions>
+                                            <ColumnDefinition Width="30"/>
+                                            <ColumnDefinition Width="1*"/>
+                                        </Grid.ColumnDefinitions>
+
+                                        <TextBlock Text="{Binding TcPos}"
+                                                   Foreground="White"/>
+                                        <ItemsControl Grid.Column="1" ItemsSource="{Binding ExitToolAssociationList}"
+                                                      HorizontalAlignment="Left">
+                                            <ItemsControl.ItemsPanel>
+                                                <ItemsPanelTemplate>
+                                                    <!--<WrapPanel Orientation="Horizontal" MaxWidth="200"/>-->
+                                                    <UniformGrid Columns="1"/>
+                                                </ItemsPanelTemplate>
+                                            </ItemsControl.ItemsPanel>
+                                            <ItemsControl.ItemTemplate>
+                                                <DataTemplate>
+                                                    <Grid Margin="10,0,0,5">
+                                                        <Grid.ColumnDefinitions>
+                                                            <ColumnDefinition Width="Auto"/>
+                                                            <ColumnDefinition Width="1*"/>
+                                                        </Grid.ColumnDefinitions>
+
+                                                        <!--Style="{DynamicResource SetUpToggleButton}"-->
+                                                        <ToggleButton Content="{Binding ExitPar}" Name="ExitBtn"
+                                                                      CommandParameter="{Binding SelectedItem,ElementName=SetUpTreeView}"
+                                                                      IsChecked="{Binding IsOccupied}" Height="25" Width="25" Margin="0,0,5,0"
+                                                                      Command="{Binding SetUpToolCommand}"
+                                                                      IsEnabled="{Binding IsEnabledPos}"
+                                                                      Background="{Binding ExitBtnBackgroundCol}"
+                                                                      Foreground="Black"/>
+                                                        <!--BorderBrush="{DynamicResource EgaltechBlue1}"-->
+                                                        <Border x:Name="ToolBorder" Grid.Column="1" 
+                                                                BorderThickness="1" ToolTip="{Binding ToolTipMsg}">
+                                                            <Border.Style>
+                                                                <Style TargetType="{x:Type Border}">
+                                                                    <Setter Property="Visibility" Value="Hidden"/>
+                                                                    <Style.Triggers>
+                                                                        <DataTrigger Binding="{Binding ElementName=ExitBtn, Path=IsChecked}" Value="True">
+                                                                            <Setter Property="Visibility" Value="Visible"/>
+                                                                        </DataTrigger>
+                                                                    </Style.Triggers>
+                                                                </Style>
+                                                            </Border.Style>
+                                                            <TextBlock  Text="{Binding Tool.Name}" Margin="3"
+                                                                        Foreground="White"/>
+                                                        </Border>
+
+                                                    </Grid>
+                                                </DataTemplate>
+                                            </ItemsControl.ItemTemplate>
+                                        </ItemsControl>
+
+                                    </Grid>
+                                </DataTemplate>
+                            </ItemsControl.ItemTemplate>
+                        </ItemsControl>
+
+                    </DataTemplate>
+                </ItemsControl.ItemTemplate>
+            </ItemsControl>
+
+        </Grid>
+
+    </Grid>
+
+</EgtWPFLib5:EgtCustomWindow>

MySetUpWindow/MySetUpWindowV.xaml.vb

@@ -0,0 +1,29 @@
+Imports EgtWPFLib5
+
+Public Class MySetUpWindowV
+
+   Private WithEvents m_SetUpWindowVM As SetUpWindowVM
+
+   Sub New(Owner As Window, SetUpWindowVM As SetUpWindowVM)
+      MyBase.New(Owner)
+      ' This call is required by the designer.
+      InitializeComponent()
+      Me.DataContext = SetUpWindowVM
+      ' Assegno al riferimento locale al VM il VM preso dal DataContext
+      m_SetUpWindowVM = SetUpWindowVM
+   End Sub
+
+   Private Sub Tool_DoubleClick(sender As Object, e As MouseButtonEventArgs)
+      Dim TreeViewItem As TreeViewItem = DirectCast(sender, TreeViewItem)
+      If TypeOf TreeViewItem.DataContext Is ToolItem Then
+         Dim SelTool As ToolItem = DirectCast(TreeViewItem.DataContext, ToolItem)
+         m_SetUpWindowVM.ToolDoubleClick(SelTool)
+         e.Handled = True
+      End If
+   End Sub
+
+   Private Sub CloseWindow(bDialogResult As Boolean) Handles m_SetUpWindowVM.m_CloseWindow
+      Me.DialogResult = bDialogResult
+   End Sub
+
+End Class

MyToolDbWindow/MyToolDbWindowV.xaml.vb

@@ -1,3 +1,32 @@
-Public Class MyToolDbWindowV
+Imports EgtUILib
+
+Public Class MyToolDbWindowV
+
+   Private WithEvents m_ToolDbWindowVM As EgtWPFLib5.ToolDbWindowVM
+
+   Sub New(Owner As Window, ToolDbWindowVM As EgtWPFLib5.ToolDbWindowVM)
+      MyBase.New(Owner)
+      ' This call is required by the designer.
+      InitializeComponent()
+      Me.DataContext = ToolDbWindowVM
+      ' Assegno al riferimento locale al VM il VM preso dal DataContext
+      m_ToolDbWindowVM = ToolDbWindowVM
+   End Sub
+
+   Private Sub ToolsDbView_Closed(bDialogResult As Boolean) Handles m_ToolDbWindowVM.m_CloseWindow
+      ' Imposto contesto generale
+      EgtSetCurrentContext(EgtWPFLib5.ToolDbWindowVM.ProjectSceneContext)
+      ' Cancello contesto di visualizzazione utensile
+      EgtDeleteContext(EgtWPFLib5.ToolDbWindowVM.ToolDbSceneContext)
+      'ToolDbWindowVM.m_ToolDbSceneContext = 0
+      Me.Close()
+   End Sub
+
+   Private Sub ToolsDbView_Closing(sender As Object, e As ComponentModel.CancelEventArgs) Handles Me.Closing
+      If (Keyboard.Modifiers And ModifierKeys.Alt) = ModifierKeys.Alt OrElse Keyboard.IsKeyDown(Key.F4) Then
+         e.Cancel = True
+         Return
+      End If
+   End Sub
 
 End Class

MyWaterjetDbWindow/MyWaterjetDbWindowV.xaml

@@ -0,0 +1,285 @@
+<EgtWPFLib5:EgtCustomWindow x:Class="MyWaterjetDbWindowV"
+   xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+   xmlns:sys="clr-namespace:System;assembly=mscorlib"
+   xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
+   Title="{Binding Title}"
+   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
+   WindowStyle="None" ResizeMode="NoResize" TitleBarHeight="30" IsResizable="False"
+   IsMinimizable="False" WindowStartupLocation="CenterOwner" ShowInTaskbar="False"
+   CloseCommand="{Binding CloseToolsDbCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}"
+   CloseCommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
+   Height="900" Width="1100">
+
+   <Grid>
+      <Grid.RowDefinitions>
+         <RowDefinition Height="0.75*"/>
+         <RowDefinition Height="11*"/>
+         <RowDefinition Height="1*"/>
+      </Grid.RowDefinitions>
+
+      <Grid Grid.Row="1" Grid.RowSpan="2">
+         <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="3*"/>
+         </Grid.ColumnDefinitions>
+
+         <ListBox x:Name="MaterialListBox"  
+                     Background="Transparent"
+                     Foreground="{StaticResource Omag_White}"
+                     BorderThickness="0"
+                 ItemsSource="{Binding MaterialList}" 
+                 DisplayMemberPath="Name" 
+                 SelectedItem="{Binding SelMaterial}" 
+                 Grid.Column="0">
+            <ListBox.ItemContainerStyle>
+               <Style TargetType="ListBoxItem">
+                  <Style.Triggers>
+                     <Trigger Property="IsSelected" Value="True">
+                        <Setter Property="Opacity" Value="1"/>
+                     </Trigger>
+                     <Trigger Property="IsSelected" Value="false">
+                        <Setter Property="Opacity" Value="0.6"/>
+                     </Trigger>
+                  </Style.Triggers>
+               </Style>
+            </ListBox.ItemContainerStyle>
+         </ListBox>
+
+         <ListBox x:Name="SubMaterialListBox"
+                     Background="Transparent"
+                     Foreground="{StaticResource Omag_White}"
+                     BorderThickness="0"
+                 ItemsSource="{Binding Path=SelectedItem.SubMaterialList, ElementName=MaterialListBox}" 
+                 DisplayMemberPath="Name" 
+                 SelectedItem="{Binding Path=SelectedItem.SelSubMaterial, ElementName=MaterialListBox}" 
+                 Grid.Column="1">
+            <ListBox.ItemContainerStyle>
+               <Style TargetType="ListBoxItem">
+                  <Style.Triggers>
+                     <Trigger Property="IsSelected" Value="True">
+                        <Setter Property="Opacity" Value="1"/>
+                     </Trigger>
+                     <Trigger Property="IsSelected" Value="false">
+                        <Setter Property="Opacity" Value="0.6"/>
+                     </Trigger>
+                  </Style.Triggers>
+               </Style>
+            </ListBox.ItemContainerStyle>
+         </ListBox>
+
+         <DataGrid ItemsSource="{Binding Path=SelectedItem.ParamList, ElementName=SubMaterialListBox}" 
+                      SelectedItem="{Binding Path=SelectedItem.SelWjParam, ElementName=SubMaterialListBox}"
+                      Grid.Column="2"
+                      Background="Transparent"
+                      BorderThickness="0"
+                      Margin="2.5,0,2.5,0"
+                      HeadersVisibility="Column"
+                      AutoGenerateColumns="False">
+            <DataGrid.Resources>
+               <Style TargetType="{x:Type DataGridColumnHeader}" BasedOn="{StaticResource {x:Type DataGridColumnHeader}}">
+                  <Setter Property="Background" Value="{StaticResource Omag_Black}"/>
+                  <Setter Property="Foreground" Value="{StaticResource Omag_White}"/>
+                  <Setter Property="BorderBrush" Value="{StaticResource Omag_DarkGray}"/>
+                  <Setter Property="BorderThickness" Value="0.25"/>
+                  <Setter Property="FontWeight" Value="Bold"/>
+                  <Setter Property="Margin" Value="0"/>
+                  <Setter Property="Opacity" Value="0.7"/>
+                  <Setter Property="VerticalContentAlignment" Value="Center"/>
+               </Style>
+               <Style TargetType="{x:Type DataGridRow}">
+                  <Setter Property="Background" Value="{StaticResource Omag_Black}"/>
+                  <Setter Property="Foreground" Value="{StaticResource Omag_White}"/>
+                  <Setter Property="BorderBrush" Value="{StaticResource Omag_DarkGray}"/>
+                  <Setter Property="BorderThickness" Value="0.25"/>
+               </Style>
+               <Style TargetType="{x:Type DataGridCell}">
+                  <Setter Property="BorderBrush" Value="{StaticResource Omag_DarkGray}"/>
+                  <Setter Property="BorderThickness" Value="0.25"/>
+                  <Style.Triggers>
+                     <Trigger Property="IsSelected" Value="True">
+                        <Setter Property="Background" Value="{StaticResource Omag_DarkGray}"/>
+                        <Setter Property="Foreground" Value="{StaticResource Omag_White}"/>
+                        <Setter Property="BorderBrush" Value="{StaticResource Omag_DarkGray}"/>
+                     </Trigger>
+                  </Style.Triggers>
+               </Style>
+            </DataGrid.Resources>
+            <DataGrid.Columns>
+               <!--Thickness-->
+               <DataGridTextColumn Binding="{Binding Thickness}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.Thickness_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+               <!--Q1-->
+               <DataGridTextColumn Binding="{Binding Q1}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.Q1_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+               <!--Q2-->
+               <DataGridTextColumn Binding="{Binding Q2}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.Q2_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+               <!--Q3-->
+               <DataGridTextColumn Binding="{Binding Q3}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.Q3_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+               <!--Q4-->
+               <DataGridTextColumn Binding="{Binding Q4}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.Q4_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+               <!--Q5-->
+               <DataGridTextColumn Binding="{Binding Q5}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.Q5_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+               <!--QExtra-->
+               <DataGridTextColumn Binding="{Binding QExtra}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.QExtra_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+               <!--AngComp-->
+               <DataGridTextColumn Binding="{Binding dAngComp}"
+                            Width="*">
+                  <DataGridTextColumn.HeaderTemplate>
+                     <DataTemplate>
+                        <TextBlock Text="{Binding DataContext.AngComp_Msg,RelativeSource={RelativeSource AncestorType={x:Type DataGrid}}}"/>
+                     </DataTemplate>
+                  </DataGridTextColumn.HeaderTemplate>
+               </DataGridTextColumn>
+            </DataGrid.Columns>
+         </DataGrid>
+
+      </Grid>
+
+      <Grid Grid.Row="2">
+         <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="3*"/>
+         </Grid.ColumnDefinitions>
+
+         <EgtWPFLib5:EgtTextBox  Grid.Column="0" Text="{Binding sNewMaterial, UpdateSourceTrigger=PropertyChanged}" Visibility="{Binding NewMaterial_Visibility}" Height="20" Margin="10,0">
+            <EgtWPFLib5:EgtTextBox.InputBindings>
+               <KeyBinding Key="Enter" Command="{Binding DoneCommand}"/>
+               <KeyBinding Key="Esc" Command="{Binding CancelCommand}"/>
+            </EgtWPFLib5:EgtTextBox.InputBindings>
+         </EgtWPFLib5:EgtTextBox>
+         <EgtWPFLib5:EgtTextBox  Grid.Column="1" Text="{Binding sNewSubMaterial, UpdateSourceTrigger=PropertyChanged}" Visibility="{Binding NewSubMaterial_Visibility}" Height="20" Margin="10,0">
+            <EgtWPFLib5:EgtTextBox.InputBindings>
+               <KeyBinding Key="Enter" Command="{Binding DoneCommand}"/>
+               <KeyBinding Key="Esc" Command="{Binding CancelCommand}"/>
+            </EgtWPFLib5:EgtTextBox.InputBindings>
+         </EgtWPFLib5:EgtTextBox>
+
+         <!--<Grid DockPanel.Dock="Bottom" Visibility="{Binding NewMaterial_Visibility}">
+                <Grid.ColumnDefinitions>
+                    <ColumnDefinition Width="4*"/>
+                    <ColumnDefinition Width="1*"/>
+                    <ColumnDefinition Width="1*"/>
+                </Grid.ColumnDefinitions>
+                <EgtWPFLib5:EgtTextBox Text="{Binding sNewMaterial}"
+                                DockPanel.Dock="Bottom"          
+                                Margin="0,0,0,5"/>
+                <Button Content="{Binding OkMsg}" Grid.Column="1"
+                            Command="{Binding DoneCommand}"
+                            IsEnabled="{Binding EnableOkNewMat}"
+                            Style="{StaticResource OptionPanel_TextButton}"
+                            Margin="2.5,0,0,2.5"/>
+                <Button Content="{Binding CancelMsg}" Grid.Column="2"
+                            Command="{Binding CamcelCommand}"
+                            Style="{StaticResource OptionPanel_TextButton}"
+                            Margin="2.5,0,0,2.5"/>
+            </Grid>-->
+
+      </Grid>
+
+      <Grid Grid.Row="0">
+         <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="3*"/>
+         </Grid.ColumnDefinitions>
+
+         <UniformGrid Grid.Column="0" Columns="3" HorizontalAlignment="left">
+            <Button Command="{Binding NewMaterialCommand}" ToolTip="{Binding New_Msg}" 
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/New.png" Stretch="Uniform"/>
+            </Button>
+
+            <Button Command="{Binding ModifyMaterialCommand}" ToolTip="{Binding Modify_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/Modify.png" Stretch="Uniform"/>
+            </Button>
+            <Button Command="{Binding DeleteMaterialCommand}" ToolTip="{Binding Delete_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/Remove.png" Stretch="Uniform"/>
+            </Button>
+         </UniformGrid>
+
+         <UniformGrid Grid.Column="1" Columns="3" HorizontalAlignment="left">
+            <Button Command="{Binding NewSubMaterialCommand}" ToolTip="{Binding New_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/New.png" Stretch="Uniform"/>
+            </Button>
+            <Button Command="{Binding ModifySubMaterialCommand}" ToolTip="{Binding Modify_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/Modify.png" Stretch="Uniform"/>
+            </Button>
+            <Button Command="{Binding DeleteSubMaterialCommand}" ToolTip="{Binding Delete_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/Remove.png" Stretch="Uniform"/>
+            </Button>
+         </UniformGrid>
+
+         <UniformGrid Grid.Column="2" Columns="3" HorizontalAlignment="Right">
+            <Button Command="{Binding NewWjParamCommand}" ToolTip="{Binding New_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/New.png" Stretch="Uniform"/>
+            </Button>
+            <Button Command="{Binding DeleteWjParamCommand}" ToolTip="{Binding Delete_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/Remove.png" Stretch="Uniform"/>
+            </Button>
+            <Button Command="{Binding SaveCommand}" ToolTip="{Binding Save_Msg}"
+                        Style = "{DynamicResource WaterjetDB_Button}">
+               <Image Source="/Resources/TopCommandBar/Save.png" Stretch="Uniform"/>
+            </Button>
+         </UniformGrid>
+      </Grid>
+
+   </Grid>
+
+</EgtWPFLib5:EgtCustomWindow>

MyWaterjetDbWindow/MyWaterjetDbWindowV.xaml.vb

@@ -0,0 +1,20 @@
+Imports EgtWPFLib5
+
+Public Class MyWaterjetDbWindowV
+
+   Private WithEvents m_WaterjetDbWindowVM As WaterjetDbWindowVM
+
+   Sub New(Owner As Window, WaterjetDbWindowVM As WaterjetDbWindowVM)
+      MyBase.New(Owner)
+      ' This call is required by the designer.
+      InitializeComponent()
+      Me.DataContext = WaterjetDbWindowVM
+      ' Assegno al riferimento locale al VM il VM preso dal DataContext
+      m_WaterjetDbWindowVM = WaterjetDbWindowVM
+   End Sub
+
+   Private Sub CloseWindow(bDialogResult As Boolean) Handles m_WaterjetDbWindowVM.m_CloseWindow
+      Me.DialogResult = bDialogResult
+   End Sub
+
+End Class

OmagOFFICE.vbproj

@@ -12,6 +12,21 @@
     <TargetFrameworkVersion>v4.0</TargetFrameworkVersion>
     <MyType>Custom</MyType>
     <TargetFrameworkProfile>Client</TargetFrameworkProfile>
+    <PublishUrl>publish\</PublishUrl>
+    <Install>true</Install>
+    <InstallFrom>Disk</InstallFrom>
+    <UpdateEnabled>false</UpdateEnabled>
+    <UpdateMode>Foreground</UpdateMode>
+    <UpdateInterval>7</UpdateInterval>
+    <UpdateIntervalUnits>Days</UpdateIntervalUnits>
+    <UpdatePeriodically>false</UpdatePeriodically>
+    <UpdateRequired>false</UpdateRequired>
+    <MapFileExtensions>true</MapFileExtensions>
+    <ApplicationRevision>0</ApplicationRevision>
+    <ApplicationVersion>1.0.0.%2a</ApplicationVersion>
+    <IsWebBootstrapper>false</IsWebBootstrapper>
+    <UseApplicationTrust>false</UseApplicationTrust>
+    <BootstrapperEnabled>true</BootstrapperEnabled>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
     <PlatformTarget>AnyCPU</PlatformTarget>
@@ -109,7 +124,13 @@
   <PropertyGroup>
     <ApplicationIcon>Resources\OmagOFFICE.ico</ApplicationIcon>
   </PropertyGroup>
+  <PropertyGroup>
+    <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
+  </PropertyGroup>
   <ItemGroup>
+    <Reference Include="DotNetZip, Version=1.16.0.0, Culture=neutral, PublicKeyToken=6583c7c814667745, processorArchitecture=MSIL">
+      <HintPath>packages\DotNetZip.1.16.0\lib\net40\DotNetZip.dll</HintPath>
+    </Reference>
     <Reference Include="EgtPHOTOLib, Version=2.3.1.1, Culture=neutral, processorArchitecture=x86">
       <SpecificVersion>False</SpecificVersion>
       <HintPath>..\..\EgtProg\Dll32\EgtPHOTOLib.dll</HintPath>
@@ -120,9 +141,7 @@
     <Reference Include="EgtWPFLib5">
       <HintPath>..\..\EgtProg\DllD32\EgtWPFLib5.dll</HintPath>
     </Reference>
-    <Reference Include="Ionic.Zip">
-      <HintPath>..\..\EgtProg\OmagOFFICE\Ionic.Zip.dll</HintPath>
-    </Reference>
+    <Reference Include="PresentationFramework.Aero" />
     <Reference Include="System.Core" />
     <Reference Include="System.Data.SQLite, Version=1.0.112.0, Culture=neutral, PublicKeyToken=db937bc2d44ff139, processorArchitecture=x86">
       <SpecificVersion>False</SpecificVersion>
@@ -213,8 +232,15 @@
     <Compile Include="EgtStoneLib\VeinMatchingWindow.xaml.vb">
       <DependentUpon>VeinMatchingWindow.xaml</DependentUpon>
     </Compile>
+    <Compile Include="InstrumentPanel\PrintPanelV.xaml.vb">
+      <DependentUpon>PrintPanelV.xaml</DependentUpon>
+    </Compile>
     <Compile Include="InstrumentPanel\MyInstrumentPanelVM.vb" />
+    <Compile Include="InstrumentPanel\PrintPanelVM.vb" />
     <Compile Include="MachinePanel\MyMachinePanelVM.vb" />
+    <Compile Include="MyMachGroupPanel\MyMachGroupPanelV.xaml.vb">
+      <DependentUpon>MyMachGroupPanelV.xaml</DependentUpon>
+    </Compile>
     <Compile Include="MyMachGroupPanel\MyMachGroupPanelVM.vb" />
     <Compile Include="MachinePanel\MachinePanelV.xaml.vb">
       <DependentUpon>MachinePanelV.xaml</DependentUpon>
@@ -230,11 +256,17 @@
     </Compile>
     <Compile Include="MachOptionWindow\MachOptionWindowVM.vb" />
     <Compile Include="MySceneHost\MySceneHostVM.vb" />
+    <Compile Include="MySetUpWindow\MySetUpWindowV.xaml.vb">
+      <DependentUpon>MySetUpWindowV.xaml</DependentUpon>
+    </Compile>
     <Compile Include="MySetUpWindow\MySetUpWindowVM.vb" />
     <Compile Include="MyToolDbWindow\MyToolDbWindowV.xaml.vb">
       <DependentUpon>MyToolDbWindowV.xaml</DependentUpon>
     </Compile>
     <Compile Include="MyToolDbWindow\MyToolDbWindowVM.vb" />
+    <Compile Include="MyWaterjetDbWindow\MyWaterjetDbWindowV.xaml.vb">
+      <DependentUpon>MyWaterjetDbWindowV.xaml</DependentUpon>
+    </Compile>
     <Compile Include="OptionPanel\MachiningTab\MachiningTabV.xaml.vb">
       <DependentUpon>MachiningTabV.xaml</DependentUpon>
     </Compile>
@@ -247,6 +279,10 @@
     </Compile>
     <Compile Include="OptionPanel\MachiningTab\ModifStartEndCutWindowVM.vb" />
     <Compile Include="OptionPanel\MachiningTab\ModifStartEndWjWindowVM.vb" />
+    <Compile Include="OptionPanel\MachiningTab\ModifyQualityV.xaml.vb">
+      <DependentUpon>ModifyQualityV.xaml</DependentUpon>
+    </Compile>
+    <Compile Include="OptionPanel\MachiningTab\ModifyQualityVM.vb" />
     <Compile Include="OptionPanel\MachiningTab\MoveRawModeV.xaml.vb">
       <DependentUpon>MoveRawModeV.xaml</DependentUpon>
     </Compile>
@@ -389,6 +425,10 @@
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>
     </Page>
+    <Page Include="InstrumentPanel\PrintPanelV.xaml">
+      <Generator>MSBuild:Compile</Generator>
+      <SubType>Designer</SubType>
+    </Page>
     <Page Include="MachinePanel\MachinePanelV.xaml">
       <SubType>Designer</SubType>
       <Generator>MSBuild:Compile</Generator>
@@ -397,6 +437,10 @@
       <SubType>Designer</SubType>
       <Generator>MSBuild:Compile</Generator>
     </Page>
+    <Page Include="MyMachGroupPanel\MyMachGroupPanelV.xaml">
+      <SubType>Designer</SubType>
+      <Generator>MSBuild:Compile</Generator>
+    </Page>
     <Page Include="MyMachiningDbWindow\MyMachiningDbWindowV.xaml">
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>
@@ -417,10 +461,18 @@
       <DependentUpon>MainWindowV.xaml</DependentUpon>
       <SubType>Code</SubType>
     </Compile>
+    <Page Include="MySetUpWindow\MySetUpWindowV.xaml">
+      <SubType>Designer</SubType>
+      <Generator>MSBuild:Compile</Generator>
+    </Page>
     <Page Include="MyToolDbWindow\MyToolDbWindowV.xaml">
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>
     </Page>
+    <Page Include="MyWaterjetDbWindow\MyWaterjetDbWindowV.xaml">
+      <SubType>Designer</SubType>
+      <Generator>MSBuild:Compile</Generator>
+    </Page>
     <Page Include="OptionPanel\MachiningTab\MachiningTabV.xaml">
       <SubType>Designer</SubType>
       <Generator>MSBuild:Compile</Generator>
@@ -433,6 +485,10 @@
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>
     </Page>
+    <Page Include="OptionPanel\MachiningTab\ModifyQualityV.xaml">
+      <SubType>Designer</SubType>
+      <Generator>MSBuild:Compile</Generator>
+    </Page>
     <Page Include="OptionPanel\MachiningTab\MoveRawModeV.xaml">
       <SubType>Designer</SubType>
       <Generator>MSBuild:Compile</Generator>
@@ -566,11 +622,13 @@
       <CustomToolNamespace>My.Resources</CustomToolNamespace>
       <SubType>Designer</SubType>
     </EmbeddedResource>
+    <None Include="My Project\app.manifest" />
     <None Include="My Project\Settings.settings">
       <Generator>SettingsSingleFileGenerator</Generator>
       <LastGenOutput>Settings.Designer.vb</LastGenOutput>
     </None>
     <AppDesigner Include="My Project\" />
+    <None Include="packages.config" />
   </ItemGroup>
   <ItemGroup>
     <None Include="App.config" />
@@ -691,6 +749,181 @@
   <ItemGroup>
     <Resource Include="Resources\TopCommandBar\DxfOut.png" />
   </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\InstrumentPanel\Print.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\NewIcons\1-BottomLeft.png" />
+    <Resource Include="Resources\NewIcons\2-BottomRight.png" />
+    <Resource Include="Resources\NewIcons\3-TopRight.png" />
+    <Resource Include="Resources\NewIcons\4-TopLeft.png" />
+    <Resource Include="Resources\NewIcons\Acquisisci-P.png" />
+    <Resource Include="Resources\NewIcons\Acquisisci-P1.png" />
+    <Resource Include="Resources\NewIcons\Acquisisci-P1_P2.png" />
+    <Resource Include="Resources\NewIcons\Acquisisci-P2.png" />
+    <Resource Include="Resources\NewIcons\Allunga-o-accorcia.png" />
+    <Resource Include="Resources\NewIcons\Arco.png" />
+    <Resource Include="Resources\NewIcons\AvantiVeloce.png" />
+    <Resource Include="Resources\NewIcons\BarCode.png" />
+    <Resource Include="Resources\NewIcons\Carica.png" />
+    <Resource Include="Resources\NewIcons\centro.png" />
+    <Resource Include="Resources\NewIcons\Chiudi.png" />
+    <Resource Include="Resources\NewIcons\Copia-dima.png" />
+    <Resource Include="Resources\NewIcons\CSV.png" />
+    <Resource Include="Resources\NewIcons\CsvMinus.png" />
+    <Resource Include="Resources\NewIcons\CsvNew.png" />
+    <Resource Include="Resources\NewIcons\CsvOpen.png" />
+    <Resource Include="Resources\NewIcons\CsvPlus.png" />
+    <Resource Include="Resources\NewIcons\CsvRuinedParts.png" />
+    <Resource Include="Resources\NewIcons\DatiMacchina.png" />
+    <Resource Include="Resources\NewIcons\DB-lavorazioni.png" />
+    <Resource Include="Resources\NewIcons\DB-utensili.png" />
+    <Resource Include="Resources\NewIcons\Deseleziona-tutto.png" />
+    <Resource Include="Resources\NewIcons\Drag_Rettangle.png" />
+    <Resource Include="Resources\NewIcons\Elimina-pezzo.png" />
+    <Resource Include="Resources\NewIcons\Esegui.png" />
+    <Resource Include="Resources\NewIcons\File-CSV.png" />
+    <Resource Include="Resources\NewIcons\Fine-allunga-o-accorcia.png" />
+    <Resource Include="Resources\NewIcons\Fine-centro-fuori.png" />
+    <Resource Include="Resources\NewIcons\Fine-tutti-centro.png" />
+    <Resource Include="Resources\NewIcons\Fine-tutti-fuori.png" />
+    <Resource Include="Resources\NewIcons\Foro-singolo.png" />
+    <Resource Include="Resources\NewIcons\FrameMachining.png" />
+    <Resource Include="Resources\NewIcons\freccia-dx.png" />
+    <Resource Include="Resources\NewIcons\freccia-giu.png" />
+    <Resource Include="Resources\NewIcons\freccia-nera.png" />
+    <Resource Include="Resources\NewIcons\freccia-small.png" />
+    <Resource Include="Resources\NewIcons\freccia-su.png" />
+    <Resource Include="Resources\NewIcons\freccia-sx.png" />
+    <Resource Include="Resources\NewIcons\freccia.png" />
+    <Resource Include="Resources\NewIcons\GenerateCN.png" />
+    <Resource Include="Resources\NewIcons\GenericView-hover.png" />
+    <Resource Include="Resources\NewIcons\GenericView.png" />
+    <Resource Include="Resources\NewIcons\ico-3D.png" />
+    <Resource Include="Resources\NewIcons\ico-cursore.png" />
+    <Resource Include="Resources\NewIcons\ico-cut.png" />
+    <Resource Include="Resources\NewIcons\ico-deseleziona.png" />
+    <Resource Include="Resources\NewIcons\ico-elimina.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-3D.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-cursore.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-magnete.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-mano.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-puntatore.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-righello.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-zoom+.png" />
+    <Resource Include="Resources\NewIcons\ico-hover-zoom-.png" />
+    <Resource Include="Resources\NewIcons\ico-impostazioni.png" />
+    <Resource Include="Resources\NewIcons\ico-inserisci-prezzo.png" />
+    <Resource Include="Resources\NewIcons\ico-magnete.png" />
+    <Resource Include="Resources\NewIcons\ico-mano.png" />
+    <Resource Include="Resources\NewIcons\ico-parcheggia.png" />
+    <Resource Include="Resources\NewIcons\ico-puntatore.png" />
+    <Resource Include="Resources\NewIcons\ico-righello.png" />
+    <Resource Include="Resources\NewIcons\ico-salva.png" />
+    <Resource Include="Resources\NewIcons\ico-seleziona-tutto.png" />
+    <Resource Include="Resources\NewIcons\icone-tagli-1.png" />
+    <Resource Include="Resources\NewIcons\icone-tagli-2.png" />
+    <Resource Include="Resources\NewIcons\icone-tagli-4.png" />
+    <Resource Include="Resources\NewIcons\icone-tagli-5.png" />
+    <Resource Include="Resources\NewIcons\icone-tagli-6.png" />
+    <Resource Include="Resources\NewIcons\IndietroVeloce.png" />
+    <Resource Include="Resources\NewIcons\Inizio-allunga-o-accorcia.png" />
+    <Resource Include="Resources\NewIcons\Inizio-centro-fuori.png" />
+    <Resource Include="Resources\NewIcons\Inizio-tutti-centro.png" />
+    <Resource Include="Resources\NewIcons\Inizio-tutti-fuori.png" />
+    <Resource Include="Resources\NewIcons\Inserisci-pezzo.png" />
+    <Resource Include="Resources\NewIcons\Inverti.png" />
+    <Resource Include="Resources\NewIcons\Linea.png" />
+    <Resource Include="Resources\NewIcons\logo-OmCut.png" />
+    <Resource Include="Resources\NewIcons\Lucidatura.png" />
+    <Resource Include="Resources\NewIcons\Macchina.png" />
+    <Resource Include="Resources\NewIcons\Manual.png" />
+    <Resource Include="Resources\NewIcons\MHT.png" />
+    <Resource Include="Resources\NewIcons\Modifica-fine.png" />
+    <Resource Include="Resources\NewIcons\Modifica-inizio.png" />
+    <Resource Include="Resources\NewIcons\Movimento-manuale.png" />
+    <Resource Include="Resources\NewIcons\Nest.png" />
+    <Resource Include="Resources\NewIcons\NumericKeyboardArrow.png" />
+    <Resource Include="Resources\NewIcons\Nuovo.png" />
+    <Resource Include="Resources\NewIcons\ON_OFF-singolo-taglio.png" />
+    <Resource Include="Resources\NewIcons\Options.png" />
+    <Resource Include="Resources\NewIcons\Parcheggia-pezzo.png" />
+    <Resource Include="Resources\NewIcons\Parking.png" />
+    <Resource Include="Resources\NewIcons\Pausa-ON_OFF.png" />
+    <Resource Include="Resources\NewIcons\Ponticelli.png" />
+    <Resource Include="Resources\NewIcons\Ponticelli_delete.png" />
+    <Resource Include="Resources\NewIcons\Quality.png" />
+    <Resource Include="Resources\NewIcons\RawProbe.png" />
+    <Resource Include="Resources\NewIcons\Rimuovi-segmento.png" />
+    <Resource Include="Resources\NewIcons\Rimuovi_elimina.png" />
+    <Resource Include="Resources\NewIcons\Salva-con-nome.png" />
+    <Resource Include="Resources\NewIcons\Salva-taglio.png" />
+    <Resource Include="Resources\NewIcons\Salva.png" />
+    <Resource Include="Resources\NewIcons\SawProbe.png" />
+    <Resource Include="Resources\NewIcons\Seleziona-tutto.png" />
+    <Resource Include="Resources\NewIcons\Send.png" />
+    <Resource Include="Resources\NewIcons\Sezione-cornice.png" />
+    <Resource Include="Resources\NewIcons\Simula.png" />
+    <Resource Include="Resources\NewIcons\SlabId.png" />
+    <Resource Include="Resources\NewIcons\Specchia.png" />
+    <Resource Include="Resources\NewIcons\Spianatura.png" />
+    <Resource Include="Resources\NewIcons\SPLIT-WJ.png" />
+    <Resource Include="Resources\NewIcons\Split.png" />
+    <Resource Include="Resources\NewIcons\START-WJ.png" />
+    <Resource Include="Resources\NewIcons\Taglio-griglia.png" />
+    <Resource Include="Resources\NewIcons\Taglio-multiplo.png" />
+    <Resource Include="Resources\NewIcons\Taglio-singolo.png" />
+    <Resource Include="Resources\NewIcons\Take-point.png" />
+    <Resource Include="Resources\NewIcons\Test-lama.png" />
+    <Resource Include="Resources\NewIcons\ToolChangerPos.png" />
+    <Resource Include="Resources\NewIcons\Tutti-accorcia.png" />
+    <Resource Include="Resources\NewIcons\Tutti-allunga.png" />
+    <Resource Include="Resources\NewIcons\Tutti-OFF.png" />
+    <Resource Include="Resources\NewIcons\Tutti-ON.png" />
+    <Resource Include="Resources\NewIcons\V.png" />
+    <Resource Include="Resources\NewIcons\Vacuum.png" />
+    <Resource Include="Resources\NewIcons\Vein-match.png" />
+    <Resource Include="Resources\NewIcons\X.png" />
+    <Resource Include="Resources\NewIcons\XYJog.png" />
+    <Resource Include="Resources\NewIcons\ZBJog.png" />
+    <Resource Include="Resources\NewIcons\ZCJog.png" />
+    <Resource Include="Resources\NewIcons\zoom+.png" />
+    <Resource Include="Resources\NewIcons\zoom-.png" />
+    <Resource Include="Resources\NewIcons\ZoomAll-hover.png" />
+    <Resource Include="Resources\NewIcons\ZoomAll.png" />
+    <Resource Include="Resources\NewIcons\ZoomWin.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\RawPartTab\MovePhoto.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
+      <Visible>False</Visible>
+      <ProductName>.NET Framework 3.5 SP1</ProductName>
+      <Install>false</Install>
+    </BootstrapperPackage>
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopCommandBar\Export_1.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopCommandBar\Import.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopCommandBar\Reset.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopCommandBar\Remove.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopCommandBar\Insert.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopCommandBar\Automatic.png" />
+  </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopCommandBar\Modify.png" />
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
   <PropertyGroup>
     <PostBuildEvent>IF "$(PlatformName)"=="x86" IF "$(ConfigurationName)" == "Release" copy $(TargetPath) c:\EgtProg\OmagOFFICE\OmagOFFICER32.exe

OptionPanel/MachiningTab/MachiningTabV.xaml

@@ -4,29 +4,34 @@
    Margin="5,5,5,0">
 
    <UniformGrid Columns="4" Margin="0,0,0,5">
-      <Button Style="{StaticResource OptionPanel_Button}"
+        <Button Style="{StaticResource MachiningTab_Button}"
               Command="{Binding PrevCommand}"
               IsEnabled="{Binding PrevIsEnabled}"
-              Margin="0,0,2.5,0">
-         <Image Source="/Resources/MachiningTab/BackArrow.png"/>
+                Background="{StaticResource Omag_Black}"
+              Margin="0,0,1,0">
+            <Image Source="/Resources/MachiningTab/BackArrow.png"/>
       </Button>
-      <Button Style="{StaticResource OptionPanel_Button}"
+        <Button Style="{StaticResource MachiningTab_Button}"
               Command="{Binding NextCommand}"
               IsEnabled="{Binding NextIsEnabled}"
-              Margin="0,0,2.5,0">
-         <Image Source="/Resources/MachiningTab/ForwardArrow.png"/>
-      </Button>
-      <Button Style="{StaticResource OptionPanel_Button}"
+                Background="{StaticResource Omag_Black}"
+              Margin="0,0,0,0">
+            <Image Source="/Resources/MachiningTab/ForwardArrow.png"/>
+        </Button>
+        <Button Style="{StaticResource MachiningTab_Button}"
               Content="{Binding ModifyMsg}"
               Command="{Binding ModifyCommand}"
               IsEnabled="{Binding ModifyIsEnabled}"
-              Margin="0,0,2.5,0"/>
-      <Button Style="{StaticResource OptionPanel_Button}"
+                Background="{StaticResource Omag_Black}"
+                Foreground="{StaticResource Omag_White}"
+              Margin="1,0,1,0"/>
+        <Button Style="{StaticResource MachiningTab_Button}"
               Content="{Binding AutoMsg}"
               Command="{Binding AutoCommand}"
-              IsEnabled="{Binding AutoIsEnabled}"
               Visibility="{Binding AutoVisibility}"
-              Margin="0,0,0,0"/>
+                Background="{StaticResource Omag_Black}"
+                Foreground="{StaticResource Omag_White}"
+              Margin="1,0,1,0"/>
    </UniformGrid>
 
    <ContentControl Content="{Binding MachiningModeControl}"/>

OptionPanel/MachiningTab/ModifStartEndCutWindowV.xaml

@@ -6,48 +6,29 @@
    ShowInTaskbar="False"
    Title="{Binding Title}"
    Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
-   Height="200" Width="400"
+   SizeToContent="Height" Width="270"
    WindowStartupLocation="CenterOwner">
 
-        <Grid>
-            <Grid.ColumnDefinitions>
-               <ColumnDefinition Width="0.5*"/>
-               <ColumnDefinition Width="4*"/>
-               <ColumnDefinition Width="4*"/>
-               <ColumnDefinition Width="0.5*"/>
-            </Grid.ColumnDefinitions>
-           <Grid.RowDefinitions>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="1*"/>
-               <RowDefinition Height="0.5*"/>
-            </Grid.RowDefinitions>
+    <StackPanel Margin="5,5,5,0">
 
-        <TextBlock Grid.Column="1" Grid.Row="1" Margin="0,5,0,0"
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+        <TextBlock Grid.Column="1" Grid.Row="1" Margin="0,0,0,0"
                         Style="{StaticResource OptionTextBlock}" Text="{Binding ValueMsg}"/>
-        <EgtWPFLib5:EgtTextBox Grid.Column="2" Grid.Row="1" Margin="10,5,10,0"
+        <EgtWPFLib5:EgtTextBox Grid.Column="2" Grid.Row="1" Margin="0,0,0,0"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sValue, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"/>
-
-        <Grid Name="ButtonsGrid" Grid.Column="1" Grid.Row="3" Grid.RowSpan="1" Grid.ColumnSpan="2">
-                <Grid.ColumnDefinitions>
-                    <ColumnDefinition Width="0.5*"/>
-                    <ColumnDefinition Width="2*"/>
-                    <ColumnDefinition Width="0.5*"/>
-                    <ColumnDefinition Width="2*"/>
-                    <ColumnDefinition Width="0.5*"/>
-                </Grid.ColumnDefinitions>
-
+        </UniformGrid>
+    
+        <UniformGrid Columns="2"
+                   Margin="0,0,0,5">
             <Button Name="OkBtn" Content="{Binding OkMsg}" Grid.Column="1"
-                    Style="{DynamicResource ToolBar_TextButton}">
+                    Style="{DynamicResource CompoWindow_Button}">
             </Button>
             <Button Content="{Binding ExitMsg}" Grid.Column="3"
                     IsCancel="True"
-                    Style="{DynamicResource ToolBar_TextButton}">
+                    Style="{DynamicResource CompoWindow_Button}">
             </Button>
 
-            </Grid>
-
-        </Grid>
-
+        </UniformGrid>
+        
+    </StackPanel>
 </EgtWPFLib5:EgtCustomWindow>

OptionPanel/MachiningTab/ModifStartEndWjWindowV.xaml

@@ -6,94 +6,79 @@
    ShowInTaskbar="False"
    Title="{Binding Title}"
    Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
-   Height="400" Width="400"
+   SizeToContent="Height" Width="270"
    WindowStartupLocation="CenterOwner">
 
-        <Grid>
-            <Grid.ColumnDefinitions>
-               <ColumnDefinition Width="0.5*"/>
-               <ColumnDefinition Width="4*"/>
-               <ColumnDefinition Width="4*"/>
-               <ColumnDefinition Width="0.5*"/>
-            </Grid.ColumnDefinitions>
-           <Grid.RowDefinitions>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="0.5*"/>
-               <RowDefinition Height="1*"/>
-               <RowDefinition Height="0.5*"/>
-            </Grid.RowDefinitions>
+    <StackPanel Margin="5,5,5,0">
 
-        <TextBlock Name="HoleTxbl" Grid.Column="1" Grid.Row="1" Margin="0,5,0,0"
-            Style="{StaticResource OptionTextBlock}" Text="{Binding HoleMsg}" Visibility="{Binding HoleVisibility}"/>
-        <CheckBox Name="HoleChBx" Grid.Column="2" Grid.Row="1" HorizontalAlignment="Center" Margin="10,5,10,0"
-            Style="{DynamicResource OptionCheckBox}" IsChecked="{Binding bHole, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}" Visibility="{Binding HoleVisibility}"/>
 
-        <TextBlock Grid.Column="1" Grid.Row="2" Margin="0,5,0,0"
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <TextBlock Name="HoleTxbl" Margin="0,5,0,0"
+                       Style="{StaticResource OptionTextBlock}" Text="{Binding HoleMsg}" Visibility="{Binding HoleVisibility}"/>
+            <CheckBox Name="HoleChBx" HorizontalAlignment="Center" Margin="10,5,10,0"
+                      Style="{DynamicResource OptionCheckBox}" IsChecked="{Binding bHole, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}" Visibility="{Binding HoleVisibility}"/>
+        </UniformGrid>
+
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <TextBlock Margin="0,5,0,0"
                         Style="{StaticResource OptionTextBlock}" Text="{Binding ValueMsg}"/>
-        <EgtWPFLib5:EgtTextBox Grid.Column="2" Grid.Row="2" Margin="10,5,10,0"
+            <EgtWPFLib5:EgtTextBox Margin="0,0,0,5"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sValue, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"/>
+        </UniformGrid>
 
-        <TextBlock Name="LeadInTxbl" Grid.Column="1" Grid.Row="3" Margin="0,5,0,0"
-            Style="{StaticResource OptionTextBlock}" Text="{Binding LeadInMsg}" Visibility="{Binding LeadInVisibility}"/>
-        <ComboBox Name="LeadInCmBx" Grid.Column="2" Grid.Row="3" Margin="10,5,10,0"
-                  ItemsSource="{Binding LeadInTypeList, Mode=OneWay}"
-                  SelectedIndex="{Binding SelectedLeadInType,Mode=TwoWay}"
-                  Style="{DynamicResource MachiningsComboBox}" Visibility="{Binding LeadInVisibility}"/>
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <TextBlock Name="LeadInTxbl" Margin="0,5,0,0"
+                       Style="{StaticResource OptionTextBlock}" Text="{Binding LeadInMsg}" Visibility="{Binding LeadInVisibility}"/>
+            <ComboBox Name="LeadInCmBx" Margin="0,0,0,5"
+                      ItemsSource="{Binding LeadInTypeList, Mode=OneWay}"
+                      SelectedIndex="{Binding SelectedLeadInType,Mode=TwoWay}"
+                      Style="{DynamicResource MachiningsComboBox}" Visibility="{Binding LeadInVisibility}"/>
+        </UniformGrid>
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <TextBlock Name="LeadOutTxbl"
+                       Style="{StaticResource OptionTextBlock}" Text="{Binding LeadOutMsg}" Visibility="{Binding LeadOutVisibility}"/>
+            <ComboBox Name="LeadOutCmBx" Margin="0,0,0,5"
+                      ItemsSource="{Binding LeadOutTypeList, Mode=OneWay}"
+                      SelectedIndex="{Binding SelectedLeadOutType,Mode=TwoWay}"
+                      Style="{DynamicResource MachiningsComboBox}" Visibility="{Binding LeadOutVisibility}"/>
+        </UniformGrid>
 
-        <TextBlock Name="LeadOutTxbl" Grid.Column="1" Grid.Row="3"
-            Style="{StaticResource OptionTextBlock}" Text="{Binding LeadOutMsg}" Visibility="{Binding LeadOutVisibility}"/>
-        <ComboBox Name="LeadOutCmBx" Grid.Column="2" Grid.Row="3" Margin="10,5,10,0"
-                  ItemsSource="{Binding LeadOutTypeList, Mode=OneWay}"
-                  SelectedIndex="{Binding SelectedLeadOutType,Mode=TwoWay}"
-                  Style="{DynamicResource MachiningsComboBox}" Visibility="{Binding LeadOutVisibility}"/>
-
-        <TextBlock Name="TangDistTxbl" Grid.Column="1" Grid.Row="4" Margin="0,5,0,0"
-            Style="{StaticResource OptionTextBlock}" Text="{Binding TangDistMsg}"/>
-        <EgtWPFLib5:EgtTextBox Name="LiTangDistTxBx" Grid.Column="2" Grid.Row="4" Margin="10,5,10,0"
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <TextBlock Name="TangDistTxbl"  Margin="0,5,0,0"
+                       Style="{StaticResource OptionTextBlock}" Text="{Binding TangDistMsg}"/>
+            <EgtWPFLib5:EgtTextBox Name="LiTangDistTxBx" Margin="0,0,0,5"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sLiTangDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
                         Visibility="{Binding LeadInVisibility}"/>
-
-        <TextBlock Name="PerpDistTxbl" Grid.Column="1" Grid.Row="5" Margin="0,5,0,0"
-            Style="{StaticResource OptionTextBlock}" Text="{Binding PerpDistMsg}"/>
-        <EgtWPFLib5:EgtTextBox Name="LiPerpDistTxBx" Grid.Column="2" Grid.Row="5" Margin="10,5,10,0"
-                        Style="{StaticResource OptionTextBox}" Text="{Binding sLiPerpDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
-                        Visibility="{Binding LeadInVisibility}"/>
-
-        <EgtWPFLib5:EgtTextBox Name="LoTangDistTxBx" Grid.Column="2" Grid.Row="4" Margin="10,5,10,0"
+            <EgtWPFLib5:EgtTextBox Name="LoTangDistTxBx" Margin="0,0,0,5"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sLoTangDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
                         Visibility="{Binding LeadOutVisibility}"/>
+        </UniformGrid>
 
-        <EgtWPFLib5:EgtTextBox Name="LoPerpDistTxBx" Grid.Column="2" Grid.Row="5" Margin="10,5,10,0"
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <TextBlock Name="PerpDistTxbl" Margin="0,5,0,0"
+                       Style="{StaticResource OptionTextBlock}" Text="{Binding PerpDistMsg}"/>
+            <EgtWPFLib5:EgtTextBox Name="LiPerpDistTxBx" Margin="0,0,0,5"
+                        Style="{StaticResource OptionTextBox}" Text="{Binding sLiPerpDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                        Visibility="{Binding LeadInVisibility}"/>
+            <EgtWPFLib5:EgtTextBox Name="LoPerpDistTxBx" Margin="0,0,0,5"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sLoPerpDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
                         Visibility="{Binding LeadOutVisibility}"/>
+        </UniformGrid>
 
-        <Grid Name="ButtonsGrid" Grid.Column="1" Grid.Row="7" Grid.RowSpan="1" Grid.ColumnSpan="2">
-                <Grid.ColumnDefinitions>
-                    <ColumnDefinition Width="0.5*"/>
-                    <ColumnDefinition Width="2*"/>
-                    <ColumnDefinition Width="0.5*"/>
-                    <ColumnDefinition Width="2*"/>
-                    <ColumnDefinition Width="0.5*"/>
-                </Grid.ColumnDefinitions>
+        <UniformGrid Name="ButtonsGrid" Columns="2" Margin="0,0,0,5">
 
             <Button Name="OkBtn" Content="{Binding OkMsg}" Grid.Column="1"
-                    Style="{DynamicResource ToolBar_TextButton}">
+                    Style="{DynamicResource CompoWindow_Button}">
             </Button>
             <Button Content="{Binding ExitMsg}" Grid.Column="3"
                     IsCancel="True"
-                    Style="{DynamicResource ToolBar_TextButton}">
+                    Style="{DynamicResource CompoWindow_Button}">
             </Button>
+        </UniformGrid>
 
-            </Grid>
+    </StackPanel>
 
-        </Grid>
-
-        <!--<GroupBox Header="{Binding DirectInsertHdr}"
+    <!--<GroupBox Header="{Binding DirectInsertHdr}"
                 Grid.Row="2" Margin="0,0,5,5">
             <UniformGrid Rows="2">
                 <Grid>

OptionPanel/MachiningTab/ModifyQualityV.xaml

@@ -0,0 +1,32 @@
+<EgtWPFLib5:EgtCustomWindow x:Class="ModifyQualityV"
+        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+   xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
+   IsMinimizable="False"
+   ShowInTaskbar="False"
+   Title="{Binding Title}"
+   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
+   SizeToContent="Height" Width="270"
+   WindowStartupLocation="CenterOwner">
+
+    <StackPanel Margin="5,5,5,0">
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <TextBlock  Margin="0,5,0,0"
+                        Style="{StaticResource OptionTextBlock}" Text="{Binding ValueMsg}"/>
+            <ComboBox ItemsSource="{Binding QualityList}"
+                SelectedItem="{Binding SelectedQuality}"
+                Style="{StaticResource MachiningsComboBox}"
+                Grid.Column="2" Grid.Row="1" Margin="10,5,10,0"/>
+        </UniformGrid>
+        <UniformGrid Columns="2" Margin="0,0,0,5">
+            <Button Name="OkBtn" Content="{Binding OkMsg}" Grid.Column="1"
+                 Style="{DynamicResource CompoWindow_Button}">
+            </Button>
+            <Button Content="{Binding ExitMsg}" Grid.Column="3"
+                    IsCancel="True"
+                    Style="{DynamicResource CompoWindow_Button}">
+            </Button>
+        </UniformGrid>
+
+    </StackPanel>
+</EgtWPFLib5:EgtCustomWindow>

OptionPanel/MachiningTab/ModifyQualityV.xaml.vb

@@ -0,0 +1,6 @@
+Public Class ModifyQualityV
+
+   Private Sub OkBtn_Click(sender As Object, e As RoutedEventArgs) Handles OkBtn.Click
+      DialogResult = True
+   End Sub
+End Class

OptionPanel/MachiningTab/ModifyQualityVM.vb

@@ -0,0 +1,61 @@
+Imports System.Collections.ObjectModel
+Imports System.IO
+Imports EgtUILib
+Imports EgtWPFLib5
+Public Class ModifyQualityVM
+   Inherits VMBase
+
+   Private m_Title As String = String.Empty
+   Public Property Title As String
+      Get
+         Return m_Title
+      End Get
+      Set(value As String)
+         m_Title = value
+      End Set
+   End Property
+   Public ReadOnly Property ValueMsg As String
+      Get
+         Return EgtMsg(MSG_SPLITPAGEUC + 35)
+      End Get
+   End Property
+
+   Public ReadOnly Property OkMsg As String
+      Get
+         Return EgtMsg(91651)          'Ok
+      End Get
+   End Property
+
+   Public ReadOnly Property ExitMsg As String
+      Get
+         Return EgtMsg(91652)          'Annulla
+      End Get
+   End Property
+
+   Private m_QualityList As New ObservableCollection(Of String)
+
+   Public Property QualityList As ObservableCollection(Of String)
+      Get
+         Return m_QualityList
+      End Get
+      Set(value As ObservableCollection(Of String))
+         m_QualityList = value
+      End Set
+   End Property
+
+   Private m_SelectedQuality As String
+
+   Public Property SelectedQuality As String
+      Get
+         Return m_SelectedQuality
+      End Get
+      Set(value As String)
+         m_SelectedQuality = value
+      End Set
+   End Property
+
+   Sub New()
+
+   End Sub
+
+End Class

OptionPanel/MachiningTab/MoveRawModeV.xaml

@@ -3,96 +3,108 @@
   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
   xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5">
 
-   <StackPanel IsEnabled="{Binding MoveRawModeIsEnabled}">
 
-      <Grid HorizontalAlignment="Center"
+    <StackPanel IsEnabled="{Binding MoveRawModeIsEnabled}">
+        <Border Margin="0,0,0,5" Style="{StaticResource Border}">
+            <Grid HorizontalAlignment="Center"
             VerticalAlignment="Center"
             Margin="0,0,0,5">
-         <Grid.ColumnDefinitions>
-            <ColumnDefinition Width="Auto"/>
-            <ColumnDefinition Width="5"/>
-            <ColumnDefinition Width="Auto"/>
-            <ColumnDefinition Width="5"/>
-            <ColumnDefinition Width="Auto"/>
-         </Grid.ColumnDefinitions>
-         <Grid.RowDefinitions>
-            <RowDefinition Height="Auto"/>
-            <RowDefinition Height="5"/>
-            <RowDefinition Height="Auto"/>
-            <RowDefinition Height="5"/>
-            <RowDefinition Height="Auto"/>
-            <RowDefinition Height="5"/>
-            <RowDefinition Height="Auto"/>
-         </Grid.RowDefinitions>
+                <Grid.ColumnDefinitions>
+                    <ColumnDefinition Width="Auto"/>
+                    <ColumnDefinition Width="0.5"/>
+                    <ColumnDefinition Width="Auto"/>
+                    <ColumnDefinition Width="0.5"/>
+                    <ColumnDefinition Width="Auto"/>
+                </Grid.ColumnDefinitions>
+                <Grid.RowDefinitions>
+                    <RowDefinition Height="Auto"/>
+                    <RowDefinition Height="0.5"/>
+                    <RowDefinition Height="Auto"/>
+                    <RowDefinition Height="0.5"/>
+                    <RowDefinition Height="Auto"/>
+                    <RowDefinition Height="0.5"/>
+                    <RowDefinition Height="Auto"/>
+                </Grid.RowDefinitions>
 
-         <Button Grid.Column="2" Grid.Row="0"
-                 Style="{StaticResource OptionPanel_NestingButton}"
+                <Button Grid.Column="2" Grid.Row="0"
+                 Style="{StaticResource OptionPanel_MoveButton}"
                  Command="{Binding UpCommand}">
-            <Image Source="/Resources/NestingTab/UpArrow.png" Stretch="Uniform"/>
-         </Button>
-         <Button Grid.Column="0" Grid.Row="2"
-                 Style="{StaticResource OptionPanel_NestingButton}"
+                    <Image Source="/Resources/NestingTab/UpArrow.png" 
+                   Width="45" Height="45" HorizontalAlignment="Center"/>
+                </Button>
+                <Button Grid.Column="0" Grid.Row="2"
+                 Style="{StaticResource OptionPanel_MoveButton}"
                  Command="{Binding LeftCommand}"
                  Visibility="{Binding LRArrowVisibility}">
-            <Image Source="/Resources/NestingTab/LeftArrow.png"/>
-         </Button>
-         
-         <EgtWPFLib5:EgtTextBox Grid.Column="2" Grid.Row="2" Width="40"
+                    <Image Source="/Resources/NestingTab/LeftArrow.png"
+                   Width="45" Height="45" HorizontalAlignment="Center"/>
+                </Button>
+
+                <TextBox Grid.Column="2" Grid.Row="2" Width="40" Height="20"
                                 Text="{Binding MoveStep}"
-                                VerticalAlignment="Center"
-                                HorizontalContentAlignment="Right"/>
-         
-         <Button Grid.Column="4" Grid.Row="2"
-                 Style="{StaticResource OptionPanel_NestingButton}"
+                                HorizontalAlignment="Center"
+                                HorizontalContentAlignment="right"
+                                Background="{StaticResource Omag_Black}"
+                                Foreground="{StaticResource Omag_White}"
+                                VerticalAlignment="Center"/>
+
+                <Button Grid.Column="4" Grid.Row="2"
+                 Style="{StaticResource OptionPanel_MoveButton}"
                  Command="{Binding RightCommand}"
                  Visibility="{Binding LRArrowVisibility}">
-            <Image Source="/Resources/NestingTab/RightArrow.png"/>
-         </Button>
+                    <Image Source="/Resources/NestingTab/RightArrow.png"
+                   Width="45" Height="45" HorizontalAlignment="Center"/>
+                </Button>
 
-         <Button Grid.Column="2" Grid.Row="4"
-                 Style="{StaticResource OptionPanel_NestingButton}"
+                <Button Grid.Column="2" Grid.Row="4"
+                 Style="{StaticResource OptionPanel_MoveButton}"
                  Command="{Binding DownCommand}">
-            <Image Source="/Resources/NestingTab/DownArrow.png"/>
-         </Button>
+                    <Image Source="/Resources/NestingTab/DownArrow.png"
+                   Width="45" Height="45" HorizontalAlignment="Center"/>
+                </Button>
 
-         <Button Grid.Column="0" Grid.Row="6"
-                 Style="{StaticResource OptionPanel_NestingButton}"
+                <Button Grid.Column="0" Grid.Row="6"
+                 Style="{StaticResource OptionPanel_MoveButton}"
                  Command="{Binding CcwRotCommand}"
                  Visibility="{Binding RotationVisibility}">
-            <Image Source="/Resources/NestingTab/CounterClockwiseRotate.png"
-                   Width="64" Height="65" HorizontalAlignment="Center"
-                   VerticalAlignment="Center" />
-         </Button>
-
-         <Grid Name="RotationAngle" Grid.Column="2" Grid.Row="6"
-               HorizontalAlignment="Center" VerticalAlignment="Center"
-               Visibility="{Binding RotationVisibility}">
-            <Grid.ColumnDefinitions>
-               <ColumnDefinition Width="Auto"/>
-               <ColumnDefinition Width="Auto"/>
-            </Grid.ColumnDefinitions>
-            <EgtWPFLib5:EgtTextBox Text="{Binding RotationStep}"  Width="40"/>
-            <TextBlock Grid.Column="1" FontSize="30" Margin="2,-5,0,0"
-                       Text="°"/>
-         </Grid>
-
-         <Button Grid.Column="4" Grid.Row="6"
-                 Style="{StaticResource OptionPanel_NestingButton}"
-                 Command="{Binding CwRotCommand}"
-                 Visibility="{Binding RotationVisibility}">
-            <Image Source="/Resources/NestingTab/ClockwiseRotate.png"
+                    <Image Source="/Resources/NestingTab/CounterClockwiseRotate.png"
                    Width="65" Height="65" HorizontalAlignment="Center"
                    VerticalAlignment="Center" />
-         </Button>
+                </Button>
 
-      </Grid>
+                <Grid Name="RotationAngle" Grid.Column="2" Grid.Row="6"
+               HorizontalAlignment="Center" VerticalAlignment="Center"
+               Visibility="{Binding RotationVisibility}">
+                    <Grid.ColumnDefinitions>
+                        <ColumnDefinition Width="Auto"/>
+                        <ColumnDefinition Width="Auto"/>
+                    </Grid.ColumnDefinitions>
+                    <TextBox Text="{Binding RotationStep}"  Width="40" Height="20"
+                             HorizontalAlignment="center"
+                             HorizontalContentAlignment="right"
+                             Background="{StaticResource Omag_Black}"
+                             Foreground="{StaticResource Omag_White}"/>
+                    <TextBlock Grid.Column="1" FontSize="25" Margin="2,-5,0,0"
+                       Foreground="{StaticResource Omag_White}" Text="°"/>
+                </Grid>
 
-      <Button Grid.Column="2" Grid.Row="4"
+                <Button Grid.Column="4" Grid.Row="6"
+                 Style="{StaticResource OptionPanel_MoveButton}"
+                 Command="{Binding CwRotCommand}"
+                 Visibility="{Binding RotationVisibility}">
+                    <Image Source="/Resources/NestingTab/ClockwiseRotate.png"
+                   Width="65" Height="65" HorizontalAlignment="Center"
+                   VerticalAlignment="Center" />
+                </Button>
+
+            </Grid>
+        </Border>
+        <Button Grid.Column="2" Grid.Row="4"
               Content="{Binding RemoveMsg}"
               Style="{StaticResource OptionPanel_TextButton}"
               Command="{Binding RemovePartCommand}"
-              Margin="0,0,0,5"/>
+              Margin="0,5,0,5"/>
+
+    </StackPanel>
 
-   </StackPanel>
-  
 </UserControl>

OptionPanel/MachiningTab/SplitModeV.xaml

@@ -1,219 +1,451 @@
 <UserControl x:Class="SplitModeV"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
-   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml">
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+   Background="Transparent">
 
-   <StackPanel IsEnabled="{Binding SplitModeIsEnabled}">
 
-      <ListBox ItemsSource="{Binding ItemList}"
+    <StackPanel IsEnabled="{Binding SplitModeIsEnabled}">
+
+        <Border Margin="0,0,0,5" Style="{StaticResource BorderSplit}" Padding="0">
+            <ListBox ItemsSource="{Binding ItemList}"
+               Background="{StaticResource Omag_Gray}"
                DisplayMemberPath="Name"
                SelectionMode="Extended"
-               Height="250" Margin="0,0,0,5">
-          <ListBox.ItemContainerStyle>
-              <Style TargetType="ListBoxItem">
-                  <Style.Triggers>
-                      <DataTrigger Binding="{Binding bIsActive}" Value="False">
-                          <Setter Property="Foreground" Value="{StaticResource Omag_Gray}"/>
-                      </DataTrigger>
-                  </Style.Triggers>
-                  <Setter Property="IsSelected" Value="{Binding IsSelected, Mode=TwoWay}" />
-              </Style>
-          </ListBox.ItemContainerStyle>
-      </ListBox>
+               BorderThickness="0"
+               Height="200" Margin="0,0,0,0">
+                <ListBox.ItemContainerStyle>
+                    <Style TargetType="ListBoxItem">
+                        <Style.Triggers>
+                            <DataTrigger Binding="{Binding bIsActive}" Value="False">
+                                <Setter Property="Foreground" Value="{StaticResource Omag_White}"/>
+                                <Setter Property="FontStyle" Value="Oblique"/>
+                                <Setter Property="FontWeight" Value="Light"/>
+                            </DataTrigger>
+                            <DataTrigger Binding="{Binding bIsActive}" Value="True">
+                                <Setter Property="Foreground" Value="{StaticResource Omag_Black}"/>
+                                <Setter Property="FontWeight" Value="Bold"/>
+                            </DataTrigger>
+                        </Style.Triggers>
+                        <Setter Property="IsSelected" Value="{Binding IsSelected, Mode=TwoWay}" />
+                    </Style>
+                </ListBox.ItemContainerStyle>
+            </ListBox>
+        </Border>
 
-      <Grid Margin="0,0,0,5">
-         <Grid.ColumnDefinitions>
-            <ColumnDefinition Width="0.5*"/>
-            <ColumnDefinition Width="1*"/>
-            <ColumnDefinition Width="1*"/>
-            <ColumnDefinition Width="0.5*"/>
-         </Grid.ColumnDefinitions>
+        <StackPanel HorizontalAlignment="Center" Orientation="Horizontal">
 
-         <Button Grid.Column="1"
+            <Button Grid.Column="1"
                  IsEnabled="{Binding bEnabledCommandMove}"
                  Style="{StaticResource OptionPanel_Button}"
-                 Command="{Binding MoveUpCommand}">
-            <Image Source="/Resources/MachiningTab/UpArrow.png"/>
-         </Button>
-         <Button Grid.Column="2"
+                 Command="{Binding MoveUpCommand}"
+                    Margin="0,0,0.5,0">
+                <Image Source="/Resources/NestingTab/UpArrow.png"/>
+            </Button>
+            <Button Grid.Column="2"
                  IsEnabled="{Binding bEnabledCommandMove}"
                  Style="{StaticResource OptionPanel_Button}"
-                 Command="{Binding MoveDownCommand}">
-            <Image Source="/Resources/MachiningTab/DownArrow.png"/>
-         </Button>
+                 Command="{Binding MoveDownCommand}"
+                    Margin="0.5,0,0,0">
+                <Image Source="/Resources/NestingTab/DownArrow.png"/>
+            </Button>
 
-      </Grid>
+        </StackPanel>
 
-      <Border Margin="0,0,0,5" Style="{StaticResource Border}">
-         
-         <UniformGrid Columns="3">
 
-            <Button Content="{Binding OnOffMsg}"
+
+        <GroupBox Header="Attiva tagli" Style="{StaticResource GroupBoxSplit}">
+
+            <StackPanel HorizontalAlignment="Center" Orientation="Horizontal" Margin="2,2.5,2,0">
+
+                <!--<Button Content="{Binding OnOffMsg}"
                     Style="{StaticResource OptionPanel_TextWrapButton}"
                     Command="{Binding OnOffCommand}"
-                    Margin="0,0,2.5,0"/>
-            <Button Content="{Binding AllOnMsg}"
+                    Margin="0,0,2.5,0"/>-->
+                <StackPanel Margin="1,0,0,0">
+                    <Button ToolTip="{Binding OnOffMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding OnOffCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                        <StackPanel>
+                            <Image Source="/Resources/NewIcons/ON_OFF-singolo-taglio.png"
+                            Style="{StaticResource ImgButton}"/>
+                        </StackPanel>
+                    </Button>
+                </StackPanel>
+
+                <!--<Button Content="{Binding AllOnMsg}"
                     Style="{StaticResource OptionPanel_TextWrapButton}"
                     Command="{Binding AllOnCommand}"
-                    Margin="2.5,0,2.5,0"/>
-            <Button Content="{Binding AllOffMsg}"
+                    Margin="2.5,0,2.5,0"/>-->
+                <StackPanel Margin="1,0,0,0">
+                    <Button ToolTip="{Binding AllOnMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllOnCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                        <StackPanel>
+                            <Image Source="/Resources/NewIcons/Tutti-ON.png"
+                            Style="{StaticResource ImgButton}"/>
+                        </StackPanel>
+                    </Button>
+                </StackPanel>
+
+                <!--<Button Content="{Binding AllOffMsg}"
                     Style="{StaticResource OptionPanel_TextWrapButton}"
                     Command="{Binding AllOffCommand}"
-                    Margin="2.5,0,0,0"/>
+                    Margin="2.5,0,0,0"/>-->
+                <StackPanel Margin="1,0,0,0">
+                    <Button ToolTip="{Binding AllOffMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllOffCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                        <StackPanel>
+                            <Image Source="/Resources/NewIcons/Tutti-OFF.png"
+                            Style="{StaticResource ImgButton}"/>
+                        </StackPanel>
+                    </Button>
+                </StackPanel>
 
-         </UniformGrid>
+            </StackPanel>
 
-      </Border>
+        </GroupBox>
 
-      <Border Margin="0,0,0,5" Style="{StaticResource Border}">
-         
-         <StackPanel>
-            
-            <UniformGrid Columns="3" Margin="0,0,0,5">
-                <Grid>
-                   <Button Content="{Binding CutMsg}"
+        <GroupBox Header="Tagli di separazione" Style="{StaticResource GroupBoxSplit}">
+
+            <StackPanel>
+
+                <StackPanel HorizontalAlignment="Center" Orientation="Horizontal" Margin="0,2.5,0,1">
+                    <Grid>
+                        <!--<Button Content="{Binding CutMsg}"
                            Style="{StaticResource OptionPanel_TextWrapButton}"
                            Command="{Binding CutCommand}"
                            Visibility="{Binding CutBtnVisibility}"
-                           Margin="0,0,2.5,0"/>
-                   <ToggleButton Grid.Row="0"
+                           Margin="0,0,2.5,0"/>-->
+                        <StackPanel Visibility="{Binding CutBtnVisibility}" Margin="1,0,0,0">
+                            <Button ToolTip="{Binding CutMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding CutCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                                <StackPanel>
+                                    <Image Source="/Resources/NewIcons/Allunga-o-accorcia.png"
+                            Height="40" Margin="0,2,0,0" 
+                            HorizontalAlignment="Center" VerticalAlignment="Center"/>
+                                </StackPanel>
+                            </Button>
+                        </StackPanel>
+
+
+                        <!--<ToggleButton Grid.Row="0"
                            Content="{Binding BridgeMsg}"           
                            Style="{StaticResource OptionPanel_ToggleWrapButton}"
                            IsChecked="{Binding BridgeBtn_IsChecked}"
                            Visibility="{Binding BridgeBtnVisibility}"
-                           Margin="0,0,2.5,0" Padding="0"/>
-                </Grid>
-                
-               <Button Content="{Binding CutStartMsg}"
+                           Margin="0,0,2.5,0" Padding="0"/>-->
+                        <StackPanel Visibility="{Binding BridgeBtnVisibility}" Margin="1,0,0,0">
+                            <ToggleButton ToolTip="{Binding BridgeMsg}"
+                                    Style="{StaticResource Split_ToggleButton_Img}"
+                                    IsChecked="{Binding BridgeBtn_IsChecked}"
+                                    HorizontalAlignment="Center"
+                                    VerticalAlignment="Center"            
+                                    Margin="0,0,0,0">
+                                <StackPanel>
+                                    <Image Source="/Resources/NewIcons/Ponticelli.png"
+                                           Style="{StaticResource ImgButton}"/>
+                                </StackPanel>
+                            </ToggleButton>
+                        </StackPanel>
+
+                    </Grid>
+
+                    <Grid>
+                        <!--<Button Content="{Binding CutStartMsg}"
                        Style="{StaticResource OptionPanel_TextWrapButton}"
                        Command="{Binding CutStartCommand}"
                        Visibility="{Binding CutStartBtnVisibility}"
-                       Margin="2.5,0,2.5,0"/>
-               <Grid>
-                  <Button Content="{Binding CutEndMsg}"
-                          Style="{StaticResource OptionPanel_TextWrapButton}"
-                          Command="{Binding CutEndCommand}"
-                          Visibility="{Binding CutEndBtnVisibility}"
-                          Margin="2.5,0,0,0"/>
-                  <ToggleButton Grid.Row="0"
-                         Content="{Binding BridgeDeleteMsg}"      
-                         Style="{StaticResource OptionPanel_ToggleWrapButton}"
-                         IsChecked="{Binding BridgeDeleteBtn_IsChecked}"
-                         Visibility="{Binding BridgeDeleteBtnVisibility}"
-                         Margin="2.5,0,0,0" Padding="0"/>
-               </Grid>
-            </UniformGrid>
+                       Margin="2.5,0,2.5,0"/>-->
+                        <StackPanel Visibility="{Binding CutStartBtnVisibility}" Margin="1,0,0,0">
+                            <Button ToolTip="{Binding CutStartMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding CutStartCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                                <StackPanel>
+                                    <Image Source="/Resources/NewIcons/Inizio-allunga-o-accorcia.png"
+                            Height="40" Margin="0,2,0,0" 
+                            HorizontalAlignment="Center" VerticalAlignment="Center"/>
+                                </StackPanel>
+                            </Button>
+                        </StackPanel>
 
-            <Grid Visibility="{Binding AllExtRedVisibility}">
-               <Grid.ColumnDefinitions>
-                  <ColumnDefinition Width="0.5*"/>
-                  <ColumnDefinition Width="1*"/>
-                  <ColumnDefinition Width="1*"/>
-                  <ColumnDefinition Width="0.5*"/>
-               </Grid.ColumnDefinitions>
-
-               <Button Content="{Binding AllExtendMsg}" Grid.Column="1"
+                        <!--<Button Content="{Binding QualityMsg}"
                        Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding AllExtendCommand}"
-                       Visibility="{Binding AllExtendBtnVisibility}"
-                       Margin="0,0,2.5,0"/>
-               <Button Content="{Binding AllReduceMsg}" Grid.Column="2"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding AllReduceCommand}"
-                       Visibility="{Binding AllReduceBtnVisibility}"
-                       Margin="2.5,0,0,0"/>
+                       Command="{Binding QualityCommand}"
+                       Visibility="{Binding QualityBtnVisibility}"
+                       Margin="2.5,0,2.5,0"/>!-->
+                        <StackPanel Visibility="{Binding QualityBtnVisibility}" Margin="1,0,0,0">
+                            <Button ToolTip="{Binding QualityMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding QualityCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                                <StackPanel>
+                                    <Image Source="/Resources/NewIcons/Quality.png"
+                            Style="{StaticResource ImgButton}"/>
+                                </StackPanel>
+                            </Button>
+                        </StackPanel>
 
-            </Grid>
+                    </Grid>
 
-         </StackPanel>
-         
-      </Border>
+                    <Grid>
+                        <StackPanel Visibility="{Binding CutEndBtnVisibility}" Margin="1,0,0,0">
+                            <Button ToolTip="{Binding CutEndMsg}"
+                                Style="{StaticResource Split_Button_Img}"
+                                Command="{Binding CutEndCommand}"
+                                HorizontalAlignment="Center"
+                                VerticalAlignment="Center"            
+                                Margin="0,0,0,0">
+                                <StackPanel>
+                                    <Image Source="/Resources/NewIcons/Fine-allunga-o-accorcia.png"
+                                        Height="40" Margin="0,2,0,0" 
+                                        HorizontalAlignment="Center" VerticalAlignment="Center"/>
+                                </StackPanel>
+                            </Button>
+                        </StackPanel>
 
-      <Border Margin="0,0,0,5" Style="{StaticResource Border}">
-         
-         <StackPanel>
+                        <StackPanel Visibility="{Binding BridgeDeleteBtnVisibility}" Margin="1,0,0,0">
+                            <ToggleButton ToolTip="{Binding BridgeDeleteMsg}" 
+                                Style="{StaticResource Split_ToggleButton_Img}"
+                                IsChecked="{Binding BridgeDeleteBtn_IsChecked}"
+                                HorizontalAlignment="Center"
+                                VerticalAlignment="Center"            
+                                Margin="0,0,0,0">
+                                <StackPanel>
+                                    <Image Source="/Resources/NewIcons/Ponticelli_delete.png"
+                                           Style="{StaticResource ImgButton}"/>
+                                </StackPanel>
+                            </ToggleButton>
+                        </StackPanel>
 
-            <UniformGrid Columns="3" Margin="0,0,0,5">
+                    </Grid>
+                </StackPanel>
 
-               <Button Content="{Binding OutCenStartMsg}"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding OutCenStartCommand}"
-                       Visibility="{Binding OutCenStartBtnVisibility}"
-                       Margin="0,0,2.5,0" Padding="0"/>
-               <Button Content="{Binding AllOutStartMsg}"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding AllOutStartCommand}"
-                       Visibility="{Binding AllOutStartBtnVisibility}"
-                       Margin="2.5,0,2.5,0"/>
-               <Button Content="{Binding AllCenStartMsg}"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding AllCenStartCommand}"
-                       Visibility="{Binding AllCenStartBtnVisibility}"
-                       Margin="2.5,0,0,0"/>
-               
-            </UniformGrid>
+                <UniformGrid Columns="4" Margin="0,0,0,-2.5">
 
-            <UniformGrid Columns="3" Margin="0,0,0,5">
-              
-               <Button Content="{Binding OutCenEndMsg}"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding OutCenEndCommand}"
-                       Visibility="{Binding OutCenEndBtnVisibility}"
-                       Margin="0,0,2.5,0" Padding="0"/>
-
-               <Button Content="{Binding AllOutEndMsg}"
-                   Style="{StaticResource OptionPanel_TextWrapButton}"
-                   Command="{Binding AllOutEndCommand}"
-                   Visibility="{Binding AllOutEndBtnVisibility}"
-                   Margin="2.5,0,2.5,0"/>
-
-               <Button Content="{Binding AllCenEndMsg}"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding AllCenEndCommand}"
-                       Visibility="{Binding AllCenEndBtnVisibility}"
-                       Margin="2.5,0,0,0"/>
-
-            </UniformGrid>
-
-            <UniformGrid Columns="3" Margin="0,0,0,5">
-
-               <Button Content="{Binding ModifStartMsg}" Grid.Column="0"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding ModifStartCommand}"
-                       Margin="2.5,0,2.5,0"/>
-
-               <Button Content="{Binding ModifEndMsg}" Grid.Column="1"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding ModifEndCommand}"
-                       Margin="2.5,0,2.5,0"/>
-
-               <Button Content="{Binding PauseMsg}" Grid.Column="2"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding PauseCommand}"
-                       Visibility="{Binding PauseBtnVisibility}"
-                       Margin="2.5,0,2.5,0"/>
-
-            </UniformGrid>
-
-            <UniformGrid Columns="3" Margin="0,0,0,5">
-                <!--Bottone invisibile per permetter il corretto allineamento-->
-                <Button Content="{Binding }" Grid.Column="0"
+                    <!--Bottone invisibile per permetter il corretto allineamento-->
+                    <Button Content="{Binding }" Grid.Column="0"
                        Style="{StaticResource OptionPanel_TextWrapButton}"
                        Command="{Binding }"
-                        Visibility="Hidden"
-                       Margin="2.5,0,2.5,0"/>
-                    <!--Inverti direzione di taglio-->
-                    <Button Content="{Binding InvertMsg}" Grid.Column="0"
-                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding InvertCommand}"
-                            Visibility="{Binding InvertBtnVisibility}"
-                       Margin="2.5,0,2.5,0"/>
+                       Visibility="Hidden"
+                       Margin="0,0,1,0"/>
 
-            </UniformGrid>
+                    <StackPanel Visibility="{Binding AllExtendBtnVisibility}" Grid.Column="1" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding AllExtendMsg}" 
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllExtendCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Tutti-allunga.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Visibility="{Binding AllReduceBtnVisibility}" Grid.Column="2" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding AllReduceMsg}" 
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllReduceCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Tutti-accorcia.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                </UniformGrid>
 
             </StackPanel>
 
-      </Border>
+        </GroupBox>
 
-   </StackPanel>
+        <GroupBox Header="Modifica attacchi tagli" Style="{StaticResource GroupBoxSplit}">
+            <StackPanel Margin="0,0,0,-2.5">
+                <UniformGrid Columns="4" Margin="0,2.5,0,1">
+                    <StackPanel Visibility="{Binding OutCenStartBtnVisibility}" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding OutCenStartMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding OutCenStartCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Inizio-centro-fuori.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Visibility="{Binding AllOutStartBtnVisibility}" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding AllOutStartMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllOutStartCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Inizio-tutti-fuori.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Visibility="{Binding AllCenStartBtnVisibility}" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding AllCenStartMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllCenStartCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Inizio-tutti-centro.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Visibility="{Binding OutCenEndBtnVisibility}" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding OutCenEndMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding OutCenEndCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Fine-Centro-Fuori.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                </UniformGrid>
+
+                <UniformGrid Columns="4" Margin="0,0,0,1">
+
+                    <StackPanel Visibility="{Binding AllOutEndBtnVisibility}" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding AllOutEndMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllOutEndCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Fine-tutti-fuori.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Visibility="{Binding AllCenEndBtnVisibility}" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding AllCenEndMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding AllCenEndCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Fine-tutti-centro.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Margin="1,0,0,0">
+                        <Button ToolTip="{Binding ModifStartMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding ModifStartCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Modifica-Inizio.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Margin="1,0,0,0">
+                        <Button ToolTip="{Binding ModifEndMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding ModifEndCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Modifica-Fine.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                </UniformGrid>
+
+                <UniformGrid Columns="4" Margin="0,0,0,1">
+
+                    <!--Bottone invisibile per permetter il corretto allineamento-->
+                    <Button Content="{Binding }" Grid.Column="0"
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
+                       Command="{Binding }"
+                        Visibility="Hidden"
+                       Margin="0,0,1,0"/>
+
+                    <StackPanel Margin="1,0,0,0">
+                        <Button ToolTip="{Binding PauseMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding PauseCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Pausa-ON_OFF.png"
+                            Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                    <StackPanel Visibility="{Binding InvertBtnVisibility}" Margin="1,0,0,0">
+                        <Button ToolTip="{Binding InvertMsg}"
+                       Style="{StaticResource Split_Button_Img}"
+                       Command="{Binding InvertCommand}"
+                       HorizontalAlignment="Center"
+                       VerticalAlignment="Center"            
+                       Margin="0,0,0,0">
+                            <StackPanel>
+                                <Image Source="/Resources/NewIcons/Inverti.png"
+                                 Style="{StaticResource ImgButton}"/>
+                            </StackPanel>
+                        </Button>
+                    </StackPanel>
+
+                </UniformGrid>
+
+            </StackPanel>
+
+        </GroupBox>
+
+    </StackPanel>
 
 </UserControl>

OptionPanel/MachiningTab/SplitModeVM.vb

@@ -48,6 +48,8 @@ Public Class SplitModeVM
    Private m_bDragging As Boolean = False
    ' Selected cut
    Private m_nSelected As Integer = GDB_ID.NULL
+   ' Abilita la mofica Inizio fine per i tagli interni sugli angoli
+   Private m_StartEndModifyOnIntCorner As Boolean = False
 
    Private m_ItemList As New ObservableCollection(Of NameIdLsBxItem)
    Public ReadOnly Property ItemList As ObservableCollection(Of NameIdLsBxItem)
@@ -254,6 +256,18 @@ Public Class SplitModeVM
       End Set
    End Property
 
+   Private m_QualityBtnVisibility As Visibility = Visibility.Hidden
+
+   Public Property QualityBtnVisibility As Visibility
+      Get
+         Return m_QualityBtnVisibility
+      End Get
+      Set(value As Visibility)
+         m_QualityBtnVisibility = value
+         NotifyPropertyChanged(NameOf(QualityBtnVisibility))
+      End Set
+   End Property
+
    Private m_BridgeBtn_IsChecked As Boolean = False
    Public Property BridgeBtn_IsChecked As Boolean
       Get
@@ -400,6 +414,12 @@ Public Class SplitModeVM
       End Get
    End Property
 
+   Public ReadOnly Property QualityMsg As String
+      Get
+         Return "Quality"
+      End Get
+   End Property
+
 #End Region    ' Messages
 
    ' Definizione comandi
@@ -423,6 +443,7 @@ Public Class SplitModeVM
    Private m_cmdModifEnd As ICommand
    Private m_cmdPause As ICommand
    Private m_cmdInvert As ICommand
+   Private m_cmdQuality As ICommand
 
 #End Region    ' FIELDS & PROPERTIES
 
@@ -447,6 +468,8 @@ Public Class SplitModeVM
       'm_CurrProjPage = m_MainWindow.m_CurrentProjectPageUC
       m_nDragInd = -1
       m_nDragType = 0
+      ' verifico se è abilitata la possibiltà di allungare i lati interni
+      m_StartEndModifyOnIntCorner = (GetPrivateProfileInt(S_NEST, K_STARTENDMODIFYONINTCORNER, 0, sMachIniFile) <> 0)
       ' Nascondo eventuali pezzi in parcheggio
       EstCalc.HideParkedParts()
       ' Nascondo eventuale contorno da foto
@@ -863,9 +886,11 @@ Public Class SplitModeVM
          If CutBtnVisibility = Visibility.Hidden Then
             BridgeBtnVisibility = Visibility.Visible
             BridgeDeleteBtnVisibility = Visibility.Visible
+            QualityBtnVisibility = Visibility.Visible
          Else
             BridgeBtnVisibility = Visibility.Hidden
             BridgeDeleteBtnVisibility = Visibility.Hidden
+            QualityBtnVisibility = Visibility.Hidden
          End If
       Else
          BridgeBtnVisibility = Visibility.Hidden
@@ -1959,6 +1984,9 @@ Public Class SplitModeVM
                ModifStartWindow.DataContext = ModifStartWindowVM
                ModifStartWindow.Owner = Application.Current.MainWindow
                ModifStartWindowVM.SetVal(dOrigUsal)
+               ' Il posizionamento è forzato nel codice xaml: WindowStartupLocation="CenterOwner"
+               ModifStartWindow.Left = 190
+               ModifStartWindow.Top = 600
                If Not ModifStartWindow.ShowDialog() Then Return
                ' Modifica della lavorazione
                dUsal = ModifStartWindowVM.GetVal()
@@ -1967,10 +1995,27 @@ Public Class SplitModeVM
 
             Dim bRepeat As Boolean = False
             Do
+               ' Se c'è limite alla lunghezza libera
+               If m_MachiningList(nI).m_dStartFreeLen < FREELEN_INF Then
+                  ' se abilitati i controlli sugli allungamenti dei lati interni
+                  If Not m_StartEndModifyOnIntCorner Then
+                     ' Recupero sicurezza in corner interno
+                     Dim dCornerSafety As Double = Math.Max(GetPrivateProfileDouble(S_MACH_NEST, K_MACH_SAFE_LEN_INTCORNER, 1, CurrentMachine.sMachIniFile), 10 * EPS_SMALL)
+                     ' Recupero lunghezza baffo del taglio
+                     Dim nPvId As Integer = GDB_ID.NULL
+                     EgtGetInfo(EgtGetFirstNameInGroup(nOperId, NAME_PREVIEW), INFO_PV_ONPART_ID, nPvId)
+                     Dim dDT As Double = 0
+                     EgtGetInfo(EgtGetFirstGroupInGroup(nPvId), "DT", dDT)
+                     dUsal = Math.Min(dUsal, m_MachiningList(nI).m_dStartFreeLen - dDT - dCornerSafety)
+                  End If
+               End If
                EgtSetCurrMachining(nOperId)
                Dim dAddLen As Double = 0
                EgtGetMachiningParam(MCH_MP.STARTADDLEN, dAddLen)
-               If dAddLen - dOrigUsal < -10 * EPS_SMALL Then Return
+               ' verifico che non sia sull'angolo interno (altrimenti vieto la modifica)
+               If Not m_StartEndModifyOnIntCorner And (dAddLen - dOrigUsal < -10 * EPS_SMALL) Then
+                  Return
+               End If
                EgtSetMachiningParam(MCH_MP.STARTADDLEN, dAddLen + dUsal - dOrigUsal)
                EgtSetInfo(nOperId, INFO_MCH_USER_SAL, dUsal)
                UpdateMachiningPreview(m_MachiningList(nI).m_nId, True)
@@ -2038,7 +2083,7 @@ Public Class SplitModeVM
                ModifStartWnd.Owner = Application.Current.MainWindow
                ModifStartWndVM.HoleVisibility = Visibility.Visible
                ModifStartWndVM.LeadInVisibility = Visibility.Visible
-               ModifStartWndVM.LeadOutVisibility = Visibility.Hidden
+               ModifStartWndVM.LeadOutVisibility = Visibility.Collapsed
                ModifStartWndVM.SetVal(dOriginalAddLen)
                ModifStartWndVM.SetHole(bOriginalLiHole)
                ModifStartWndVM.SetLeadInType(nOriginalLeadInType)
@@ -2130,10 +2175,24 @@ Public Class SplitModeVM
             End If
             Dim bRepeat As Boolean = False
             Do
+               ' Se c'è limite alla lunghezza libera
+               If m_MachiningList(nI).m_dEndFreeLen < FREELEN_INF Then
+                  ' se abilitati i controlli sugli allungamenti dei lati interni
+                  If Not m_StartEndModifyOnIntCorner Then
+                     ' Recupero sicurezza in corner interno
+                     Dim dCornerSafety As Double = Math.Max(GetPrivateProfileDouble(S_MACH_NEST, K_MACH_SAFE_LEN_INTCORNER, 1, CurrentMachine.sMachIniFile), 10 * EPS_SMALL)
+                     ' Recupero lunghezza baffo del taglio
+                     Dim nPvId As Integer = GDB_ID.NULL
+                     EgtGetInfo(EgtGetFirstNameInGroup(nOperId, NAME_PREVIEW), INFO_PV_ONPART_ID, nPvId)
+                     Dim dDT As Double = 0
+                     EgtGetInfo(EgtGetFirstGroupInGroup(nPvId), "DT", dDT)
+                     dUeal = Math.Min(dUeal, m_MachiningList(nI).m_dEndFreeLen - dDT - dCornerSafety)
+                  End If
+               End If
                EgtSetCurrMachining(nOperId)
                Dim dAddLen As Double = 0
                EgtGetMachiningParam(MCH_MP.ENDADDLEN, dAddLen)
-               If dAddLen - dOrigUeal < -10 * EPS_SMALL Then
+               If Not m_StartEndModifyOnIntCorner And (dAddLen - dOrigUeal < -10 * EPS_SMALL) Then
                   Return
                End If
                EgtSetMachiningParam(MCH_MP.ENDADDLEN, dAddLen + dUeal - dOrigUeal)
@@ -2198,8 +2257,8 @@ Public Class SplitModeVM
                ModifStartWndVM.Title = "Water jetting"
                ModifStartWnd.DataContext = ModifStartWndVM
                ModifStartWnd.Owner = Application.Current.MainWindow
-               ModifStartWndVM.HoleVisibility = Visibility.Hidden
-               ModifStartWndVM.LeadInVisibility = Visibility.Hidden
+               ModifStartWndVM.HoleVisibility = Visibility.Collapsed
+               ModifStartWndVM.LeadInVisibility = Visibility.Collapsed
                ModifStartWndVM.LeadOutVisibility = Visibility.Visible
                ModifStartWndVM.SetVal(dAddLen)
                ModifStartWndVM.SetLeadOutType(LeadOutTypeId)
@@ -2570,6 +2629,72 @@ Public Class SplitModeVM
 
 #End Region    ' Bridge
 
+#Region "Quality"
+
+   Public ReadOnly Property QualityCommand As ICommand
+      Get
+         If m_cmdQuality Is Nothing Then
+            m_cmdQuality = New Command(AddressOf ModifyQuality)
+         End If
+         Return m_cmdQuality
+      End Get
+   End Property
+
+   Public Sub ModifyQuality()
+      Dim bFirstWJ As Boolean = True
+      Dim sQuality As String = String.Empty
+      ' Recupero la lavorazione corrente
+      If m_CurrFirstInd = -1 Then Return
+      Dim bGenModif As Boolean = False
+      For Index As Integer = m_CurrFirstInd To m_CurrLastInd
+         If Not m_ItemList(Index).IsSelected Then
+            Continue For
+         End If
+         Dim nI As Integer = m_ItemList(Index).Ind
+         Dim nOperId As Integer = m_MachiningList(nI).m_nId
+         Dim nMachiningType As Integer = EgtGetOperationType(nOperId)
+         ' se altrimenti getto d'acqua
+         If nMachiningType = MCH_MY.WATERJETTING Then
+            ' ------------------ INIZIO PREPARAZIONE TASTIERINO VIRTUALE ------------------
+            If bFirstWJ Then
+               EgtSetCurrMachining(nOperId)
+               ' Dialogo richiesta valore
+               '(m_MainWindow, m_MainWindow.m_CurrentMachine.Qualities, "Quality")
+               Dim ModifyQualityWnd As New ModifyQualityV
+               Dim ModifyQuality As New ModifyQualityVM
+               ModifyQuality.Title = "Quality"
+               ModifyQuality.QualityList = CurrentMachine.Qualities
+               ModifyQualityWnd.DataContext = ModifyQuality
+               ModifyQualityWnd.Owner = Application.Current.MainWindow
+               If EgtGetInfo(nOperId, "Quality", sQuality) Then
+                  ModifyQuality.SelectedQuality = sQuality
+               Else
+                  ModifyQuality.SelectedQuality = CurrentMachine.sCurrWaterJettingQuality
+               End If
+               If Not ModifyQualityWnd.ShowDialog() Then Return
+               sQuality = ModifyQuality.SelectedQuality
+               ' comunico che ho letto il primo dato
+               bFirstWJ = False
+
+            End If
+            ' ------------------ INIZIO PREPARAZIONE TASTIERINO VIRTUALE ------------------
+            ' Modifica della lavorazione
+            EgtSetCurrMachining(nOperId)
+            EgtSetInfo(nOperId, "Quality", sQuality)
+            UpdateMachiningPreview(m_MachiningList(nI).m_nId, True)
+            ' verifico interferenza
+            bGenModif = True
+         End If
+      Next
+      ' Se modificato qualcosa
+      If bGenModif Then
+         EgtDraw()
+         m_bModified = True
+      End If
+   End Sub
+
+#End Region    ' Quality
+
    Friend Sub OnMouseDownScene(sender As Object, e As System.Windows.Forms.MouseEventArgs)
       ' Verifico di essere il gestore attivo e non in modalità sola visualizzazione
       If Not m_bActive OrElse OmagOFFICEMap.refMachiningTabVM.IsShow Then Return

OptionPanel/NestingTab/NestingTabV.xaml

@@ -4,203 +4,320 @@
    xmlns:EgtWPFLib5 ="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
    Margin="5,5,5,0">
 
-      <Grid HorizontalAlignment="Center"
-         VerticalAlignment="Center"
-         Margin="0,0,0,5">
-      <Grid.ColumnDefinitions>
-         <ColumnDefinition Width="Auto"/>
-         <ColumnDefinition Width="5"/>
-         <ColumnDefinition Width="Auto"/>
-         <ColumnDefinition Width="5"/>
-         <ColumnDefinition Width="Auto"/>
-      </Grid.ColumnDefinitions>
-      <Button Grid.Column="0" Grid.Row="0"
-              Style="{StaticResource OptionPanel_NestingButton}"
+
+    <GroupBox Header="Disegno parametrico" Style="{StaticResource GroupBoxSplit}">
+        <Grid HorizontalAlignment="Center"
+         VerticalAlignment="Center" Margin="0,2.5,0,0">
+            <Grid.ColumnDefinitions>
+                <ColumnDefinition Width="Auto"/>
+                <ColumnDefinition Width="5"/>
+                <ColumnDefinition Width="Auto"/>
+                <ColumnDefinition Width="5"/>
+                <ColumnDefinition Width="Auto"/>
+            </Grid.ColumnDefinitions>
+
+            <Button Grid.Column="0" Grid.Row="0"
+              Style="{StaticResource DrawImport_NestingButton}"
               Command="{Binding DrawCommand}">
-         <Image Source="/Resources/NestingTab/Draw.png" Stretch="Uniform"/>
-      </Button>
-      <Button Grid.Column="2" Grid.Row="0"
-              Style="{StaticResource OptionPanel_NestingButton}"
+                <Image Source="/Resources/NestingTab/Draw.png" Stretch="Uniform"/>
+            </Button>
+            <Button Grid.Column="2" Grid.Row="0"
+              Style="{StaticResource DrawImport_NestingButton}"
               Command="{Binding ImportDxfCommand}">
-         <Image Source="/Resources/NestingTab/ImportDxf.png" Stretch="Uniform"/>
-      </Button>
-      <ToggleButton Grid.Column="4" Grid.Row="0"                
-              Style="{StaticResource OptionPanel_NestingToggleButton}"
+                <Image Source="/Resources/NestingTab/ImportDxf.png" Stretch="Uniform"/>
+            </Button>
+            <ToggleButton Grid.Column="4" Grid.Row="0"                
+              Style="{StaticResource DrawImport_NestingToggleButton}"
               IsChecked="{Binding CsvImport_IsChecked}">
-         <Image Source="/Resources/NestingTab/ImportCsv.png" Stretch="Uniform"/>
-      </ToggleButton>
+                <Image Source="/Resources/NestingTab/ImportCsv.png" Stretch="Uniform"/>
+            </ToggleButton>
 
-   </Grid>
+        </Grid>
+    </GroupBox>
 
-   <Border Margin="0,0,0,5" Style="{StaticResource Border}">
+    <Border Margin="0,5,0,5" Style="{StaticResource Border}">
 
-      <Grid HorizontalAlignment="Center"
+        <Grid HorizontalAlignment="Center"
          VerticalAlignment="Center"
-         Margin="0,0,0,5">
-      <Grid.ColumnDefinitions>
-         <ColumnDefinition Width="Auto"/>
-         <ColumnDefinition Width="5"/>
-         <ColumnDefinition Width="Auto"/>
-         <ColumnDefinition Width="5"/>
-         <ColumnDefinition Width="Auto"/>
-      </Grid.ColumnDefinitions>
-      <Grid.RowDefinitions>
-         <RowDefinition Height="Auto"/>
-         <RowDefinition Height="5"/>
-         <RowDefinition Height="Auto"/>
-         <RowDefinition Height="5"/>
-         <RowDefinition Height="Auto"/>
-         <RowDefinition Height="5"/>
-         <RowDefinition Height="Auto"/>
-      </Grid.RowDefinitions>
+         Margin="0,0,0,0">
+            <Grid.ColumnDefinitions>
+                <ColumnDefinition Width="Auto"/>
+                <ColumnDefinition Width="5"/>
+                <ColumnDefinition Width="Auto"/>
+                <ColumnDefinition Width="5"/>
+                <ColumnDefinition Width="Auto"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+                <RowDefinition Height="Auto"/>
+                <RowDefinition Height="5"/>
+                <RowDefinition Height="Auto"/>
+                <RowDefinition Height="5"/>
+                <RowDefinition Height="Auto"/>
+                <RowDefinition Height="5"/>
+                <RowDefinition Height="Auto"/>
+            </Grid.RowDefinitions>
 
-      <!--<TextBlock Name="PositioningLbl" Grid.ColumnSpan="3" VerticalAlignment="Center"
+            <!--<TextBlock Name="PositioningLbl" Grid.ColumnSpan="3" VerticalAlignment="Center"
             HorizontalAlignment="Center" FontSize="15" />-->
-      <Button Grid.Column="0" Grid.Row="0"
+            <Button Grid.Column="0" Grid.Row="0"
             Style="{StaticResource OptionPanel_NestingButton}" Width="48" Height="48"
             Command="{Binding PartRotOnCommand}">
-         <Image Source="/Resources/NestingTab/PartRotOn.png" Stretch="Uniform"/>
-      </Button>
-      <Button Grid.Column="2" Grid.Row="0"
+                <Image Source="/Resources/NestingTab/PartRotOn.png" Stretch="Uniform"/>
+            </Button>
+            <Button Grid.Column="2" Grid.Row="0"
             Style="{StaticResource OptionPanel_NestingButton}"
             Command="{Binding UpCommand}">
-         <Image Source="/Resources/NestingTab/UpArrow.png" Stretch="Uniform"/>
-      </Button>
-      <Button Grid.Column="4" Grid.Row="0"
+                <Image Source="/Resources/NestingTab/UpArrow.png" 
+                       Width="40"/>
+            </Button>
+            <Button Grid.Column="4" Grid.Row="0"
             Style="{StaticResource OptionPanel_NestingButton}" Width="48" Height="48"
             Command="{Binding PartRotOffCommand}">
-         <Image Source="/Resources/NestingTab/PartRotOff.png" Stretch="Uniform"/>
-      </Button>
-      <Button Grid.Column="0" Grid.Row="2"
+                <Image Source="/Resources/NestingTab/PartRotOff.png" Stretch="Uniform"/>
+            </Button>
+            <Button Grid.Column="0" Grid.Row="2"
               Style="{StaticResource OptionPanel_NestingButton}"
               Command="{Binding LeftCommand}">
-         <Image Source="/Resources/NestingTab/LeftArrow.png"/>
-      </Button>
-      <ToggleButton Grid.Column="2" Grid.Row="2"
+                <Image Source="/Resources/NestingTab/LeftArrow.png"
+                       Width="40"/>
+            </Button>
+            <ToggleButton Grid.Column="2" Grid.Row="2"
                     Style="{StaticResource OptionPanel_NestingToggleButton}"
                     IsChecked="{Binding MaxMoveIsChecked}">
-         <Image Source="/Resources/NestingTab/MaxMove.png"/>
-      </ToggleButton>
-      <Button Grid.Column="4" Grid.Row="2"
+                <Image Source="/Resources/NestingTab/MaxMove.png"/>
+            </ToggleButton>
+            <Button Grid.Column="4" Grid.Row="2"
               Style="{StaticResource OptionPanel_NestingButton}"
               Command="{Binding RightCommand}">
-         <Image Source="/Resources/NestingTab/RightArrow.png"/>
-      </Button>
+                <Image Source="/Resources/NestingTab/RightArrow.png"
+                       Width="40"/>
+            </Button>
 
-      <EgtWPFLib5:EgtTextBox Grid.Column="0" Grid.Row="4" Width="40"
+            <EgtWPFLib5:EgtTextBox Grid.Column="0" Grid.Row="4" Width="40"
                              Text="{Binding StepMove}"
                              VerticalAlignment="Center"
                              HorizontalContentAlignment="Right"/>
 
-      <Button Grid.Column="2" Grid.Row="4"
+            <Button Grid.Column="2" Grid.Row="4"
               Style="{StaticResource OptionPanel_NestingButton}"
               Command="{Binding DownCommand}">
-         <Image Source="/Resources/NestingTab/DownArrow.png"/>
-      </Button>
+                <Image Source="/Resources/NestingTab/DownArrow.png"
+                       Width="40"/>
+            </Button>
 
-      <Grid Grid.Column="4" Grid.Row="4" HorizontalAlignment="Center" VerticalAlignment="Center">
-         <Grid.ColumnDefinitions>
-            <ColumnDefinition Width="Auto"/>
-            <ColumnDefinition Width="Auto"/>
-         </Grid.ColumnDefinitions>
+            <Grid Grid.Column="4" Grid.Row="4" HorizontalAlignment="Center" VerticalAlignment="Center">
+                <Grid.ColumnDefinitions>
+                    <ColumnDefinition Width="Auto"/>
+                    <ColumnDefinition Width="Auto"/>
+                </Grid.ColumnDefinitions>
 
-         <EgtWPFLib5:EgtTextBox Text="{Binding RotationAngle}" Width="50"
+                <EgtWPFLib5:EgtTextBox Text="{Binding RotationAngle}" Width="40"
                                 VerticalAlignment="Center"
-                                HorizontalContentAlignment="Right"/>
-         <TextBlock Grid.Column="1" Margin="2,0,0,0"
+                                HorizontalContentAlignment="Left"/>
+                <TextBlock Grid.Column="1" Margin="2,0,0,0"
                     FontSize="20" Text="°"/>
-      </Grid>
+            </Grid>
 
-      <Button Grid.Column="0" Grid.Row="6"
+            <Button Grid.Column="0" Grid.Row="6"
               Style="{StaticResource OptionPanel_NestingButton}"
               Command="{Binding CClockwiseRotCommand}">
-         <Image Source="/Resources/NestingTab/CounterClockwiseRotate.png"
+                <Image Source="/Resources/NestingTab/CounterClockwiseRotate.png"
                 Width="64" Height="65" HorizontalAlignment="Center"
                 VerticalAlignment="Center" />
-      </Button>
-      <ToggleButton Grid.Column="2" Grid.Row="6"
+            </Button>
+            <ToggleButton Grid.Column="2" Grid.Row="6"
                     Style="{StaticResource OptionPanel_NestingToggleButton}"
                     IsChecked="{Binding MagneticIsChecked}">
-         <Image Source="/Resources/NestingTab/AlignPieces.png"
+                <Image Source="/Resources/NestingTab/AlignPieces.png"
                 Width="65" Height="65" HorizontalAlignment="Center"
                 VerticalAlignment="Center" />
-      </ToggleButton>
-      <Button Grid.Column="4" Grid.Row="6"
+            </ToggleButton>
+            <Button Grid.Column="4" Grid.Row="6"
               Style="{StaticResource OptionPanel_NestingButton}"
               Command="{Binding ClockwiseRotCommand}">
-         <Image Source="/Resources/NestingTab/ClockwiseRotate.png"
+                <Image Source="/Resources/NestingTab/ClockwiseRotate.png"
                 Width="65" Height="65" HorizontalAlignment="Center"
                 VerticalAlignment="Center" />
-      </Button>
+            </Button>
 
-   </Grid>
+        </Grid>
 
-   </Border>
+    </Border>
 
-    <UniformGrid Grid.Column="0" Columns="2" Margin="0,0,0,5">
-        <Button Content="{Binding InsertPartMsg}"
+
+    <GroupBox Header="Gestione parcheggio" Style="{StaticResource GroupBoxSplit}">
+
+        <UniformGrid Grid.Column="0" Columns="3" Margin="0,2.5,0,0">
+            <!--<Button Content="{Binding InsertPartMsg}"
                 Style="{StaticResource OptionPanel_TextButton}"
                 Command="{Binding InsertPartCommand}"
                 Margin="0,0,2.5,0"/>
+       
         <Button Content="{Binding StorePartMsg}" Grid.Column="1"
                 Style="{StaticResource OptionPanel_TextButton}"
                 Command="{Binding StorePartCommand}"
-                Margin="2.5,0,0,0"/>
-        <!--<ToggleButton Content="{Binding StartCurvWJMsg}" Grid.Column="2"
+                Margin="2.5,0,0,0"/>-->
+            <StackPanel>
+                <Button ToolTip="{Binding InsertPartMsg}" Grid.Column="1"
+                 Style="{StaticResource Nest_Button_Img}"
+                 Command="{Binding InsertPartCommand}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="0,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/Inserisci-pezzo.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding InsertPartMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </Button>
+            </StackPanel>
+
+            <StackPanel>
+                <Button ToolTip="{Binding StorePartMsg}" Grid.Column="1"
+                 Style="{StaticResource Nest_Button_Img}"
+                 Command="{Binding StorePartCommand}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="0,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/Parcheggia-pezzo.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding StorePartMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </Button>
+            </StackPanel>
+
+            <StackPanel>
+                <Button ToolTip="{Binding RemovePartMsg}" Grid.Column="1"
+                 Style="{StaticResource Nest_Button_Img}"
+                 Command="{Binding RemovePartCommand}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="0,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/Elimina-pezzo.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding RemovePartMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </Button>
+            </StackPanel>
+
+            <!--<ToggleButton Content="{Binding StartCurvWJMsg}" Grid.Column="2"
                 Visibility="{Binding StartCurvWJ_Visibility}"         
                 Style="{StaticResource OptionPanel_ToggleButton}"
                 IsChecked="{Binding bStartCurvWJ}"
                 Margin="2.5,0,2.5,0"/>-->
-   </UniformGrid>
+        </UniformGrid>
 
-    <UniformGrid Grid.Column="0" Columns="{Binding CountColumn}"  Margin="0,0,0,5">
-        <Button Content="{Binding RemovePartMsg}"
-                Style="{StaticResource OptionPanel_TextButton}"
-                Command="{Binding RemovePartCommand}"
-                Margin="0,0,2.5,0"/>
-        <ToggleButton Content="{Binding DragRectangleMsg}" Grid.Column="1"
-                Visibility="{Binding DragRectangle_Visibility}"         
-                Style="{StaticResource OptionPanel_ToggleButton}"
-                IsChecked="{Binding bDragRectangle}"
-                Margin="2.5,0,2.5,0"/>
-        <!--<ToggleButton Content="{Binding SplitCurvWJMsg}" Grid.Column="2"
-                Visibility="{Binding SplitCurvWJ_Visibility}"         
-                Style="{StaticResource OptionPanel_ToggleButton}"
-                IsChecked="{Binding bSplitCurvWJ}"
-                Margin="2.5,0,2.5,0"/>-->
-    </UniformGrid>
+    </GroupBox>
 
-    <UniformGrid Grid.Column="0" Columns="2" Margin="0,0,0,5" Visibility="{Binding WJ_Cmd_Visibility}">
-        <ToggleButton Content="{Binding SplitCurvWJMsg}" Grid.Column="2"        
-                Style="{StaticResource OptionPanel_ToggleButton}"
-                IsChecked="{Binding bSplitCurvWJ}"
-                Margin="2.5,0,2.5,0"/>
-        <ToggleButton Content="{Binding StartCurvWJMsg}" Grid.Column="2"         
-                Style="{StaticResource OptionPanel_ToggleButton}"
-                IsChecked="{Binding bStartCurvWJ}"
-                Margin="2.5,0,2.5,0"/>
-    </UniformGrid>
-   
-   <UniformGrid Columns="2" Margin="0,0,0,5">
-      <Button Content="{Binding SelectAllMsg}"
-              Style="{StaticResource OptionPanel_TextButton}"
-              Command="{Binding SelectAllCommand}"
-              Margin="0,0,2.5,0"/>
-      <Button Content="{Binding DeselectAllMsg}"
-              Style="{StaticResource OptionPanel_TextButton}"
-              Command="{Binding DeselectAllCommand}"
-              Margin="2.5,0,0,0"/>
-   </UniformGrid>
+    <GroupBox Header="Gestione selezione" Style="{StaticResource GroupBoxSplit}">
 
-   <Button Content="{Binding ResetMsg}"
+        <UniformGrid Grid.Column="0" Columns="{Binding CountColumn}"  Margin="0,2.5,0,0">
+
+            <StackPanel>
+                <Button ToolTip="{Binding SelectAllMsg}" Grid.Column="1"
+                 Style="{StaticResource Nest_Button_Img}"
+                 Command="{Binding SelectAllCommand}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="2.5,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/Seleziona-tutto.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding SelectAllMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </Button>
+            </StackPanel>
+
+            <StackPanel>
+                <Button ToolTip="{Binding DeselectAllMsg}" Grid.Column="1"
+                 Style="{StaticResource Nest_Button_Img}"
+                 Command="{Binding DeselectAllCommand}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="2.5,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/Deseleziona-tutto.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding DeselectAllMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </Button>
+            </StackPanel>
+
+            <StackPanel>
+                <ToggleButton ToolTip="{Binding DragRectangleMsg}" Grid.Column="1"
+                 Visibility="{Binding DragRectangle_Visibility}"
+                 Style="{StaticResource Nest_ToggleButton_Img}"
+                 IsChecked="{Binding bDragRectangle}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="2.5,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/Drag_Rettangle.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding DragRectangleMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </ToggleButton>
+            </StackPanel>
+
+        </UniformGrid>
+    </GroupBox>
+
+    <GroupBox Header="Gestione tgali WJ" Style="{StaticResource GroupBoxSplit}" Visibility="{Binding WJ_Cmd_Visibility}">
+        <UniformGrid Grid.Column="0" Columns="2" Margin="2.5,0,0,0" Visibility="{Binding WJ_Cmd_Visibility}">
+
+            <StackPanel HorizontalAlignment="Right" Margin="0,0,3.75,0">
+                <ToggleButton ToolTip="{Binding SplitCurvWJMsg}" Grid.Column="1"
+                 Style="{StaticResource Nest_ToggleButton_Img}"
+                 IsChecked="{Binding bSplitCurvWJ}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="0,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/SPLIT-WJ.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding SplitCurvWJMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </ToggleButton>
+            </StackPanel>
+
+            <StackPanel HorizontalAlignment="Left" Margin="3.75,0,0,0">
+                <ToggleButton ToolTip="{Binding StartCurvWJMsg}" Grid.Column="1"
+                 Style="{StaticResource Nest_ToggleButton_Img}"
+                 IsChecked="{Binding bStartCurvWJ}"
+                 HorizontalContentAlignment="Stretch"
+                 Margin="0,0,0,0">
+                    <StackPanel>
+                        <Image Source="/Resources/NewIcons/START-WJ.png"
+                      Width="40" Height="40" HorizontalAlignment="Center"
+                      VerticalAlignment="Center" />
+                        <!--<TextBlock Text="{Binding StartCurvWJMsg}"
+                          HorizontalAlignment="Center"/>-->
+                    </StackPanel>
+                </ToggleButton>
+            </StackPanel>
+
+        </UniformGrid>
+    </GroupBox>
+
+    <Button Content="{Binding ResetMsg}"
            Style="{StaticResource OptionPanel_TextButton}"
            Command="{Binding ResetCommand}"
-           Margin="0,0,0,5"/>
+           Margin="0,5,0,5"/>
 
-   <Button Content="{Binding CsvDataMsg}"
+    <Button Content="{Binding CsvDataMsg}"
            Style="{StaticResource OptionPanel_TextButton}"
            Command="{Binding CsvDataCommand}"
            Visibility="{Binding CsvData_Visibility}"
            Margin="0,0,0,5"/>
 
+
 </StackPanel>

OptionPanel/NestingTab/NestingTabVM.vb

@@ -31,6 +31,13 @@ Public Class NestingTabVM
    Private m_ptPrev As Point3d
    Private m_vtTotMove As Vector3d
    Private m_dSnapDist As Double = 0
+   ' Gestione rotazione pezzi in fase di Drag
+   Private m_bKeyCtrlPressed As Boolean = False
+   Private m_bKeyLeftShiftPressed As Boolean = False
+   Private m_dAngTotal As Double = 0
+   Private m_dStartAng As Double = 0
+   Private m_bStartRot As Boolean = False
+   Private m_bStartMove As Boolean = False
    ' Abilitazioni TrfData e CsvData
    Private m_bTrfData As Boolean = False
    Private m_bCsvData As Boolean = False
@@ -151,11 +158,11 @@ Public Class NestingTabVM
       End Get
       Set(value As Visibility)
          m_CsvData_Visibility = value
-         NotifyPropertyChanged( "CsvData_Visibility")
+         NotifyPropertyChanged("CsvData_Visibility")
       End Set
    End Property
 
-   Private m_CountColumn As Integer = 1
+   Private m_CountColumn As Integer = 2
    Public ReadOnly Property CountColumn As Integer
       Get
          Return m_CountColumn
@@ -270,7 +277,7 @@ Public Class NestingTabVM
 
    Friend Function InitNesting() As Boolean
       ' Se previsto, abilito bottone VeinMatching
-      If Not IsNothing( OmagOFFICEMap.refMainWindowVM.VeinMatchingWnd) Then
+      If Not IsNothing(OmagOFFICEMap.refMainWindowVM.VeinMatchingWnd) Then
          OmagOFFICEMap.refVeinMatchPanelVM.VeinMatchIsEnabled = True
       End If
       ' Abilitazione TrfData
@@ -280,7 +287,7 @@ Public Class NestingTabVM
       m_bCsvData = Not m_bTrfData And
                    (GetMainPrivateProfileInt(S_COMPO, K_CSVDATA, 0) <> 0)
       ' Se previsto, abilito bottone CsvData
-      CsvData_Visibility = If( m_bCsvData, Visibility.Visible, Visibility.Collapsed)
+      CsvData_Visibility = If(m_bCsvData, Visibility.Visible, Visibility.Collapsed)
       ' Imposto il corretto contesto
       EgtSetCurrentContext(OmagOFFICEMap.refSceneHostVM.MainScene.GetCtx())
       ' aggiorno dati del grezzo
@@ -358,7 +365,7 @@ Public Class NestingTabVM
 
    Private Sub AutomaticInsert()
       EgtSetCurrentContext(OmagOFFICEMap.refSceneHostVM.MainScene.GetCtx())
-      OmagOFFICEMap.refStatusBarVM.SetOutputMessage( EgtMsg( 90340))       ' Nesting Automatico in corso
+      OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(90340))       ' Nesting Automatico in corso
       Dim bWrongTrf As Boolean = False
       Dim vParts As New List(Of Integer)
       ' Ciclo di pre-inserimento in tavola dei pezzi selezionati
@@ -376,7 +383,7 @@ Public Class NestingTabVM
          End If
          ' Lo preparo in tavola, se possibile
          If PreInsertOnePart(nId) Then
-            vParts.Add( nId)
+            vParts.Add(nId)
          Else
             EgtSetStatus(nId, GDB_ST.ON_)
             VeinMatching.OnDeselectPart(nId)
@@ -391,12 +398,12 @@ Public Class NestingTabVM
       Dim bAligned As Boolean = (GetPrivateProfileInt(S_MACH_NEST, K_MACH_NEST_ALIGNED, 0, CurrentMachine.sMachIniFile) <> 0)
       EnableReferenceRegion(bAligned)
       ' Eseguo nesting automatico
-      Dim bOpimizeOnX As Boolean = ( GetMainPrivateProfileInt( S_NEST, K_AUTOMATICOPTIMIZE, 2) = 1)
+      Dim bOpimizeOnX As Boolean = (GetMainPrivateProfileInt(S_NEST, K_AUTOMATICOPTIMIZE, 2) = 1)
       Dim bGuillotineMode As Boolean = bAligned
-      Dim nAutomaticMaxTime As Integer = GetMainPrivateProfileInt( S_NEST, K_AUTOMATICMAXTIME, 20)
-      Dim dPartTime As Double = If( bGuillotineMode, 1.0, 0.5)
-      Dim nMaxTime As Integer = Math.Min( CInt( 2 + dPartTime * vParts.Count()), nAutomaticMaxTime)
-      EgtAutomaticPackParts( vParts, bOpimizeOnX, CurrentMachine.bReducedCut, bGuillotineMode, nMaxTime)
+      Dim nAutomaticMaxTime As Integer = GetMainPrivateProfileInt(S_NEST, K_AUTOMATICMAXTIME, 20)
+      Dim dPartTime As Double = If(bGuillotineMode, 1.0, 0.5)
+      Dim nMaxTime As Integer = Math.Min(CInt(2 + dPartTime * vParts.Count()), nAutomaticMaxTime)
+      EgtAutomaticPackParts(vParts, bOpimizeOnX, CurrentMachine.bReducedCut, bGuillotineMode, nMaxTime)
       ' Sistemo i pezzi
       For Each nPartId As Integer In vParts
          ' se pezzo inserito
@@ -404,11 +411,11 @@ Public Class NestingTabVM
             VeinMatching.OnInsertPartInRaw(nPartId)
             ' Eventuale aggiunta solido per taglio da sotto
             UpdateSolidForDrip(nPartId)
-         ' altrimenti rifiutato
-         else
+            ' altrimenti rifiutato
+         Else
             ' Ripristino lo stato originale
-            PreRemoveOnePart( Math.Abs( nPartId))
-            VeinMatching.OnDeselectPart( Math.Abs( nPartId))
+            PreRemoveOnePart(Math.Abs(nPartId))
+            VeinMatching.OnDeselectPart(Math.Abs(nPartId))
          End If
       Next
       ' Aggiorno flag selezionati
@@ -423,6 +430,93 @@ Public Class NestingTabVM
       End If
    End Sub
 
+   Private Sub VerifyMove()
+      If m_bVerify Then
+         ' Determino cosa verificare
+         Dim nMoveId = If(m_nIdToSel <> GDB_ID.NULL, m_nIdToSel, GDB_ID.SEL)
+         ' Aggiorno regioni per nesting
+         UpdateNestRegions()
+         EnableReferenceRegion(False)
+         ' Eseguo verifica
+         If VerifyTrfData(nMoveId) And EgtVerifyPart(nMoveId, CurrentMachine.bReducedCut) Then
+            EstCalc.ResetOrderMachiningFlag()
+            ' Non superata riporto alla posizione iniziale
+         Else
+            If m_bFromParking Then
+               OmagOFFICEMap.refStatusBarVM.ClearOutputMessage()
+               PreRemoveOnePart(nMoveId)
+               VeinMatching.OnRemovePartFromRaw(nMoveId)
+            Else
+               EgtMove(nMoveId, -m_vtTotMove)
+               ' Eventuale notifica al VeinMatching
+               If nMoveId = GDB_ID.SEL Then
+                  Dim nId As Integer = EgtGetFirstSelectedObj()
+                  While nId <> GDB_ID.NULL
+                     VeinMatching.OnMovePartInRaw(nId)
+                     nId = EgtGetNextSelectedObj()
+                  End While
+               Else
+                  VeinMatching.OnMovePartInRaw(nMoveId)
+               End If
+            End If
+            '---------------------- COUNTER PART ----------------------
+            ' solo se pezzo disposto in tavola
+            If m_bFromParking Then
+               Dim sRefGroup As String = String.Empty
+               If EgtGetInfo(nMoveId, INFO_REFGROUP, sRefGroup) Then
+                  ' accendo il layer che contiene il contatore (spento in fase di Drag)
+                  Dim nCounterLayer As Integer = EgtGetFirstNameInGroup(nMoveId, INFO_COUNTERLY)
+                  EgtSetStatus(nCounterLayer, GDB_ST.ON_)
+                  ' aggiorno il layer che indica il numero di pezzi in parcheggio
+                  CountPartInFamily(sRefGroup)
+               End If
+            End If
+            '---------------------- COUNTER PART ----------------------
+         End If
+         m_bFromParking = False
+      End If
+   End Sub
+
+   Private Sub VerifyRot()
+      ' se comando Shift è stato attivato
+      If m_bKeyLeftShiftPressed Then
+         ' Determino cosa verificare
+         Dim nMoveId = If(m_nIdToSel <> GDB_ID.NULL, m_nIdToSel, GDB_ID.SEL)
+         If Not EgtVerifyPart(nMoveId, CurrentMachine.bReducedCut) Then
+            Dim ptCen As Point3d
+            If Not EgtGetPartPartClusterCenterGlob(nMoveId, ptCen) Then Return
+            EgtRotate(nMoveId, ptCen, Vector3d.Z_AX(), -m_dAngTotal, GDB_RT.GLOB)
+         End If
+      End If
+      ' resetto i valori 
+      m_dStartAng = 0
+      m_dAngTotal = 0
+      m_bStartRot = False
+   End Sub
+
+   ' verifica che la rotazione sia ammessa
+   Private Function RotatePartInsideBond(dAngRotDeg As Double, nIdMove As Integer) As Boolean
+      ' Verifico se ci sono dei pezzi bloccati in rotazione
+      Dim bLockedRot As Boolean = GetLockOnRotation(nIdMove)
+      ' Se tutti i pezzi possono ruotare
+      If Not bLockedRot Then
+         ' Calcolo il centro di rotazione come centro del cluster
+         Dim ptCen As Point3d
+         If Not EgtGetPartPartClusterCenterGlob(nIdMove, ptCen) Then Return False
+         ' Aggiorno regioni per nesting
+         UpdateNestRegions()
+         EnableReferenceRegion(False)
+         ' Verifico rotazione complessiva
+         EgtRotate(nIdMove, ptCen, Vector3d.Z_AX(), dAngRotDeg, GDB_RT.GLOB)
+         If EgtVerifyPart(nIdMove, CurrentMachine.bReducedCut) Then Return True
+         ' Provo rotazione parziale (dopo aver annullato la complessiva)
+         EgtRotate(nIdMove, ptCen, Vector3d.Z_AX(), -dAngRotDeg, GDB_RT.GLOB)
+         Return EgtRotatePart(nIdMove, CurrentMachine.bReducedCut, ptCen, dAngRotDeg)
+      Else
+         Return False
+      End If
+   End Function
+
    Private Function RotateCluster(ByVal dAngRotDeg As Double) As Boolean
       ' Se non ci sono pezzi selezionati, esco
       If EgtGetSelectedObjCount() = 0 Then Return True
@@ -432,7 +526,7 @@ Public Class NestingTabVM
          Dim nId As Integer = EgtGetFirstSelectedObj()
          While nId <> GDB_ID.NULL
             ' Se pezzo con rotazione libera
-            If Not EgtExistsInfo( nId, INFO_PARTROT) Then
+            If Not EgtExistsInfo(nId, INFO_PARTROT) Then
                ' Calcolo il centro di rotazione come centro del pezzo
                Dim ptCen As Point3d
                If Not EgtGetPartPartClusterCenterGlob(nId, ptCen) Then Return False
@@ -466,40 +560,22 @@ Public Class NestingTabVM
             nId = EgtGetNextSelectedObj()
          End While
          Return True
-      ' Altrimenti li ruoto tenendo conto delle collisioni
+         ' Altrimenti li ruoto tenendo conto delle collisioni
       Else
-         ' Verifico se ci sono dei pezzi bloccati in rotazione
-         Dim bLockedRot As Boolean = GetLockOnRotation( GDB_ID.SEL)
-            ' Se tutti i pezzi possono ruotare
-            If Not bLockedRot Then
-            ' Calcolo il centro di rotazione come centro del cluster
-            Dim ptCen As Point3d
-            If Not EgtGetPartPartClusterCenterGlob(GDB_ID.SEL, ptCen) Then Return False
-            ' Aggiorno regioni per nesting
-            UpdateNestRegions()
-            EnableReferenceRegion(False)
-            ' Verifico rotazione complessiva
-            EgtRotate(GDB_ID.SEL, ptCen, Vector3d.Z_AX(), dAngRotDeg, GDB_RT.GLOB)
-            If EgtVerifyPart(GDB_ID.SEL, CurrentMachine.bReducedCut) Then Return True
-            ' Provo rotazione parziale (dopo aver annullato la complessiva)
-            EgtRotate(GDB_ID.SEL, ptCen, Vector3d.Z_AX(), -dAngRotDeg, GDB_RT.GLOB)
-            Return EgtRotatePart(GDB_ID.SEL, CurrentMachine.bReducedCut, ptCen, dAngRotDeg)
-         Else
-            Return False
-         End If
+         Return RotatePartInsideBond(dAngRotDeg, GDB_ID.SEL)
       End If
    End Function
 
-   Private Function GetLockOnRotation( nPartId As Integer) As Boolean
+   Private Function GetLockOnRotation(nPartId As Integer) As Boolean
       ' Se singolo pezzo
       If nPartId <> GDB_ID.SEL Then
-         Return EgtExistsInfo( nPartId, INFO_PARTROT)
-      ' Altrimenti tutti i selezionati
+         Return EgtExistsInfo(nPartId, INFO_PARTROT)
+         ' Altrimenti tutti i selezionati
       Else
          Dim bLockedRot As Boolean = False
          Dim nId As Integer = EgtGetFirstSelectedObj()
          While nId <> GDB_ID.NULL
-            If EgtExistsInfo( nId, INFO_PARTROT) Then
+            If EgtExistsInfo(nId, INFO_PARTROT) Then
                bLockedRot = True
                Exit While
             End If
@@ -564,13 +640,13 @@ Public Class NestingTabVM
       Return True
    End Function
 
-   Friend Function ExitNesting( bChange As Boolean) As Boolean
+   Friend Function ExitNesting(bChange As Boolean) As Boolean
       If m_CsvImport_IsChecked Then
          m_CsvImportWindow.Close()
          m_CsvImportWindow = Nothing
       End If
       If bChange Then
-         OmagOFFICEMap.refVeinMatchPanelVM.SetVeinMatchIsChecked( False)
+         OmagOFFICEMap.refVeinMatchPanelVM.SetVeinMatchIsChecked(False)
          OmagOFFICEMap.refVeinMatchPanelVM.VeinMatchIsEnabled = False
       End If
       Return True
@@ -1341,22 +1417,22 @@ Public Class NestingTabVM
       If EgtGetSelectedObjCount() = 0 OrElse m_nPartPos <> PART_POS.OUT_TABLE Then Return
       ' Tolgo blocco rotazione sui pezzi selezionati
       Dim nId As Integer = EgtGetFirstSelectedObj()
-      While nId <> GDB_ID.NULL 
+      While nId <> GDB_ID.NULL
          ' Se rotazione bloccata, tolgo blocco e aggiorno info
-         If EgtExistsInfo( nId, INFO_PARTROT) Then
+         If EgtExistsInfo(nId, INFO_PARTROT) Then
             ' Rimuovo flag di rotazione bloccata
-            EgtRemoveInfo( nId, INFO_PARTROT)
+            EgtRemoveInfo(nId, INFO_PARTROT)
             ' Tolgo da info sul pezzo Codice
-            Dim nTextId As Integer = EgtGetFirstInGroup( EgtGetFirstNameInGroup( nId, NAME_REGION))
+            Dim nTextId As Integer = EgtGetFirstInGroup(EgtGetFirstNameInGroup(nId, NAME_REGION))
             While nTextId <> GDB_ID.NULL
-               If EgtGetType( nTextId) = GDB_TY.EXT_TEXT Then
+               If EgtGetType(nTextId) = GDB_TY.EXT_TEXT Then
                   Dim sText As String = ""
-                  EgtTextGetContent( nTextId, sText)
-                  sText = sText.Replace( "<br/>(X)", "")
-                  EgtModifyText( nTextId, sText)
+                  EgtTextGetContent(nTextId, sText)
+                  sText = sText.Replace("<br/>(X)", "")
+                  EgtModifyText(nTextId, sText)
                   Exit While
                End If
-               nTextId = EgtGetNext( nTextId)
+               nTextId = EgtGetNext(nTextId)
             End While
          End If
          ' Passo al successivo selezionato
@@ -1385,22 +1461,22 @@ Public Class NestingTabVM
       If EgtGetSelectedObjCount() = 0 OrElse m_nPartPos <> PART_POS.OUT_TABLE Then Return
       ' Metto blocco rotazione sui pezzi selezionati
       Dim nId As Integer = EgtGetFirstSelectedObj()
-      While nId <> GDB_ID.NULL 
+      While nId <> GDB_ID.NULL
          ' Se rotazione libera, applico blocco e aggiorno info
-         If Not EgtExistsInfo( nId, INFO_PARTROT) Then
+         If Not EgtExistsInfo(nId, INFO_PARTROT) Then
             ' Imposto flag di rotazione bloccata
-            EgtSetInfo( nId, INFO_PARTROT, 0)
+            EgtSetInfo(nId, INFO_PARTROT, 0)
             ' Inserisco in info sul pezzo Codice
-            Dim nTextId As Integer = EgtGetFirstInGroup( EgtGetFirstNameInGroup( nId, NAME_REGION))
+            Dim nTextId As Integer = EgtGetFirstInGroup(EgtGetFirstNameInGroup(nId, NAME_REGION))
             While nTextId <> GDB_ID.NULL
-               If EgtGetType( nTextId) = GDB_TY.EXT_TEXT Then
+               If EgtGetType(nTextId) = GDB_TY.EXT_TEXT Then
                   Dim sText As String = ""
-                  EgtTextGetContent( nTextId, sText)
+                  EgtTextGetContent(nTextId, sText)
                   sText &= "<br/>(X)"
-                  EgtModifyText( nTextId, sText)
+                  EgtModifyText(nTextId, sText)
                   Exit While
                End If
-               nTextId = EgtGetNext( nTextId)
+               nTextId = EgtGetNext(nTextId)
             End While
          End If
          ' Passo al successivo selezionato
@@ -1436,7 +1512,7 @@ Public Class NestingTabVM
       Dim bAlignMoved As Boolean = False
       Dim bSnapMoved As Boolean = False
       If m_bMagnetic Then
-         If Not GetLockOnRotation( GDB_ID.SEL) Then
+         If Not GetLockOnRotation(GDB_ID.SEL) Then
             EgtAlignPartOnCollision(GDB_ID.SEL, CurrentMachine.bReducedCut, bAlignMoved)
          End If
          If m_dSnapDist > EPS_SMALL Then
@@ -1480,7 +1556,7 @@ Public Class NestingTabVM
       Dim bAlignMoved As Boolean = False
       Dim bSnapMoved As Boolean = False
       If m_bMagnetic Then
-         If Not GetLockOnRotation( GDB_ID.SEL) Then
+         If Not GetLockOnRotation(GDB_ID.SEL) Then
             EgtAlignPartOnCollision(GDB_ID.SEL, CurrentMachine.bReducedCut, bAlignMoved)
          End If
          If m_dSnapDist > EPS_SMALL Then
@@ -1524,7 +1600,7 @@ Public Class NestingTabVM
       Dim bAlignMoved As Boolean = False
       Dim bSnapMoved As Boolean = False
       If m_bMagnetic Then
-         If Not GetLockOnRotation( GDB_ID.SEL) Then
+         If Not GetLockOnRotation(GDB_ID.SEL) Then
             EgtAlignPartOnCollision(GDB_ID.SEL, CurrentMachine.bReducedCut, bAlignMoved)
          End If
          If m_dSnapDist > EPS_SMALL Then
@@ -1568,7 +1644,7 @@ Public Class NestingTabVM
       Dim bAlignMoved As Boolean = False
       Dim bSnapMoved As Boolean = False
       If m_bMagnetic Then
-         If Not GetLockOnRotation( GDB_ID.SEL) Then
+         If Not GetLockOnRotation(GDB_ID.SEL) Then
             EgtAlignPartOnCollision(GDB_ID.SEL, CurrentMachine.bReducedCut, bAlignMoved)
          End If
          If m_dSnapDist > EPS_SMALL Then
@@ -1656,7 +1732,7 @@ Public Class NestingTabVM
       If CurrentMachine.bAutomatic And
          OmagOFFICEMap.refMainWindowVM.MainWindowM.AutoNestOption() Then
          AutomaticInsert()
-      ' altrimenti inserimento standard
+         ' altrimenti inserimento standard
       Else
          StandardInsert()
       End If
@@ -1949,44 +2025,44 @@ Public Class NestingTabVM
       ' Deseleziono eventuali altri
       If EgtGetNextSelectedObj() <> GDB_ID.NULL Then
          EgtDeselectAll()
-         EgtSelectObj( nPartId)
+         EgtSelectObj(nPartId)
          EgtDraw()
       End If
       ' Recupero dati del pezzo
-      Dim sCsvOrder As String = "" : EgtGetInfo( nPartId, INFO_CSV_ORD, sCsvOrder)
-      Dim sCsvList As String = "" : EgtGetInfo( nPartId, INFO_CSV_DIST, sCsvList)
-      Dim sCsvName As String = "" : EgtGetInfo( nPartId, INFO_CSV_PART, sCsvName)
+      Dim sCsvOrder As String = "" : EgtGetInfo(nPartId, INFO_CSV_ORD, sCsvOrder)
+      Dim sCsvList As String = "" : EgtGetInfo(nPartId, INFO_CSV_DIST, sCsvList)
+      Dim sCsvName As String = "" : EgtGetInfo(nPartId, INFO_CSV_PART, sCsvName)
       ' Avvio dialogo modifica
       Dim DlgCsvDataVM As New CompoCsvDataWindowVM()
       Dim DlgCsvDataV As New CompoCsvDataWindowV(Application.Current.MainWindow, DlgCsvDataVM)
-      DlgCsvDataVM.SetData( sCsvOrder, sCsvList, sCsvName)
+      DlgCsvDataVM.SetData(sCsvOrder, sCsvList, sCsvName)
       If DlgCsvDataV.ShowDialog() Then
          ' Recupero i nuovi dati
          Dim sNewOrder As String = ""
          Dim sNewList As String = ""
          Dim sNewName As String = ""
-         DlgCsvDataVM.GetData( sNewOrder, sNewList, sNewName)
+         DlgCsvDataVM.GetData(sNewOrder, sNewList, sNewName)
          ' Assegno i nuovi dati
-         EgtSetInfo( nPartId, INFO_CSV_ORD, sNewOrder)
-         EgtSetInfo( nPartId, INFO_CSV_DIST, sNewList)
-         EgtSetInfo( nPartId, INFO_CSV_PART, sNewName)
+         EgtSetInfo(nPartId, INFO_CSV_ORD, sNewOrder)
+         EgtSetInfo(nPartId, INFO_CSV_DIST, sNewList)
+         EgtSetInfo(nPartId, INFO_CSV_PART, sNewName)
          ' Se necessario, modifico la scritta
          If sNewName <> sCsvName Then
-            Dim nRegLayId As Integer = EgtGetFirstNameInGroup( nPartId, NAME_REGION)
+            Dim nRegLayId As Integer = EgtGetFirstNameInGroup(nPartId, NAME_REGION)
             Dim nTextId = EgtGetFirstInGroup(nRegLayId)
             While nTextId <> GDB_ID.NULL
-               If EgtGetType( nTextId) = GDB_TY.EXT_TEXT Then
+               If EgtGetType(nTextId) = GDB_TY.EXT_TEXT Then
                   Dim sText As String = String.Empty
-                  EgtTextGetContent( nTextId, sText)
-                  Dim nPos As Integer = sText.IndexOf( sCsvName)
+                  EgtTextGetContent(nTextId, sText)
+                  Dim nPos As Integer = sText.IndexOf(sCsvName)
                   Dim sNewText As String
-                  If nPos <0 Then
-                     sNewText= sNewName & "<br/>" & sText
+                  If nPos < 0 Then
+                     sNewText = sNewName & "<br/>" & sText
                   Else
-                     sNewText = sText.Remove( nPos, sCsvName.Length()).Insert( nPos, sNewName)
+                     sNewText = sText.Remove(nPos, sCsvName.Length()).Insert(nPos, sNewName)
                   End If
-                  EgtModifyText( nTextId, sNewText)
-                  VeinMatching.ModifyPartText( nPartId, sNewText)
+                  EgtModifyText(nTextId, sNewText)
+                  VeinMatching.ModifyPartText(nPartId, sNewText)
                   Exit While
                End If
                nTextId = EgtGetNext(nTextId)
@@ -2081,6 +2157,7 @@ Public Class NestingTabVM
       m_bDrag = m_bDrag AndAlso EgtUnProjectPoint(e.Location, m_ptPrev)
       m_bDragToStart = m_bDrag
       m_bVerify = m_bDrag AndAlso (Keyboard.Modifiers And ModifierKeys.Shift) > 0
+      m_bKeyLeftShiftPressed = m_bVerify
       m_vtTotMove = Vector3d.NULL()
    End Sub
 
@@ -2089,7 +2166,7 @@ Public Class NestingTabVM
       If Not m_bDrag Or m_bDragging Then Return
       ' Se primo movimento di drag, verifico di aver superato la soglia di movimento in pixel
       If m_bDragToStart Then
-         If Math.Abs(e.Location.X - m_locPrev.X) <m_nRestRadius And
+         If Math.Abs(e.Location.X - m_locPrev.X) < m_nRestRadius And
             Math.Abs(e.Location.Y - m_locPrev.Y) < m_nRestRadius Then
             Return
          End If
@@ -2115,12 +2192,12 @@ Public Class NestingTabVM
             OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(MSG_NESTPAGEUC + 7), MSG_TYPE.WARNING)
          End If
          ' Applico le lavorazioni al pezzo
-         Dim b3Curr As new BBox3d
-         EgtGetBBoxGlob( EgtGetFirstNameInGroup(nTestId,  NAME_REGION), BBFLAG, b3Curr)
-         if Not EstCalc.PreInsertOnePart( nTestId) Then Return
-         Dim b3Ins As new BBox3d
-         EgtGetBBoxGlob( EgtGetFirstNameInGroup( nTestId, NAME_REGION), BBFLAG, b3Ins)
-         Dim vtDiff As new Vector3d( b3Curr.Min().x - b3Ins.Min().x, b3Curr.Min().y - b3Ins.Min().y, 0)
+         Dim b3Curr As New BBox3d
+         EgtGetBBoxGlob(EgtGetFirstNameInGroup(nTestId, NAME_REGION), BBFLAG, b3Curr)
+         If Not EstCalc.PreInsertOnePart(nTestId) Then Return
+         Dim b3Ins As New BBox3d
+         EgtGetBBoxGlob(EgtGetFirstNameInGroup(nTestId, NAME_REGION), BBFLAG, b3Ins)
+         Dim vtDiff As New Vector3d(b3Curr.Min().x - b3Ins.Min().x, b3Curr.Min().y - b3Ins.Min().y, 0)
          EgtMove(nMoveId, vtDiff)
 
          '---------------------- COUNTER PART ----------------------
@@ -2136,7 +2213,7 @@ Public Class NestingTabVM
          '---------------------- COUNTER PART ----------------------
 
          ' Gestione VeinMatching
-         VeinMatching.OnInsertPartInRaw( nMoveId)
+         VeinMatching.OnInsertPartInRaw(nMoveId)
          ' Imposto stato
          m_bVerify = True
          m_bFromParking = True
@@ -2146,46 +2223,108 @@ Public Class NestingTabVM
       ' Ricavo il punto corrente in coordinate mondo
       Dim ptCurr As Point3d
       EgtUnProjectPoint(e.Location, ptCurr)
-      ' Ricavo il vettore di movimento
-      Dim vtMove As Vector3d = ptCurr - m_ptPrev
-      ' Muovo i pezzi selezionati di quanto possibile
-      If vtMove.SqLen() > EPS_SMALL * EPS_SMALL Then
-         ' Se movimento con sola verifica finale
-         If m_bVerify Then
-            EgtMove(nMoveId, vtMove)
-            m_vtTotMove += vtMove
-         ' altrimenti caso con verifica durante il movimento
-         Else
-            ' Aggiorno regioni per nesting
-            UpdateNestRegions()
-            EnableReferenceRegion(False)
-            ' muovo il pezzo
-            EgtMovePart(nMoveId, CurrentMachine.bReducedCut, vtMove)
-            EgtSaveCollInfo()
-            ' se movimento risultante nullo, provo con movimento tangente
-            Dim bTgMoved As Boolean = False
-            If vtMove.IsSmall() Then
-               ' riprovo con movimento tangente
-               Dim vtTgMove As Vector3d = ptCurr - m_ptPrev
-               EgtTgMovePartOnCollision(nMoveId, CurrentMachine.bReducedCut, vtTgMove)
-               bTgMoved = (Not vtTgMove.IsSmall())
-            End If
-            ' se abilitato magnetico (allineamento + snap), lo provo
-            Dim bAlignMoved As Boolean = False
-            Dim bSnapMoved As Boolean = False
-            If m_bMagnetic Then
-               If Not GetLockOnRotation( nMoveId) Then
-                  EgtAlignPartOnCollision(nMoveId, CurrentMachine.bReducedCut, bAlignMoved)
-               End If
-               If m_dSnapDist > EPS_SMALL Then
-                  EgtRestoreCollInfo()
-                  EgtMovePartToSnapPointOnCollision(nMoveId, CurrentMachine.bReducedCut, m_dSnapDist, bSnapMoved)
-               End If
-            End If
-            EstCalc.ResetOrderMachiningFlag()
+
+      ' la rotazione è attivabile solo se premuto il tasto Ctrl (e non sono in parheggio)
+      m_bKeyCtrlPressed = m_bDrag AndAlso (Keyboard.Modifiers And ModifierKeys.Control) > 0
+
+      '-------------Inizio ROTAZIONE ----------------
+      If m_bKeyCtrlPressed AndAlso (Not m_bFromParking OrElse m_bKeyLeftShiftPressed) Then
+         ' Calcolo il centro di rotazione come centro del cluster
+         Dim ptCen As Point3d
+         If Not EgtGetPartPartClusterCenterGlob(nMoveId, ptCen) Then Return
+         ' definisco il vettore dal centro del pezzo alla posizione del cursore
+         Dim vtCurr As Vector3d = ptCurr - ptCen
+         Dim dLen, dHAng, dVAng As Double
+         ' recupero l'angolo orizzontale del vettore
+         vtCurr.ToSpherical(dLen, dHAng, dVAng)
+         If Not m_bStartRot Then
+            m_dAngTotal = 0
+            ' notifico una rotazione
+            m_bStartRot = True
+            m_dStartAng = dVAng
          End If
-         EgtDraw()
-         ' Eventuale notifica al VeinMatching
+         Dim dDeltaAng As Double = dVAng - m_dStartAng
+         ' gestione del passaggio da 0° → 360° evitando mantenendo la visualizzazione fluida
+         If Math.Abs(dDeltaAng) > 90 Then
+            If m_dStartAng < 180 And dVAng > 180 Then
+               dDeltaAng = dVAng - 360 - m_dStartAng
+            ElseIf m_dStartAng > 180 And dVAng < 180 Then
+               dDeltaAng = dVAng - m_dStartAng + 360
+            End If
+         End If
+         ' Rotazione del pezzo attorno al suo centro
+         If Math.Abs(dDeltaAng) > EPS_ANG_SMALL Then
+            ' se il tasto Shift è premuto (disabilitato il controllo collisioni durante il Drag) 
+            If m_bKeyLeftShiftPressed Then
+               EgtRotate(nMoveId, ptCen, Vector3d.Z_AX(), dDeltaAng, GDB_RT.GLOB)
+               m_dAngTotal += dDeltaAng
+            Else
+               ' esegue la rotazione fino ad incontrare un altro pezzo
+               RotatePartInsideBond(dDeltaAng, nMoveId)
+               EstCalc.ResetOrderMachiningFlag()
+               ' Eventuale notifica al VeinMatching
+               Dim nId As Integer = EgtGetFirstSelectedObj()
+               While nId <> GDB_ID.NULL
+                  VeinMatching.OnMovePartInRaw(nId)
+                  nId = EgtGetNextSelectedObj()
+               End While
+            End If
+            m_dStartAng = dVAng
+         End If
+         '-------------Fine ROTAZIONE ----------------
+
+      Else
+         ' -------------Inizio TRASLAZIONE ---------------
+         ' Ricavo il vettore di movimento
+         Dim vtMove As Vector3d = ptCurr - m_ptPrev
+         ' Muovo i pezzi selezionati di quanto possibile
+         If vtMove.SqLen() > EPS_SMALL * EPS_SMALL Then
+            ' notifico una traslazione
+            If Not m_bStartMove Then
+               m_bStartMove = True
+            End If
+
+            ' Se movimento con sola verifica finale (disabilitato il controllo collisioni durante il Drag)
+            If m_bVerify Then
+               EgtMove(nMoveId, vtMove)
+               m_vtTotMove += vtMove
+               ' altrimenti caso con verifica durante il movimento
+            Else
+               ' Aggiorno regioni per nesting
+               UpdateNestRegions()
+               EnableReferenceRegion(False)
+               ' muovo il pezzo
+               EgtMovePart(nMoveId, CurrentMachine.bReducedCut, vtMove)
+               EgtSaveCollInfo()
+               ' se movimento risultante nullo, provo con movimento tangente
+               Dim bTgMoved As Boolean = False
+               If vtMove.IsSmall() Then
+                  ' riprovo con movimento tangente
+                  Dim vtTgMove As Vector3d = ptCurr - m_ptPrev
+                  EgtTgMovePartOnCollision(nMoveId, CurrentMachine.bReducedCut, vtTgMove)
+                  bTgMoved = (Not vtTgMove.IsSmall())
+               End If
+               ' se abilitato magnetico (allineamento + snap), lo provo
+               Dim bAlignMoved As Boolean = False
+               Dim bSnapMoved As Boolean = False
+               If m_bMagnetic Then
+                  If Not GetLockOnRotation(nMoveId) Then
+                     EgtAlignPartOnCollision(nMoveId, CurrentMachine.bReducedCut, bAlignMoved)
+                  End If
+                  If m_dSnapDist > EPS_SMALL Then
+                     EgtRestoreCollInfo()
+                     EgtMovePartToSnapPointOnCollision(nMoveId, CurrentMachine.bReducedCut, m_dSnapDist, bSnapMoved)
+                  End If
+               End If
+               EstCalc.ResetOrderMachiningFlag()
+            End If
+            ' -------------Fine TRASLAZIONE ---------------
+         End If
+      End If
+
+      EgtDraw()
+      ' Eventuale notifica al VeinMatching
+      If m_bStartMove OrElse m_bStartRot Then
          If nMoveId = GDB_ID.SEL Then
             Dim nId As Integer = EgtGetFirstSelectedObj()
             While nId <> GDB_ID.NULL
@@ -2225,48 +2364,31 @@ Public Class NestingTabVM
 
       ' Se eseguito drag
       If Not m_bDragToStart Then
-         ' Se movimento con sola verifica finale
-         If m_bVerify Then
-            ' Determino cosa verificare
-            Dim nMoveId = If(m_nIdToSel <> GDB_ID.NULL, m_nIdToSel, GDB_ID.SEL)
-            ' Aggiorno regioni per nesting
-            UpdateNestRegions()
-            EnableReferenceRegion(False)
-            ' Eseguo verifica
-            If VerifyTrfData(nMoveId) And EgtVerifyPart(nMoveId, CurrentMachine.bReducedCut) Then
-               EstCalc.ResetOrderMachiningFlag()
-               ' Non superata riporto alla posizione iniziale
+         ' Se movimento con sola verifica finale ----- TRASLAZIONE
+         If Not m_bStartRot And m_bStartMove Then
+            VerifyMove()
+            ' Se movimento con sola verifica finale ----- TRASLAZIONE + ROTAZIONE
+         ElseIf m_bStartRot And m_bStartMove Then
+            If Not m_bFromParking Then
+               VerifyRot()
             Else
-               If m_bFromParking Then
-                  OmagOFFICEMap.refStatusBarVM.ClearOutputMessage()
-                  PreRemoveOnePart(nMoveId)
-                  VeinMatching.OnRemovePartFromRaw(nMoveId)
-               Else
-                  EgtMove(nMoveId, -m_vtTotMove)
-                  ' Eventuale notifica al VeinMatching
-                  If nMoveId = GDB_ID.SEL Then
-                     Dim nId As Integer = EgtGetFirstSelectedObj()
-                     While nId <> GDB_ID.NULL
-                        VeinMatching.OnMovePartInRaw(nId)
-                        nId = EgtGetNextSelectedObj()
-                     End While
-                  Else
-                     VeinMatching.OnMovePartInRaw(nMoveId)
-                  End If
-               End If
-               '---------------------- COUNTER PART ----------------------
-               Dim sRefGroup As String = String.Empty
-               If EgtGetInfo(nMoveId, INFO_REFGROUP, sRefGroup) Then
-                  ' accendo il layer che contiene il contatore (spento in fase di Drag)
-                  Dim nCounterLayer As Integer = EgtGetFirstNameInGroup(nMoveId, INFO_COUNTERLY)
-                  EgtSetStatus(nCounterLayer, GDB_ST.ON_)
-                  ' aggiorno il layer che indica il numero di pezzi in parcheggio
-                  CountPartInFamily(sRefGroup)
-               End If
-               '---------------------- COUNTER PART ----------------------
+               ' forzo il reset delle info di rotazione
+               m_dStartAng = 0
+               m_dAngTotal = 0
+               m_bStartRot = False
+            End If
+            VerifyMove()
+            ' verifico se la posizione finale della rotazione è corretta ----- ROTAZIONE
+         ElseIf m_bStartRot And Not m_bStartMove Then
+            If m_bFromParking Then
+               VerifyMove()
+               ' forzo il reset delle info di rotazione
+               m_dStartAng = 0
+               m_dAngTotal = 0
+               m_bStartRot = False
+            Else
+               VerifyRot()
             End If
-            m_bFromParking = False
-            ' altrimenti caso con verifica durante il movimento
          Else
             ' Basta reset alla fine
          End If
@@ -2306,6 +2428,7 @@ Public Class NestingTabVM
          VeinMatching.OnDeselectPart(m_nIdToDesel)
       End If
       ' Reset
+      GetFamilyGroupInPark()
       m_bDrag = False
       m_nIdToSel = GDB_ID.NULL
       m_nIdToDesel = GDB_ID.NULL
@@ -2320,7 +2443,7 @@ Public Class NestingTabVM
       ' Con CANC cancello i pezzi selezionati
       If e.KeyData = System.Windows.Forms.Keys.Delete Then
          RemovePart()
-      ' Con INS eseguo inserimento dei pezzi selezionati in VeinMatching
+         ' Con INS eseguo inserimento dei pezzi selezionati in VeinMatching
       ElseIf e.KeyData = System.Windows.Forms.Keys.Insert Then
          ' Vettore dei pezzi selezionati (l'inserimento di un pezzo in VM cancella la selezione)
          Dim vSel As New List(Of Integer)

OptionPanel/OptionPanelV.xaml

@@ -1,39 +1,67 @@
-<EgtFloating:EgtFloatingPanel x:Class="OptionPanelV"
+<UserControl x:Class="OptionPanelV"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
    xmlns:OmagOFFICE="clr-namespace:OmagOFFICE"
-   Width="268"
-   IsTopDockable="False" IsBottomDockable="False" IsLeftDockable="True"
-   IsRightDockable="False" Style="{StaticResource Option_EgtFloatingPanel}">
+   Width="190">
 
-   <TabControl Name="Tabs" SelectedIndex="{Binding SelItem}">
-      <TabItem Header="{Binding RawPartTabMsg}" IsEnabled="{Binding RawTabIsEnabled}"
-               Background="{Binding RawPart_Background}">
-         <TabItem.Content>
-            <OmagOFFICE:RawPartTabV DataContext="{StaticResource RawPartTabVM}"/>
-         </TabItem.Content>
-      </TabItem>
-      <TabItem Header="{Binding NestingTabMsg}" IsEnabled="{Binding NestTabIsEnabled}"> 
-         <TabItem.Content>
-            <OmagOFFICE:NestingTabV DataContext="{StaticResource NestingTabVM}"/>
-         </TabItem.Content>
-      <TabItem.Style>
-         <Style TargetType="{x:Type TabItem}" BasedOn="{StaticResource {x:Type TabItem}}">
-            <EventSetter Event="PreviewMouseDown" Handler="NestingTab_Click"/>
-         </Style>
-      </TabItem.Style>
-      </TabItem>
-      <TabItem Header="{Binding MachiningTabMsg}" IsEnabled="{Binding MachTabIsEnabled}">
-         <TabItem.Content>
-            <OmagOFFICE:MachiningTabV DataContext="{StaticResource MachiningTabVM}"/>
-         </TabItem.Content>
-      </TabItem>
-      <TabItem Header="{Binding SimulTabMsg}" IsEnabled="{Binding SimulTabIsEnabled}">
-         <TabItem.Content>
-            <OmagOFFICE:SimulTabV DataContext="{StaticResource SimulTabVM}"/>
-         </TabItem.Content>
-      </TabItem>
-   </TabControl>
-   
-</EgtFloating:EgtFloatingPanel>
+    <TabControl Name="Tabs" SelectedIndex="{Binding SelItem}" Background="Transparent"
+                Padding="0,0,0,0"
+                Margin="5,0.5,5,0"
+                Style="{StaticResource TabControlOptinPanel}">
+        <TabItem ToolTip="{Binding RawPartTabMsg}" IsEnabled="{Binding RawTabIsEnabled}"    
+                 Margin="0,0,0,0"
+                 Style="{StaticResource TabItemOptinPanel}">
+            <TabItem.Header>
+                <StackPanel Orientation="Horizontal" Width="35" Height="35">
+                    <Image Source="/Resources/NewIcons/icone-tagli-5.png" Stretch="UniformToFill"/>
+                </StackPanel>
+            </TabItem.Header>
+            <TabItem.Content>
+                <OmagOFFICE:RawPartTabV DataContext="{StaticResource RawPartTabVM}"/>
+            </TabItem.Content>
+        </TabItem>
+        <TabItem ToolTip="{Binding NestingTabMsg}" IsEnabled="{Binding NestTabIsEnabled}"
+                 Margin="0,0,0,0"
+                 Style="{StaticResource TabItemOptinPanel}">
+            <TabItem.Header>
+                <StackPanel Orientation="Horizontal" Width="35" Height="35">
+                    <Image Source="/Resources/NewIcons/Nest.png" Stretch="Uniform" />
+                </StackPanel>
+            </TabItem.Header>
+            <TabItem.Content>
+                <OmagOFFICE:NestingTabV DataContext="{StaticResource NestingTabVM}"/>
+            </TabItem.Content>
+            <!--<TabItem.Style>
+                <Style TargetType="{x:Type TabItem}" BasedOn="{StaticResource TabItemOptinPanel}">
+                    <EventSetter Event="PreviewMouseDown" Handler="NestingTab_Click"/>
+                </Style>
+            </TabItem.Style>-->
+        </TabItem>
+        <TabItem ToolTip="{Binding MachiningTabMsg}" IsEnabled="{Binding MachTabIsEnabled}"
+                 Margin="0,0,0,0"
+                 Style="{StaticResource TabItemOptinPanel}">
+            <TabItem.Header>
+                <StackPanel Orientation="Horizontal" Width="35" Height="35">
+                    <Image Source="/Resources/NewIcons/Split.png" Stretch="Uniform" />
+                </StackPanel>
+            </TabItem.Header>
+            <TabItem.Content>
+                <OmagOFFICE:MachiningTabV DataContext="{StaticResource MachiningTabVM}"/>
+            </TabItem.Content>
+        </TabItem>
+        <TabItem ToolTip="{Binding SimulTabMsg}" IsEnabled="{Binding SimulTabIsEnabled}"
+                 Margin="0,0,0,0"
+                 Style="{StaticResource TabItemOptinPanel}">
+            <TabItem.Header>
+                <StackPanel Orientation="Horizontal" Width="35" Height="35">
+                    <Image Source="/Resources/NewIcons/Simula.png" Stretch="Uniform" />
+                </StackPanel>
+            </TabItem.Header>
+            <TabItem.Content>
+                <OmagOFFICE:SimulTabV DataContext="{StaticResource SimulTabVM}"/>
+            </TabItem.Content>
+        </TabItem>
+    </TabControl>
+
+</UserControl>

OptionPanel/RawPartTab/OmagPhotoV.xaml

@@ -5,6 +5,7 @@
         xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
         xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"               
         xmlns:EgtPHOTOLib="clr-namespace:EgtPHOTOLib;assembly=EgtPHOTOLib"
+        Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"                    
         mc:Ignorable="d"
         d:DesignHeight="300" d:DesignWidth="300"
         Title="OmagPHOTO"

OptionPanel/RawPartTab/RawPartTabV.xaml

@@ -5,183 +5,222 @@
    xmlns:EgtPHOTOLib="clr-namespace:EgtPHOTOLib;assembly=EgtPHOTOLib"          
    Margin="5,5,5,0">
 
-   <Border Style="{StaticResource DefaultBorder}"
-           Padding="5,5,5,0">
-      <StackPanel>
-         <Grid>
-            <Grid.ColumnDefinitions>
-               <ColumnDefinition Width="1*"/>
-               <ColumnDefinition Width="1*"/>
-               <ColumnDefinition Width="1*"/>
-            </Grid.ColumnDefinitions>
-            <Button Style="{StaticResource OptionPanel_Button}"
-                    Grid.Column="0"
+    <StackPanel>
+        <GroupBox Header="Photo" Style="{StaticResource GroupBoxRow}">
+            <Grid  HorizontalAlignment="Center"
+         VerticalAlignment="Center" Margin="0,2.5,0,0">
+                <Grid.ColumnDefinitions>
+                    <ColumnDefinition Width="Auto"/>
+                    <ColumnDefinition Width="5"/>
+                    <ColumnDefinition Width="Auto"/>
+                    <ColumnDefinition Width="5"/>
+                    <ColumnDefinition Width="Auto"/>
+                </Grid.ColumnDefinitions>
+                <Button Style="{StaticResource OptionPanelRaw_Button}"
+                    Grid.Column="0" Grid.Row="0"
                     Visibility="{Binding SlabIdVisibility}"
                     IsEnabled="{Binding SlabIdIsEnabled}"
                     Command="{Binding SlabIdCommand}"
-                    Width="30" Height="30"
-                    Margin="0,0,0,5" >
-               <Image Source="/Resources/RawPartTab/SlabId.png" Stretch="Uniform"/>
-            </Button>
-            <Button Style="{StaticResource OptionPanel_Button}"
-                    Grid.Column="1"
+                    Margin="0,0,0,0" >
+                    <Image Source="/Resources/RawPartTab/SlabId.png" Stretch="Uniform"/>
+                </Button>
+                <Button Style="{StaticResource OptionPanelRaw_Button}"
+                    Grid.Column="2" Grid.Row="0"
                     Command="{Binding PhotoCommand}"
-                    Margin="0,0,0,5" >
-               <Image Source="/Resources/RawPartTab/Photo.png" Stretch="Uniform"/>
-            </Button>
-            <ToggleButton Style="{StaticResource OptionPanel_ToggleButton}"
-                    Grid.Column="2"
+                    Margin="0,0,0,0" >
+                    <Image Source="/Resources/RawPartTab/Photo.png" Stretch="Uniform"/>
+                </Button>
+                <ToggleButton Style="{StaticResource OptionPanelRaw_ToggleButton}"
+                    Grid.Column="4" Grid.Row="0"
                     IsChecked="{Binding PhotoWithMouse}"
-                    Width="30"
-                    Margin="0,0,0,5" >
-               <Image Source="/Resources/RawPartTab/Mouse.png" Stretch="Uniform"/>
-            </ToggleButton>
-         </Grid>
+                    Margin="0,0,0,0" >
+                    <Image Source="/Resources/RawPartTab/MovePhoto.png" Stretch="Uniform" Width="40"/>
+                </ToggleButton>
+            </Grid>
+        </GroupBox>
 
-         <UniformGrid Columns="2" Rows="3" Margin="0,0,0,0">
+        <GroupBox Header="Offset photo" Style="{StaticResource GroupBoxRow}">
+            <UniformGrid Columns="2" Rows="3" Margin="0,0,0,0">
 
-            <TextBlock Text="{Binding OffsetXMsg}"/>
-            <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetX}"
-                                   Margin="13,0,0,5"
+                <TextBlock Text="{Binding OffsetXMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetX}"
+                                   BorderThickness="0"
+                                   Margin="0,0,0,5"
                                    TextAlignment="Right"/>
-            <TextBlock Text="{Binding OffsetYMsg}"/>
-            <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetY}" 
-                                   Margin="13,0,0,5"
+                <TextBlock Text="{Binding OffsetYMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetY}" 
+                                   Margin="0,0,0,5"
                                    TextAlignment="Right"/>
-            <TextBlock Text="{Binding PhotoRotMsg}"/>
-            <EgtWpfLib5:EgtTextBox Text="{Binding PhotoRot}"
-                                      Margin="13,0,0,5"
+                <TextBlock Text="{Binding PhotoRotMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding PhotoRot}"
+                                      Margin="0,0,0,5"
                                       TextAlignment="Right"/>
-         </UniformGrid>
-      </StackPanel>
-   </Border>
+            </UniformGrid>
+        </GroupBox>
+    </StackPanel>
 
-   <!-- Definizione della Grid per il materiale -->
-    <GroupBox Header="{Binding MaterialMsg}" Margin="0,0,0,5">
+    <!-- Definizione della Grid per il materiale -->
+    <GroupBox Header="{Binding MaterialMsg}" Style="{StaticResource GroupBoxRow}">
         <StackPanel>
             <Grid>
                 <Grid.RowDefinitions>
                     <RowDefinition Height="1*"/>
                     <RowDefinition Height="1*"/>
                 </Grid.RowDefinitions>
-            <ComboBox ItemsSource="{Binding MaterialList}"
-                DisplayMemberPath="sName"
-                SelectedItem="{Binding SelMaterial}"/>
-            <TextBlock Grid.Row="1"  Text="{Binding MaterialFromDB}"
+                <ComboBox ItemsSource="{Binding MaterialList}"
+                      Style="{DynamicResource Raw_ComboBox}"
+                      DisplayMemberPath="sName"
+                      SelectedItem="{Binding SelMaterial}">
+                    <ComboBox.ItemContainerStyle>
+                        <Style TargetType="ComboBoxItem">
+                            <Setter Property="Height" Value="30"/>
+                            <Setter Property="Width" Value="150" />
+                        </Style>
+                    </ComboBox.ItemContainerStyle>
+                </ComboBox>
+
+                <TextBlock Grid.Row="1"  Text="{Binding MaterialFromDB}"
+                       Style="{StaticResource RawTextBlock}"
                        Visibility="{Binding VisibilityMaterialFromDB}"
                        Margin="0,5,0,0"/>
             </Grid>
         </StackPanel>
     </GroupBox>
 
-   <UniformGrid Columns="2" Margin="0,0,0,0">
-
-      <TextBlock Text="{Binding HeightMsg}"/>
-      <EgtWpfLib5:EgtTextBox Text="{Binding Height}"
-                             Margin="13,0,0,5"
-                             IsEnabled="{Binding HeightIsEnabled}" TextAlignment="Right"/>
-
-   </UniformGrid>
-
-   <Button Content="{Binding CurrMachMsg}"
+    <Button Content="{Binding CurrMachMsg}"
            Command="{Binding CurrMachCommand}"
            Background="{Binding CurrMach_Background}"
            Style="{StaticResource OptionPanel_TextButton}"
-           Margin="0,0,0,5"/>
+           Margin="0,5,0,0"/>
 
-   <UniformGrid Columns="2" Margin="0,0,0,5">
+    <GroupBox Header="Definizion grezzo" Style="{StaticResource GroupBoxRow}">
+        <StackPanel>
 
-      <RadioButton Content="{Binding OutlineMsg}"
+            <UniformGrid Columns="2" Margin="0,0,0,5">
+
+                <RadioButton Content="{Binding OutlineMsg}"
                    Style="{StaticResource OptionPanel_ToggleButton}"
                    IsChecked="{Binding OutlineIsChecked}"
-                   Margin="0,0,2.5,0">
-      </RadioButton>
-      <RadioButton Content="{Binding DamagedAreaMsg}"
+                   Margin="0,0,1,0">
+                </RadioButton>
+                <RadioButton Content="{Binding DamagedAreaMsg}"
                    Style="{StaticResource OptionPanel_ToggleButton}"
                    IsChecked="{Binding DAIsChecked}"
-                   Margin="2.5,0,0,0">
-      </RadioButton>
+                   Margin="1,0,0,0">
+                </RadioButton>
 
-   </UniformGrid>
+            </UniformGrid>
 
-   <ComboBox ItemsSource="{Binding TypeList}"
+            <ComboBox ItemsSource="{Binding TypeList}"
              SelectedIndex="{Binding SelType}"
+             Style="{StaticResource Raw_ComboBox}"
              Margin="0,0,0,5"
-             IsEnabled="{Binding TypeIsEnabled}"/>
+             IsEnabled="{Binding TypeIsEnabled}">
+                <ComboBox.ItemContainerStyle>
+                    <Style TargetType="ComboBoxItem">
+                        <Setter Property="Height" Value="30"/>
 
-   <!-- Definizione della Grid per definizione grezzo -->
-   <UniformGrid Columns="2" Rows="5" Margin="0,0,0,0">
+                    </Style>
+                </ComboBox.ItemContainerStyle>
+            </ComboBox>
 
-      <TextBlock Text="{Binding LengthMsg}"/>
-      <EgtWpfLib5:EgtTextBox Text="{Binding Length}"
-                             Margin="13,0,0,5"
+            <!-- Definizione della Grid per definizione grezzo -->
+            <UniformGrid Columns="2" Rows="6" Margin="0,0,0,0">
+
+                <TextBlock Text="{Binding LengthMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding Length}"
+                             Margin="0,0,0,5"
                              IsEnabled="{Binding LengthIsEnabled}" TextAlignment="Right"/>
-      <TextBlock Text="{Binding WidthMsg}"/>
-      <EgtWpfLib5:EgtTextBox Text="{Binding Width}"
-                             Margin="13,0,0,5"
+                <TextBlock Text="{Binding WidthMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding Width}"
+                             Margin="0,0,0,5"
                              IsEnabled="{Binding WidthIsEnabled}" TextAlignment="Right"/>
-      <TextBlock Text="{Binding OffsetXMsg}"/>
-      <EgtWpfLib5:EgtTextBox Text="{Binding OffsetX}"
-                             Margin="13,0,0,5"
+                <TextBlock Text="{Binding HeightMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding Height}"
+                             Margin="0,0,0,5"
+                             IsEnabled="{Binding HeightIsEnabled}" TextAlignment="Right"/>
+                <TextBlock Text="{Binding OffsetXMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding OffsetX}"
+                             Margin="0,0,0,5"
                              IsEnabled="{Binding OffsetXIsEnabled}" TextAlignment="Right"/>
-      <TextBlock Text="{Binding OffsetYMsg}"/>
-      <EgtWpfLib5:EgtTextBox Text="{Binding OffsetY}" 
-                             Margin="13,0,0,5"
+                <TextBlock Text="{Binding OffsetYMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding OffsetY}" 
+                             Margin="0,0,0,5"
                              IsEnabled="{Binding OffsetYIsEnabled}" TextAlignment="Right"/>
-      <TextBlock Text="{Binding KerfMsg}"/>
-      <EgtWpfLib5:EgtTextBox Text="{Binding Kerf, UpdateSourceTrigger=PropertyChanged}"
-                             Margin="13,0,0,5"
+                <TextBlock Text="{Binding KerfMsg}" Style="{StaticResource RawTextBlock}"/>
+                <EgtWpfLib5:EgtTextBox Text="{Binding Kerf, UpdateSourceTrigger=PropertyChanged}"
+                             Margin="0,0,0,5"
                              IsEnabled="{Binding KerfIsEnabled}" TextAlignment="Right"/>
 
-   </UniformGrid>
+            </UniformGrid>
 
-   <!-- Definizione della Grid per Punti -->
-   <GroupBox Header="{Binding PointsMsg}" Margin="0,0,0,5"
+        </StackPanel>
+    </GroupBox>
+    <!-- Definizione della Grid per Punti -->
+    <GroupBox Header="{Binding PointsMsg}" Style="{StaticResource GroupBoxRow}"
              Visibility="{Binding PointsVisibility}">
 
-      <StackPanel>
+        <StackPanel>
 
-         <UniformGrid Columns="2">
+            <UniformGrid Columns="2">
 
-            <ToggleButton Content="{Binding AddMsg}"
+                <ToggleButton Content="{Binding AddMsg}"
                           IsChecked="{Binding AddPoint}"
                           Style="{StaticResource OptionPanel_ToggleButton}"/>
-            <ToggleButton Content="{Binding RemoveMsg}" Grid.Column="1"
+                <ToggleButton Content="{Binding RemoveMsg}" Grid.Column="1"
                           IsChecked="{Binding RemovePoint}"
                           Style="{StaticResource OptionPanel_ToggleButton}"/>
-         </UniformGrid>
+            </UniformGrid>
 
-      </StackPanel>
+        </StackPanel>
 
-   </GroupBox>
+    </GroupBox>
 
-   <!-- Definizione della Grid per Zona rovinata -->
-   <GroupBox Header="{Binding DamagedAreaMsg}" Margin="0,0,0,5"
+    <!-- Definizione della Grid per Zona rovinata -->
+    <GroupBox Header="{Binding DamagedAreaMsg}" Style="{StaticResource GroupBoxRow}"
              Visibility="{Binding DAVisibility}">
 
-      <Grid>
-         <Grid.ColumnDefinitions>
-            <ColumnDefinition Width="1*"/>
-            <ColumnDefinition Width="1*"/>
-         </Grid.ColumnDefinitions>
+        <Grid>
+            <Grid.ColumnDefinitions>
+                <ColumnDefinition Width="1*"/>
+                <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
 
-         <ToggleButton Content="{Binding NewMsg}"
+            <ToggleButton Content="{Binding NewMsg}"
                        IsChecked="{Binding NewDA}"
                        Style="{StaticResource OptionPanel_ToggleButton}"/>
-         <ToggleButton Content="{Binding DeleteMsg}" Grid.Column="1"
+            <ToggleButton Content="{Binding DeleteMsg}" Grid.Column="1"
                        IsChecked="{Binding DeleteDA}"
                        Style="{StaticResource OptionPanel_ToggleButton}"/>
-     
-      </Grid>
 
-   </GroupBox>
+        </Grid>
 
-   <Button Content="{Binding ConfirmPhotoMsg}"
+    </GroupBox>
+
+    <!-- Definizione della Grid per Punti Per il Registration -->
+    <GroupBox Header="{Binding PointsRegMsg}" Style="{StaticResource GroupBoxRow}"
+             Visibility="{Binding PointsRegVisibility}">
+        <StackPanel>
+            <UniformGrid Columns="3">
+                <ToggleButton Content="{Binding AddMsg}"
+                          IsChecked="{Binding AddPointReg}"
+                          Style="{StaticResource OptionPanel_ToggleButton}"/>
+                <ToggleButton Content="{Binding ModMsg}"
+                          IsChecked="{Binding ModPointReg}"
+                          Style="{StaticResource OptionPanel_ToggleButton}"/>
+                <ToggleButton Content="{Binding RemoveMsg}"
+                          IsChecked="{Binding RemovePointReg}"
+                          Style="{StaticResource OptionPanel_ToggleButton}"/>
+            </UniformGrid>
+        </StackPanel>
+    </GroupBox>
+
+    <Button Content="{Binding ConfirmPhotoMsg}"
            Command="{Binding ConfirmPhotoCommand}"
            Visibility="{Binding ConfirmPhotoVisibility}"
            Style="{StaticResource OptionPanel_TextButton}"
            Margin="0,0,0,5"/>
 
-   <!--<EgtPHOTOLib:ProjectSlabV DataContext="{StaticResource ProjectSlabVM}"/>-->
-   
+    <!--<EgtPHOTOLib:ProjectSlabV DataContext="{StaticResource ProjectSlabVM}"/>-->
+
 </StackPanel>

OptionPanel/RawPartTab/RawPartTabV.xaml.vb

@@ -1,3 +1,5 @@
 Public Class RawPartTabV
+   Private Sub ComboBox_SelectionChanged(sender As Object, e As SelectionChangedEventArgs)
 
+   End Sub
 End Class

OptionPanel/RawPartTab/RawPartTabVM.vb

@@ -42,6 +42,17 @@ Public Class RawPartTabVM
    ' Layer per crocette temporanee
    Private m_nTempLay As Integer = GDB_ID.NULL
 
+   ' Layer per crocette dei punti REG
+   Private m_nRegGroupId As Integer = GDB_ID.NULL
+   ' Numero di spot inseriti nel grezzo corrente
+   Private m_nCountSpot As Integer = 0
+   ' Gruppo Spot attualmente selezionato
+   Private m_nCurrSpotRegId As Integer = GDB_ID.NULL
+   Private Const COUNTSPOT As String = "CountSpot"
+   Private Const REG As String = "Reg"
+   Private Const SPOTREG_ As String = "SpotReg_"
+   Private Const RADSPOT As Double = 20
+
    ' Costante minima dimensione del grezzo
    Private Const MIN_RAW_DIM As Double = 10
    ' Costante distanza di sicurezza del grezzo dal bordo
@@ -343,9 +354,11 @@ Public Class RawPartTabVM
          Dim dHeight As Double = 0
          If StringToLen(value, dHeight) And dHeight > -EPS_ZERO Then
             OmagOFFICEMap.refStatusBarVM.ClearOutputMessage()
+            Dim dPrevHeight As Double = m_dHeight
             m_dHeight = dHeight
             UpdateRawPartHeight()
             UpdateTabState()
+            MoveAllSpotRegistration(New Vector3d(0, 0, m_dHeight - dPrevHeight))
             EstCalc.SetSlabHeight(dHeight)
             OmagOFFICEMap.refMachGroupPanelVM.SelectedMachGroup.NotifyPropertyChanged("MachGroupToolTip")
          Else
@@ -741,6 +754,73 @@ Public Class RawPartTabVM
       End Set
    End Property
 
+   '-------------------- REGISTRATION '--------------------
+   Private m_AddPointReg As Boolean
+   Public Property AddPointReg As Boolean
+      Get
+         Return m_AddPointReg
+      End Get
+      Set(value As Boolean)
+         If value <> m_AddPointReg Then
+            If value Then
+               PhotoWithMouse = False
+               m_bDrag = False
+            End If
+            m_AddPointReg = value
+            NotifyPropertyChanged("AddPointReg")
+            m_ModPointReg = False
+            NotifyPropertyChanged("ModPointReg")
+            m_RemovePointReg = False
+            NotifyPropertyChanged("RemovePointReg")
+         End If
+      End Set
+   End Property
+
+   Private m_ModPointReg As Boolean
+   Public Property ModPointReg As Boolean
+      Get
+         Return m_ModPointReg
+      End Get
+      Set(value As Boolean)
+         If value <> m_ModPointReg Then
+            EgtDeselectAll()
+            EgtResetMark(m_nCurrSpotRegId)
+            EgtDraw()
+            If value Then
+               PhotoWithMouse = False
+            End If
+            m_ModPointReg = value
+            NotifyPropertyChanged("ModPointReg")
+            m_AddPointReg = False
+            NotifyPropertyChanged("AddPointReg")
+            m_RemovePointReg = False
+            NotifyPropertyChanged("RemovePointReg")
+         End If
+      End Set
+   End Property
+
+   Private m_RemovePointReg As Boolean
+   Public Property RemovePointReg As Boolean
+      Get
+         Return m_RemovePointReg
+      End Get
+      Set(value As Boolean)
+         If value <> m_RemovePointReg Then
+            If value Then
+               PhotoWithMouse = False
+               m_bDrag = False
+            End If
+            m_RemovePointReg = value
+            NotifyPropertyChanged("RemovePointReg")
+            m_AddPointReg = False
+            NotifyPropertyChanged("AddPointReg")
+            m_ModPointReg = False
+            NotifyPropertyChanged("ModPointReg")
+         End If
+      End Set
+   End Property
+   '-------------------- REGISTRATION '--------------------
+
    Private m_PointsVisibility As Visibility
    Public Property PointsVisibility As Visibility
       Get
@@ -824,7 +904,7 @@ Public Class RawPartTabVM
       End Set
    End Property
 
-   Private m_CurrMach_Background As Brush = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+   Private m_CurrMach_Background As Brush = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
    Public Property CurrMach_Background As Brush
       Get
          Return m_CurrMach_Background
@@ -943,6 +1023,12 @@ Public Class RawPartTabVM
       End Get
    End Property
 
+   Public ReadOnly Property ModMsg As String
+      Get
+         Return "Modifica"
+      End Get
+   End Property
+
    Public ReadOnly Property NewMsg As String
       Get
          Return EgtMsg(MSG_RAWPARTPAGEUC + 11)
@@ -967,6 +1053,12 @@ Public Class RawPartTabVM
       End Get
    End Property
 
+   Public ReadOnly Property PointsRegMsg As String
+      Get
+         Return "Registration"
+      End Get
+   End Property
+
 #End Region    ' Messages
 
 #Region "ToolTip"
@@ -1009,8 +1101,8 @@ Public Class RawPartTabVM
    Friend Function InitRawPart() As Boolean
       EgtSetCurrentContext(OmagOFFICEMap.refSceneHostVM.MainScene.GetCtx())
       ' Se abilitati, visualizzo bottone per dati lastra
-      Dim bSlabId As Boolean = ( GetMainPrivateProfileInt( S_RAWPART, K_SLABID, 0) <> 0)
-      SlabIdVisibility = If( bSlabId, Windows.Visibility.Visible, Windows.Visibility.Hidden)
+      Dim bSlabId As Boolean = (GetMainPrivateProfileInt(S_RAWPART, K_SLABID, 0) <> 0)
+      SlabIdVisibility = If(bSlabId, Windows.Visibility.Visible, Windows.Visibility.Hidden)
       ' Se disponibile, imposto possibilità di contorno da foto
       If EstPhoto.GetContour() = GDB_ID.NULL Then
          If m_TypeList.Count = 3 Then m_TypeList.RemoveAt(2)
@@ -1092,10 +1184,26 @@ Public Class RawPartTabVM
          RecalcRawPart(True)
       End If
       ' Abilitazione eventuale bottone per dati slab
-      SlabIdIsEnabled = ( EstCalc.GetRawId() <> GDB_ID.NULL)
+      SlabIdIsEnabled = (EstCalc.GetRawId() <> GDB_ID.NULL)
       ' Creo layer temporaneo per crocette
       m_nTempLay = EgtCreateGroup(GDB_ID.ROOT)
       EgtSetLevel(m_nTempLay, GDB_LV.TEMP)
+
+      ' Veroifico se esiste il gruppo "REG"
+      Dim nIdRaws As Integer = EgtGetParent(EstCalc.GetRawId())
+      Dim nIdReg As Integer = EgtGetFirstNameInGroup(EgtGetParent(nIdRaws), "Reg")
+      If nIdReg <> GDB_ID.NULL Then
+         m_nRegGroupId = nIdReg
+         EgtGetInfo(m_nRegGroupId, COUNTSPOT, m_nCountSpot)
+         ' Lo rendo visibile
+         EgtSetStatus(m_nRegGroupId, GDB_ST.ON_)
+      Else
+         ' Creo layer per definire i punti di REG
+         m_nRegGroupId = EgtCreateGroup(EgtGetParent(nIdRaws))
+         EgtSetName(m_nRegGroupId, REG)
+         m_nCountSpot = 0
+      End If
+
       ' Determino modalità di definizione
       OutlineIsChecked = True
       If EgtExistsInfo(EstCalc.GetRawId(), KEY_RAWBYPOINTS) Then
@@ -1177,6 +1285,8 @@ Public Class RawPartTabVM
       WriteMainPrivateProfileString(S_RAWPART, K_RAWOFFSX, DoubleToString(m_dOffsetX, 2))
       WriteMainPrivateProfileString(S_RAWPART, K_RAWOFFSY, DoubleToString(m_dOffsetY, 2))
       WriteMainPrivateProfileString(S_RAWPART, K_RAWKERF, DoubleToString(m_dKerf, 2))
+      ' Nascondo il gruppo dei punti Reg
+      EgtSetStatus(m_nRegGroupId, GDB_ST.OFF)
       ' Se ci sono pezzi nel grezzo
       If EgtGetFirstPartInRawPart(EstCalc.GetRawId()) <> GDB_ID.NULL Then
          ' Cancello tutte le lavorazioni
@@ -1310,7 +1420,7 @@ Public Class RawPartTabVM
          AdjustRawPartPosition()
       End If
       ' Abilitazione eventuale bottone per dati slab
-      SlabIdIsEnabled = ( EstCalc.GetRawId() <> GDB_ID.NULL)
+      SlabIdIsEnabled = (EstCalc.GetRawId() <> GDB_ID.NULL)
       ' Aggiorno visualizzazione
       EgtDraw()
    End Sub
@@ -1374,7 +1484,6 @@ Public Class RawPartTabVM
          nInvert = -1
       End If
       Dim dOffset As Double = (-m_dKerf - m_PrecKerf) * nInvert
-      EgtSaveFile("c:\EgtData\OmagOFFICE\Temp\Error.nge", NGE.TEXT)
       Dim nCount As Integer = 0
       Dim bOK As Boolean = EgtOffsetCurve(nKerfId, dOffset, OFF_TYPE.EXTEND)
       EgtSetColor(nKerfId, m_KerfCol)
@@ -1413,7 +1522,7 @@ Public Class RawPartTabVM
       If EstCalc.GetRawId() = GDB_ID.NULL Then
          RecalcRawPart(True)
          Return
-      ' se da cancellare
+         ' se da cancellare
       ElseIf m_dHeight < EPS_SMALL Then
          ' Se ci sono pezzi
          If EgtGetFirstPartInRawPart(EstCalc.GetRawId()) <> GDB_ID.NULL Then
@@ -1434,7 +1543,7 @@ Public Class RawPartTabVM
          End If
          ' Elimino il grezzo
          EgtRemoveRawPart(EstCalc.GetRawId())
-      ' altrimenti da aggiornare
+         ' altrimenti da aggiornare
       Else
          ' Salvo vecchia altezza
          Dim dOldHeight As Double = EstCalc.GetRawHeight()
@@ -1468,7 +1577,7 @@ Public Class RawPartTabVM
          EstPhoto.UpdateContour()
       End If
       ' Abilitazione eventuale bottone per dati slab
-      SlabIdIsEnabled = ( EstCalc.GetRawId() <> GDB_ID.NULL)
+      SlabIdIsEnabled = (EstCalc.GetRawId() <> GDB_ID.NULL)
       ' Aggiorno visualizzazione
       EgtDraw()
    End Sub
@@ -1576,6 +1685,10 @@ Public Class RawPartTabVM
          ' Muovo eventuali cerchietti alle estremità della curva di contorno
          MoveCircles(vtMove)
       End If
+      ' Muovo eventuali punti SpotReg
+      If m_nRegGroupId <> GDB_ID.NULL Then
+         MoveAllSpotRegistration(vtMove)
+      End If
       ' Incremento opportunamente l'offset della fotografia
       Dim dPhotoOffsetX As Double = m_dPhotoOffsetX + vtMove.x
       Dim dPhotoOffsetY As Double = m_dPhotoOffsetY + vtMove.y
@@ -1831,6 +1944,106 @@ Public Class RawPartTabVM
       Return True
    End Function
 
+   Private Function MoveSpotRegistration(nIdGroup As Integer, vtMove As Vector3d) As Boolean
+      If nIdGroup = GDB_ID.NULL Then Return False
+      ' Non ci deve essere movimento in Z
+      vtMove.z = 0
+      ' Recupero il cercio di riferimento
+      Dim nArcId As Integer = EgtGetFirstInGroup(nIdGroup)
+      Dim b3Crv As New BBox3d
+      EgtGetBBoxGlob(nArcId, GDB_BB.STANDARD, b3Crv)
+      b3Crv.Move(vtMove)
+      If b3Crv.Min().x < m_ptTableMin.x + 10 * EPS_SMALL Then
+         vtMove.x += m_ptTableMin.x + 10 * EPS_SMALL - b3Crv.Min().x
+      ElseIf b3Crv.Max().x > m_ptTableMin.x + m_dTableLength + 10 * EPS_SMALL Then
+         vtMove.x += m_ptTableMin.x + m_dTableLength - 10 * EPS_SMALL - b3Crv.Max().x
+      End If
+      If b3Crv.Min().y < m_ptTableMin.y + 10 * EPS_SMALL Then
+         vtMove.y += m_ptTableMin.y + 10 * EPS_SMALL - b3Crv.Min().y
+      ElseIf b3Crv.Max().y > m_ptTableMin.y + m_dTableWidth + 10 * EPS_SMALL Then
+         vtMove.y += m_ptTableMin.y + m_dTableWidth - 10 * EPS_SMALL - b3Crv.Max().y
+      End If
+      ' muovo il gruppo
+      EgtMove(nIdGroup, vtMove)
+      EgtDraw()
+      Return True
+   End Function
+
+   Private Sub MoveAllSpotRegistration(vtMove As Vector3d)
+      Dim nId As Integer = EgtGetFirstInGroup(m_nRegGroupId)
+      While nId <> GDB_ID.NULL
+         EgtMove(nId, vtMove)
+         nId = EgtGetNext(nId)
+      End While
+      EgtDraw()
+   End Sub
+
+   Private Function CreateSpotRegistration(nLayerIdReg As Integer, ptP As Point3d, nIndexSpot As Integer) As Boolean
+      ' creo uno specifico layer per ogni spot (definito da una croce inscritta in un cerchio)
+      Dim nIdSpotLay As Integer = EgtCreateGroup(nLayerIdReg)
+      ' Aggiungo cerchio
+      Dim nCircId As Integer = EgtCreateCircle(nIdSpotLay, ptP, RADSPOT)
+      ' Inserisco una croce all'interno del 
+      Dim nLineVId As Integer = EgtCreateLinePVL(nIdSpotLay, ptP, Vector3d.Y_AX, RADSPOT)
+      EgtExtendCurveStartByLen(nLineVId, RADSPOT)
+      Dim nLineHId As Integer = EgtCreateLinePVL(nIdSpotLay, ptP, Vector3d.X_AX, RADSPOT)
+      EgtExtendCurveStartByLen(nLineHId, RADSPOT)
+      Dim nTextId As Integer = EgtCreateText(nIdSpotLay, ptP + New Vector3d(1, 1, 0), nIndexSpot.ToString, 10)
+      ' coloro gli oggetti appena creati ed assegno il nome
+      Dim bOk As Boolean = EgtSetColor(nCircId, New Color3d(0, 0, 0))
+      bOk = bOk And EgtSetName(nCircId, SPOTREG_ & "Arc")
+      bOk = bOk And EgtSetColor(nLineVId, New Color3d(0, 0, 0))
+      bOk = bOk And EgtSetName(nLineVId, SPOTREG_ & "LineV")
+      bOk = bOk And EgtSetColor(nLineHId, New Color3d(0, 0, 0))
+      bOk = bOk And EgtSetName(nLineHId, SPOTREG_ & "LineH")
+      bOk = bOk And EgtSetColor(nTextId, New Color3d(255, 0, 0))
+      bOk = bOk And EgtSetName(nTextId, SPOTREG_ & "Text")
+      ' assegno il nome del gruppo corrente
+      bOk = bOk And EgtSetName(nIdSpotLay, SPOTREG_ & nIndexSpot.ToString)
+      If bOk Then
+         ' Aggiorno il contatore degli Spot
+         EgtSetInfo(nLayerIdReg, COUNTSPOT, nIndexSpot)
+         m_nCountSpot = nIndexSpot
+      End If
+      Return bOk
+   End Function
+
+   Private Function RemoveSpotRegistration(nSpotRegId As Integer) As Boolean
+      Dim nIndSpotReg As Integer = GetIndexGroupSpotReg(nSpotRegId)
+      If Not EgtErase(nSpotRegId) Then Return False
+      ' faccio scorrere tutti i gruppi ed eventualmente li rinomino
+      Dim n_IdSR As Integer = EgtGetFirstInGroup(m_nRegGroupId)
+      m_nCountSpot -= 1
+      EgtSetInfo(m_nRegGroupId, COUNTSPOT, m_nCountSpot)
+      While n_IdSR <> GDB_ID.NULL
+         Dim nCurrIndSpotReg As Integer = GetIndexGroupSpotReg(n_IdSR)
+         If nCurrIndSpotReg > nIndSpotReg Then
+            ' Recupero il testo
+            Dim nIdtext As Integer = EgtGetFirstNameInGroup(n_IdSR, SPOTREG_ & "Text")
+            nCurrIndSpotReg -= 1
+            EgtModifyText(nIdtext, nCurrIndSpotReg.ToString)
+            EgtSetName(n_IdSR, SPOTREG_ & nCurrIndSpotReg.ToString)
+         End If
+         n_IdSR = EgtGetNext(n_IdSR)
+      End While
+      EgtDraw()
+      Return True
+   End Function
+
+   Private Function GetIndexGroupSpotReg(nSpotRegId As Integer) As Integer
+      Dim sNameParent As String = String.Empty
+      EgtGetName(nSpotRegId, sNameParent)
+      ' Ricavo l'indice dal nome
+      Dim sItems As String() = sNameParent.Split("_"c)
+      Dim nCurrIndex As Integer = 0
+      If sItems.Count = 2 Then
+         If Not Integer.TryParse(sItems(1), nCurrIndex) Then
+            nCurrIndex = -1
+         End If
+      End If
+      Return nCurrIndex
+   End Function
+
    Private Function ValidateCurrMachMatThick() As Boolean
       ' Verifico che le lavorazioni correnti siano compatibili con materiale e spessore
       ' Lama
@@ -1881,7 +2094,7 @@ Public Class RawPartTabVM
          OmagOFFICEMap.refOptionPanelVM.MachTabIsEnabled = True
          OmagOFFICEMap.refOptionPanelVM.SimulTabIsEnabled = True
          OmagOFFICEMap.refOptionPanelVM.RawPart_Background = OmagOFFICEDictionary.TabControl_Header_Background
-         CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+         CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
       Else
          OmagOFFICEMap.refOptionPanelVM.NestTabIsEnabled = False
          OmagOFFICEMap.refOptionPanelVM.MachTabIsEnabled = False
@@ -1892,7 +2105,7 @@ Public Class RawPartTabVM
       If Not ValidateCurrMachToolIsInSetUp() Then
          OmagOFFICEMap.refMachinePanelVM.SetUp_Background = Brushes.Red
       Else
-         OmagOFFICEMap.refMachinePanelVM.SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
+         OmagOFFICEMap.refMachinePanelVM.SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
       End If
       If String.IsNullOrWhiteSpace(CurrentMachine.sCurrSawing) And String.IsNullOrWhiteSpace(CurrentMachine.sCurrWaterJetting) Then
          CurrMach_Background = Brushes.Red
@@ -1945,32 +2158,32 @@ Public Class RawPartTabVM
    End Property
 
    Public Sub SlabId(ByVal param As Object)
-      Dim nRawId As Integer =  EstCalc.GetRawId()
+      Dim nRawId As Integer = EstCalc.GetRawId()
       If nRawId = GDB_ID.NULL Then Return
       ' Finestra input dati
       Dim DlgSlabIdVM As New SlabIdWindowVM()
       Dim DlgSlabIdV As New SlabIdWindowV(Application.Current.MainWindow, DlgSlabIdVM)
       ' Recupero eventuali vecchi dati della lastra
       Dim sBlockName As String = "" : Dim sSlabNbr As String = ""
-      EgtGetInfo( nRawId, INFO_RAW_BLOCK, sBlockName)
-      EgtGetInfo( nRawId, INFO_RAW_SLABNBR, sSlabNbr)
-      DlgSlabIdVM.SetData( sBlockName, sSlabNbr)
+      EgtGetInfo(nRawId, INFO_RAW_BLOCK, sBlockName)
+      EgtGetInfo(nRawId, INFO_RAW_SLABNBR, sSlabNbr)
+      DlgSlabIdVM.SetData(sBlockName, sSlabNbr)
       ' Visualizzo finestra richiesta dati
       If DlgSlabIdV.ShowDialog() Then
-         DlgSlabIdVM.GetData( sBlockName, sSlabNbr)
+         DlgSlabIdVM.GetData(sBlockName, sSlabNbr)
          ' Assegno info
-         EgtSetInfo( nRawId, INFO_RAW_BLOCK, sBlockName)
-         EgtSetInfo( nRawId, INFO_RAW_SLABNBR, sSlabNbr)
+         EgtSetInfo(nRawId, INFO_RAW_BLOCK, sBlockName)
+         EgtSetInfo(nRawId, INFO_RAW_SLABNBR, sSlabNbr)
          ' Aggiorno nome lastra
-         If Not String.IsNullOrWhiteSpace( sBlockName) And Not String.IsNullOrWhiteSpace( sBlockName) Then
+         If Not String.IsNullOrWhiteSpace(sBlockName) And Not String.IsNullOrWhiteSpace(sBlockName) Then
             Dim sSlabName = sBlockName & "-" & sSlabNbr
-            EstCalc.SetSlabName( sSlabName)
+            EstCalc.SetSlabName(sSlabName)
             ' notifico il MachGroup Corrente
             OmagOFFICEMap.refMachGroupPanelVM.SelectedMachGroup.NotifyPropertyChanged("MachGroupToolTip")
          End If
          ' Cancello vecchio BarCode e se definito inserisco nuovo
          Dim sBarCode As String = sBlockName & " - " & sSlabNbr
-         ShowBarCode( nRawId, sBarCode)
+         ShowBarCode(nRawId, sBarCode)
          ' Aggiorno visualizzazione
          EgtDraw()
       End If
@@ -2141,7 +2354,7 @@ Public Class RawPartTabVM
       EstCalc.SetSlabHeight(m_dHeight)
       ' Visualizzo eventuale codice
       Dim sBarCode As String = sBlockCode & " - " & sSlabCode
-      ShowBarCode( EstCalc.GetRawId(), sBarCode)
+      ShowBarCode(EstCalc.GetRawId(), sBarCode)
       ' notifico il MachGroup Corrente
       OmagOFFICEMap.refMachGroupPanelVM.SelectedMachGroup.NotifyPropertyChanged("MachGroupToolTip")
       ' Carico contorno
@@ -2227,6 +2440,52 @@ Public Class RawPartTabVM
                m_dDragPar = -1
                Exit While
             End If
+            ' ---------- SELEZIONE SpotReg ---------- 
+         ElseIf m_AddPointReg Then
+            ' Acquisisco punto da disegno
+            EgtUnProjectPoint(e.Location, m_ptPrev)
+            Dim ptRawMax As Point3d = GetRawPtMax()
+            m_ptPrev.z = ptRawMax.z + 0.1
+            ' Inserisco un nuovo punto registrazione
+            CreateSpotRegistration(m_nRegGroupId, m_ptPrev, m_nCountSpot + 1)
+            EgtDraw()
+            ' disattivo il comando di inserimento
+            m_AddPointReg = False
+            NotifyPropertyChanged("AddPointReg")
+            Return
+         ElseIf m_ModPointReg Then
+            If sName.StartsWith(SPOTREG_) Then
+               EgtDeselectAll()
+               EgtResetMark(m_nCurrSpotRegId)
+               ' recupero recupero il centro della prima curva
+               Dim nArcId As Integer = EgtGetFirstInGroup(nSelId)
+               Dim nIdParent As Integer = EgtGetParent(nSelId)
+               EgtSelectGroupObjs(nIdParent)
+               EgtSetMark(nIdParent)
+               EgtDraw()
+               ' Acquisisco punto da disegno
+               EgtUnProjectPoint(e.Location, m_ptPrev)
+               m_bDrag = True
+               m_nDragEnt = nIdParent
+               ' Salvo l'Id del punto SpotReg da spostare
+               m_nCurrSpotRegId = nIdParent
+               ' esco dal ciclo 
+               Return
+            End If
+         ElseIf m_RemovePointReg Then
+            If sName.StartsWith(SPOTREG_) Then
+               ' recupero recupero il centro della prima curva
+               Dim nIdParent As Integer = EgtGetParent(nSelId)
+               RemoveSpotRegistration(nIdParent)
+               EgtDraw()
+               EgtErase(nIdParent)
+               m_RemovePointReg = False
+               NotifyPropertyChanged("RemovePointReg")
+
+               ' esco dal ciclo 
+               Return
+            End If
+            ' ---------- SELEZIONE SpotReg ---------- 
          ElseIf sName = NAME_RAW_SOLID Then
             m_bDrag = EgtUnProjectPoint(e.Location, m_ptPrev)
             m_nDragEnt = -1
@@ -2377,6 +2636,8 @@ Public Class RawPartTabVM
       ' Eseguo modifica
       If m_PhotoWithMouse Then
          ModifyPhoto(ptCurr)
+      ElseIf m_ModPointReg Then
+         MoveSpotRegistration(m_nDragEnt, ptCurr - m_ptPrev)
       Else
          Select Case GetRawMode()
             Case RAWMODE.RECTANGLE

OptionPanel/SimulTab/SimulTabV.xaml

@@ -3,31 +3,32 @@
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Margin="5,5,5,0">
 
-   <GroupBox Header="{Binding MachViewMsg}" Margin="0,0,0,5">
+    <GroupBox Header="{Binding MachViewMsg}" Style="{StaticResource GroupBoxRow}">
       <UniformGrid Columns="3">
          
          <Button Command="{Binding ToolModeCommand}"
-                 Style="{StaticResource OptionPanel_NestingButton}">
+                 Style="{StaticResource Simul_Button_Img}">
             <Image Source="/Resources/SimulTab/ToolMode.png" Stretch="Uniform"/>
          </Button>
-         <Button Command="{Binding HeadModeCommand}"
-                 Style="{StaticResource OptionPanel_NestingButton}">
+         <Button Command="{Binding Simul_Button_Img}"
+                 Style="{StaticResource Simul_Button_Img}">
             <Image Source="/Resources/SimulTab/HeadMode.png" Stretch="Uniform"/>
          </Button>
          <Button Command="{Binding MachModeCommand}"
-                 Style="{StaticResource OptionPanel_NestingButton}">
+                 Style="{StaticResource Simul_Button_Img}">
             <Image Source="/Resources/SimulTab/MachMode.png" Stretch="Uniform"/>
          </Button>
          
       </UniformGrid>     
    </GroupBox>
 
-    <GroupBox BorderThickness="0">
+    <Border Style="{StaticResource Border}" Margin="0,5,0,0">
         <StackPanel DataContext="{Binding MySimul}">
+            
             <UniformGrid Columns="3" Margin="0,10,0,5">
 
                 <Button Command="{Binding StepCommand}" Grid.Column="0" Grid.Row="3"
-                        Style="{StaticResource OptionPanel_NestingButton}"
+                        Style="{StaticResource Simul_Button_Img}"
                         ToolTip="{Binding OneStepToolTip}" Margin="0,0,2.5,0">
                    <Image Source="/Resources/SimulTab/PlayStep.png"
                           HorizontalAlignment="Center" VerticalAlignment="Center"
@@ -35,14 +36,14 @@
                 </Button>
              
                 <Button Command="{Binding PlayPauseCommand}" Grid.Column="1" Grid.Row="3"
-                        Style="{StaticResource OptionPanel_NestingButton}"
+                        Style="{StaticResource Simul_Button_Img}"
                         ToolTip="{Binding PlayPauseToolTip}" Margin="2.5,0,2.5,0">
                    <Image Source="{Binding PlayPauseImage}" HorizontalAlignment="Center"
                           VerticalAlignment="Center" Height="50" Width="50"/>
                 </Button>
              
                 <Button Command="{Binding StopCommand}" Grid.Column="2" Grid.Row="3"
-                        Style="{StaticResource OptionPanel_NestingButton}"
+                        Style="{StaticResource Simul_Button_Img}"
                         ToolTip="{Binding StopHomeToolTip}" Margin="2.5,0,0,0">
                 <Image Source="/Resources/SimulTab/Stop.png"
                        HorizontalAlignment="Center" VerticalAlignment="Center"
@@ -50,35 +51,41 @@
                 </Button>
              
              </UniformGrid>
-             
-             <TextBlock Text="{Binding StatusMsg}" FontSize="15" TextAlignment="Center" Margin="10,5,10,0"/>
+
+            <TextBlock Text="{Binding StatusMsg}" FontSize="15" TextAlignment="Center" Margin="10,5,10,0" 
+                       Style="{StaticResource SimulTextBlock}"/>
              
              <Slider Name="SpeedSlider" Grid.Row="5" Grid.ColumnSpan="3" Height="30"
                      Minimum="1"  Maximum="100" TickPlacement="BottomRight" TickFrequency="10"
                      Margin="0,5,0,0" Value="{Binding SliderValue}"/>
-             <Grid Margin="0,0,0,5">
+
+            <Grid >
                 <Grid.ColumnDefinitions>
-                   <ColumnDefinition Width="1*"/>
-                   <ColumnDefinition Width="1*"/>
-                   <ColumnDefinition Width="1*"/>
+                    <ColumnDefinition Width="1*"/>
+                    <ColumnDefinition Width="1*"/>
+                    <ColumnDefinition Width="1*"/>
                 </Grid.ColumnDefinitions>
                 <Grid.RowDefinitions>
-                   <RowDefinition Height="0.5*"/>
-                   <RowDefinition Height="0.5*"/>
+                    <RowDefinition Height="0.5*"/>
+                    <RowDefinition Height="0.5*"/>
                 </Grid.RowDefinitions>
-             
+
                 <TextBlock Text="{Binding TName}" Grid.Row="0" FontSize="15" HorizontalAlignment="Center"
-             		VerticalAlignment="Center" TextAlignment="Center" Margin="5,5,5,0" Grid.ColumnSpan="2" />
+             		       VerticalAlignment="Center" TextAlignment="Center" Margin="5,5,5,0" Grid.ColumnSpan="2" 
+                           Style="{StaticResource SimulTextBlock}"/>
                 <TextBlock Text="{Binding SValue}" Grid.Row="0" Grid.Column="2"  FontSize="15" HorizontalAlignment="Center"
-             		VerticalAlignment="Center" TextAlignment="Right" Margin="0,5,5,5" />
+             		       VerticalAlignment="Center" TextAlignment="Right" Margin="0,5,5,5" 
+                           Style="{StaticResource SimulTextBlock}"/>
                 <TextBlock Text="{Binding GCode}" Grid.Row="1" FontSize="15" HorizontalAlignment="Center"
-             		VerticalAlignment="Center" TextAlignment="Center" Margin="5,5,5,0" Grid.ColumnSpan="2" />
+             		       VerticalAlignment="Center" TextAlignment="Center" Margin="5,5,5,0" Grid.ColumnSpan="2" 
+                           Style="{StaticResource SimulTextBlock}"/>
                 <TextBlock Text="{Binding FValue}" Grid.Row="1" Grid.Column="2" FontSize="15" HorizontalAlignment="Center"
-             		VerticalAlignment="Center" TextAlignment="Right" Margin="0,5,5,5" />
-             
-             </Grid>
-             
-             <ItemsControl ItemsSource="{Binding MachineAxisList}" Margin="0,0,0,5">
+             		       VerticalAlignment="Center" TextAlignment="Right" Margin="0,5,5,5" 
+                           Style="{StaticResource SimulTextBlock}"/>
+
+            </Grid>
+
+            <ItemsControl ItemsSource="{Binding MachineAxisList}" Margin="0,0,0,5">
                 <ItemsControl.ItemTemplate>
                    <DataTemplate>
                       <Grid Margin="0,0,0,5">
@@ -89,11 +96,12 @@
              
                          <TextBlock Text="{Binding Token}" FontSize="15"
                                     HorizontalAlignment="Center" VerticalAlignment="Center"
-                                    TextWrapping="Wrap" TextAlignment="Center"/>
+                                    TextWrapping="Wrap" TextAlignment="Center"
+                                    Style="{StaticResource SimulTextBlock}"/>
                          <TextBox Text="{Binding Value, UpdateSourceTrigger=PropertyChanged}" Grid.Column="1"
                                   IsReadOnly="{Binding IsReadOnlyAxesValue}"
                                   IsEnabled="{Binding IsEnabledAxesValue}"
-                                  TextAlignment="Right">
+                                  Style="{StaticResource AxisTextBox}">
                             <TextBox.InputBindings>
                                <KeyBinding Key="Enter" Command="{Binding ManualAxisModifyCommand}"/>
                             </TextBox.InputBindings>
@@ -104,10 +112,9 @@
                 </ItemsControl.ItemTemplate>
              </ItemsControl>
         </StackPanel>
-    </GroupBox>
+    </Border>
 
-    <GroupBox Header="{Binding EstimationMsg}"
-              IsEnabled="{Binding Estimation_IsEnabled}"
+    <GroupBox Header="{Binding EstimationMsg}" Style="{StaticResource GroupBoxRow}"
               DataContext="{Binding MyEstim}">
 
       <StackPanel Margin="2,2,2,0">
@@ -116,8 +123,7 @@
 
             <TextBlock Text="{Binding TimeMsg}"/>
             <TextBox Text="{Binding Time, Mode=OneWay}"
-                        IsReadOnly="True"
-                        TextAlignment="Right"/>
+                        Style="{StaticResource EstimateTextBox}"/>
 
          </UniformGrid>
 
@@ -125,28 +131,25 @@
 
             <TextBlock Text="{Binding CutLenMsg}"/>
             <TextBox Text="{Binding CutLen, Mode=OneWay}"
-                        IsReadOnly="True"
-                        TextAlignment="Right"/>
+                        Style="{StaticResource EstimateTextBox}"/>
 
          </UniformGrid>
          <UniformGrid Columns="2" Margin="0,0,0,5">
 
             <TextBlock Text="{Binding NetAreaMsg}"/>
             <TextBox Text="{Binding NetArea, Mode=OneWay}"
-                        IsReadOnly="True"
-                        TextAlignment="Right"/>
+                        Style="{StaticResource EstimateTextBox}"/>
 
          </UniformGrid>
          <UniformGrid Columns="2" Margin="0,0,0,5">
 
             <TextBlock Text="{Binding UsageMsg}"/>
             <TextBox Text="{Binding Usage, Mode=OneWay}"
-                        IsReadOnly="True"
-                        TextAlignment="Right"/>
+                     Style="{StaticResource EstimateTextBox}"/>
 
          </UniformGrid>
 
-         <Button Content="{Binding DetailsMsg}" Height="30"
+            <Button Content="{Binding DetailsMsg}" Style="{StaticResource SimulPanel_TextButton}"
                     Command="{Binding Details_Command}"
                     Margin="0,0,0,2"/>
 

OptionPanel/SimulTab/SimulTabVM.vb

@@ -137,10 +137,10 @@ Public Class SimulTabVM
          MyEstim.Estimation_IsEnabled = False
       End If
       ' Impostazioni box stime
-      NotifyPropertyChanged("Time")
-      NotifyPropertyChanged("CutLen")
-      NotifyPropertyChanged("NetArea")
-      NotifyPropertyChanged("Usage")
+      MyEstim.NotifyPropertyChanged("Time")
+      MyEstim.NotifyPropertyChanged("CutLen")
+      MyEstim.NotifyPropertyChanged("NetArea")
+      MyEstim.NotifyPropertyChanged("Usage")
       ' Nascondo eventuali pezzi in parcheggio
       HideParkedParts()
       ' Nascondo eventuale contorno da foto

OptionWindow/OptionWindowV.xaml

@@ -21,9 +21,11 @@
         </Grid.RowDefinitions>
       
       <GroupBox Header="{Binding CurrentLanguageMsg}"
+                Style="{StaticResource GroupBoxOptionWnd}"
                 Grid.Column="0" Margin="0,0,5,5">
          <UniformGrid Rows="2">
             <ComboBox ItemsSource="{Binding LanguageList, Mode=OneWay}" Height="25"
+                      Style="{DynamicResource OptionWnd_ComboBox}"
                       SelectedItem="{Binding SelLanguage}" DisplayMemberPath="Name"/>
             <TextBlock Text="{Binding LanguageAdvertMsg}" TextWrapping="Wrap"
                        TextAlignment="Center"/>
@@ -31,20 +33,25 @@
       </GroupBox>
 
       <GroupBox Header="{Binding MeasureUnitMsg}"
+                Style="{StaticResource GroupBoxOptionWnd}"
                 Grid.Column="1" Margin="0,0,5,5">
          <ComboBox ItemsSource="{Binding MeasureUnitList, Mode=OneWay}"
+                   Style="{DynamicResource OptionWnd_ComboBox}"
                    SelectedIndex="{Binding SelMeasureUnit}"
                    Height="25" Width="60"/>
       </GroupBox>
 
       <GroupBox Header="{Binding SideAngleHdr}"
+                Style="{StaticResource GroupBoxOptionWnd}"
                 Grid.Row="1" Margin="0,0,5,5">
          <ComboBox ItemsSource="{Binding SideModeList, Mode=OneWay}"
+                   Style="{DynamicResource OptionWnd_ComboBox}"
                    SelectedIndex="{Binding SelSideModeIndex}"
                    Height="25"/>
       </GroupBox>
 
       <GroupBox Header="{Binding DirectInsertHdr}"
+                Style="{StaticResource GroupBoxOptionWnd}"
                 Grid.Row="2" Margin="0,0,5,5">
          <UniformGrid Rows="2">
             <Grid>
@@ -63,7 +70,8 @@
       </GroupBox>
 
         <GroupBox Header="{Binding TextColorMsg}"
-                Grid.Column="1" Grid.Row="1" Margin="0,0,5,5">
+                  Style="{StaticResource GroupBoxOptionWnd}"
+                  Grid.Column="1" Grid.Row="1" Margin="0,0,5,5">
             <Button Height="25" Width="60" Margin="0,5,0,0" Background="{Binding TextColorBackground}" 
                Command="{Binding ChangeColorCommand}" IsEnabled="{Binding bSelOk}" Style="{StaticResource Option_ColorButton}">
             </Button>
@@ -71,6 +79,7 @@
 
        <!--SideAngle from color-->
         <GroupBox Name="ColorToSideAngGpBx" Header="{Binding ColorToSideAngMsg}"
+                  Style="{StaticResource GroupBoxOptionWnd}"
                   Grid.Column="0" Grid.Row="3" Margin="0,0,5,5" >
 
             <Grid>
@@ -146,6 +155,7 @@
 
        <!--Engrave from color-->
         <GroupBox Name="ColorToEngraveGpBx" Header="{Binding ColorToEngraveMsg}"
+                  Style="{StaticResource GroupBoxOptionWnd}"
                   Grid.Column="1" Grid.Row="3" Margin="0,0,5,5" >
 
             <Grid>

Project/ProjectV.xaml

@@ -1,35 +1,40 @@
-<EgtFloating:EgtFloatingManager x:Class="ProjectV"
+<DockPanel x:Class="ProjectV"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-   xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
    xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
-   xmlns:OmagOFFICE="clr-namespace:OmagOFFICE">
-      
-   <EgtFloating:EgtFloatingTray x:Name="LEFTTRAY" DockPanel.Dock="Left">
-      <OmagOFFICE:OptionPanelV DataContext="{StaticResource OptionPanelVM}"
+   xmlns:OmagOFFICE="clr-namespace:OmagOFFICE"
+   Background="{StaticResource Omag_DarkGray}">
+
+    <DockPanel x:Name="LEFTTRAY" DockPanel.Dock="Left" Background="Transparent">
+        <OmagOFFICE:OptionPanelV DataContext="{StaticResource OptionPanelVM}"
                                Height="{Binding MaxHeight,ElementName=LEFTTRAY}"/>
-   </EgtFloating:EgtFloatingTray>
-   
-   <EgtFloating:EgtFloatingTray x:Name="TOPTRAY" DockPanel.Dock="Top">
-      <OmagOFFICE:ShowPanelV DataContext="{StaticResource ShowPanelVM}"/>
-      <OmagOFFICE:ViewPanelV DataContext="{StaticResource ViewPanelVM}"/>
-      <OmagOFFICE:InstrumentPanelV DataContext="{StaticResource InstrumentPanelVM}"/>
-      <OmagOFFICE:VeinMatchPanelV DataContext="{StaticResource VeinMatchPanelVM}"/>
-      <OmagOFFICE:MachinePanelV DataContext="{StaticResource MachinePanelVM}"/>
-   </EgtFloating:EgtFloatingTray>
-   
-   <EgtFloating:EgtFloatingTray x:Name="BOTTOMTRAY" DockPanel.Dock="Bottom">
-      <EgtWPFLib5:EgtMachGroupPanelV DataContext="{StaticResource MachGroupPanelVM}"
-                                     Background="{StaticResource Omag_Gray}"
-                                     BorderBrush="{StaticResource Omag_Gray}"
+    </DockPanel>
+
+    <DockPanel x:Name="TOPTRAY" DockPanel.Dock="Top" Background="Transparent">
+        <StackPanel Orientation="Horizontal" HorizontalAlignment="Right" Width="{Binding}">
+            <OmagOFFICE:ShowPanelV DataContext="{StaticResource ShowPanelVM}"/>
+            <OmagOFFICE:ViewPanelV DataContext="{StaticResource ViewPanelVM}"/>
+            <OmagOFFICE:InstrumentPanelV DataContext="{StaticResource InstrumentPanelVM}"/>
+            <OmagOFFICE:PrintPanelV DataContext="{StaticResource PrintPanelVM}"/>
+            <OmagOFFICE:VeinMatchPanelV DataContext="{StaticResource VeinMatchPanelVM}"/>
+            <OmagOFFICE:MachinePanelV DataContext="{StaticResource MachinePanelVM}"/>
+        </StackPanel>
+    </DockPanel>
+
+    <DockPanel x:Name="BOTTOMTRAY" DockPanel.Dock="Bottom" Background="Transparent">
+        <StackPanel Orientation="Horizontal" HorizontalAlignment="Left" Width="{Binding}">
+            <OmagOFFICE:MyMachGroupPanelV DataContext="{StaticResource MachGroupPanelVM}"/>
+            <!--<EgtWPFLib5:EgtMachGroupPanelV DataContext="{StaticResource MachGroupPanelVM}"
+                                     Background="Transparent"
+                                     BorderBrush="Transparent"
                                      RepaetButtonStyle="{StaticResource CustomScrollBarButton}"
                                      MachGroupButtonStyle="{StaticResource {x:Type ToggleButton}}"
                                      IsToolBar="False"
-                                     IsTopDockable="False" IsBottomDockable="True" IsLeftDockable="False"
-                                     IsRightDockable="False"/>
-   </EgtFloating:EgtFloatingTray>
+                                     IsTopDockable="False" IsBottomDockable="false" IsLeftDockable="False"
+                                     IsRightDockable="False"/>-->
+        </StackPanel>
+    </DockPanel>
+
+    <OmagOFFICE:SceneHostV />
    
-   <!--Scena restituita sotto forma di WindowsFormsHost-->
-   <OmagOFFICE:SceneHostV/>
-      
-</EgtFloating:EgtFloatingManager>
+</DockPanel>

Project/ProjectV.xaml.vb

@@ -1,3 +1,7 @@
 Public Class ProjectV
 
+   Private Sub LoadPage() Handles Me.Loaded
+      OmagOFFICEMap.SetRefProjectV(Me)
+   End Sub
+
 End Class