Gestione scarcio di più pezzi (INCOMPLETA)

CompoWindow/CompoManager/CompoManagerV.xaml

@@ -3,60 +3,60 @@
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
    DockPanel.Dock="Bottom">
-
+   
-    <Grid Visibility="{Binding Top_Visibility}"
+   <Grid Visibility="{Binding Top_Visibility}"
             Margin="0,0,0,5">
 
-        <TextBlock Text="{Binding TopMsg}" Foreground="{DynamicResource Omag_White}"/>
+      <TextBlock Text="{Binding TopMsg}"/>
-        <CheckBox IsChecked="{Binding TopIsChecked}"
+      <CheckBox IsChecked="{Binding TopIsChecked}"
                HorizontalAlignment="Right" Margin="6,0,6,0"/>
 
-    </Grid>
+   </Grid>
 
-    <Button Content="{Binding TrfDataMsg}"
+   <Button Content="{Binding TrfDataMsg}"
            Command="{Binding TrfData_Command}"
            Visibility="{Binding TrfData_Visibility}"
            Margin="0,0,0,5"
            Style="{StaticResource CompoWindow_Button}"/>
 
-    <Button Content="{Binding CsvDataMsg}"
+   <Button Content="{Binding CsvDataMsg}"
            Command="{Binding CsvData_Command}"
            Visibility="{Binding CsvData_Visibility}"
            Margin="0,0,0,5"
            Style="{StaticResource CompoWindow_Button}"/>
 
-    <Grid Visibility="{Binding PartName_Visibility}"
+   <Grid Visibility="{Binding PartName_Visibility}"
             Margin="0,0,0,5">
-        <Grid.ColumnDefinitions>
+      <Grid.ColumnDefinitions>
-            <ColumnDefinition Width="1*"/>
+         <ColumnDefinition Width="1*"/>
-            <ColumnDefinition Width="2*"/>
+         <ColumnDefinition Width="2*"/>
-        </Grid.ColumnDefinitions>
+      </Grid.ColumnDefinitions>
 
-        <TextBlock Text="{Binding PartNameMsg}" Grid.Column="0" Foreground="{DynamicResource Omag_White}"/>
+      <TextBlock Text="{Binding PartNameMsg}" Grid.Column="0"/>
-        <EgtWPFLib5:EgtTextBox Text="{Binding PartName}" Grid.Column="1" Width="130"/>
+      <EgtWPFLib5:EgtTextBox Text="{Binding PartName}" Grid.Column="1" Width="130"/>
 
-    </Grid>
+   </Grid>
 
-    <Grid Visibility="{Binding PartNum_Visibility}"
+   <Grid Visibility="{Binding PartNum_Visibility}"
             Margin="0,0,0,5">
-        <Grid.ColumnDefinitions>
+      <Grid.ColumnDefinitions>
-            <ColumnDefinition Width="2*"/>
+         <ColumnDefinition Width="2*"/>
-            <ColumnDefinition Width="1*"/>
+         <ColumnDefinition Width="1*"/>
-        </Grid.ColumnDefinitions>
+      </Grid.ColumnDefinitions>
 
-        <TextBlock Text="{Binding PartNumMsg}" Foreground="{DynamicResource Omag_White}"/>
+      <TextBlock Text="{Binding PartNumMsg}"/>
-        <EgtWPFLib5:EgtTextBox Text="{Binding PartNum}" Grid.Column="1" Width="60"/>
+      <EgtWPFLib5:EgtTextBox Text="{Binding PartNum}" Grid.Column="1" Width="60"/>
 
-    </Grid>
+   </Grid>
 
-    <UniformGrid Columns="2"
+   <UniformGrid Columns="2"
                    Margin="0,0,0,5"
                    Visibility="{Binding OkExit_Visibility}">
-        <Button Content="{Binding OkMsg}"
+      <Button Content="{Binding OkMsg}"
                  Command="{Binding OkCommand}"
                  Style="{StaticResource CompoWindow_Button}"/>
-        <Button Content="{Binding ExitMsg}" IsCancel="True"
+      <Button Content="{Binding ExitMsg}" IsCancel="True"
                  Style="{StaticResource CompoWindow_Button}"/>
-    </UniformGrid>
+   </UniformGrid>
 
 </StackPanel>

CompoWindow/CompoParamPage/CompoParamPageV.xaml

@@ -4,13 +4,13 @@
    xmlns:OmagOFFICE="clr-namespace:OmagOFFICE"
    xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5">
 
-    <DockPanel>
+   <DockPanel>
 
         <UniformGrid Columns="3"
                    DockPanel.Dock="Top"
                    Visibility="{Binding SideEntity_Visibility}"
                    Margin="0,0,0,0">
-
+            
             <!--Inclina lati-->
             <ToggleButton 
                        IsChecked="{Binding SideAngle_IsChecked}"
@@ -21,7 +21,7 @@
                     <AccessText TextWrapping="Wrap" Text="{Binding SideAngleMsg}"/>
                 </ToggleButton.Content>
             </ToggleButton>
-
+            
             <!--FiloTop-->
             <!--<ToggleButton Padding="0"
                        IsChecked="{Binding FiloTop_IsChecked}"
@@ -32,7 +32,7 @@
                     <AccessText TextWrapping="Wrap" Text="{Binding FiloTopMsg}"/>
                 </ToggleButton.Content>
             </ToggleButton>-->
-
+            
             <!--Incidi-->
             <ToggleButton Padding="0"                          
                        IsChecked="{Binding Engrave_IsChecked}"
@@ -50,100 +50,100 @@
                        Margin="1.75,0,0,0"
                        IsEnabled="{Binding Drip_IsEnabled}">
                 <ToggleButton.Content>
-                    <AccessText TextWrapping="Wrap" Text="{Binding DripMsg}" />
+                   <AccessText TextWrapping="Wrap" Text="{Binding DripMsg}" />
                 </ToggleButton.Content>
             </ToggleButton>
-
+          
         </UniformGrid>
 
-        <StackPanel DockPanel.Dock="Bottom">
+      <StackPanel DockPanel.Dock="Bottom">
-
+         
-            <ContentControl Content="{Binding CompoManagerControl,
+         <ContentControl Content="{Binding CompoManagerControl,
                                            UpdateSourceTrigger=PropertyChanged}"
                          Visibility="{Binding CompoManagerControl_Visibility}"/>
-
+                           
-            <Button Command="{Binding BackCommand}"
+         <Button Command="{Binding BackCommand}"
                  Visibility="{Binding Back_Visibility}"
                  Style="{StaticResource CompoWindow_Button}"
                  Focusable="False"
                  Margin="0,0,0,5">
-                <Image Source="/Resources/MachiningTab/BackArrow.png"/>
+            <Image Source="/Resources/MachiningTab/BackArrow.png"/>
-            </Button>
+         </Button>
+         
+      </StackPanel>
 
-        </StackPanel>
+      <Grid>
-
+         
-        <Grid>
+         <ContentControl VerticalAlignment="Center"
-
-            <ContentControl VerticalAlignment="Center"
                          Content="{Binding SideEntityControl}"/>
-
+            
-            <StackPanel VerticalAlignment="Center"
+         <StackPanel VerticalAlignment="Center"
                      Visibility="{Binding Measure_Visibility}">
-                <ItemsControl ItemsSource="{Binding CompoParamList}">
+            <ItemsControl ItemsSource="{Binding CompoParamList}">
-                    <ItemsControl.Resources>
+               <ItemsControl.Resources>
-                        <DataTemplate DataType="{x:Type OmagOFFICE:TextParamItem}">
+                  <DataTemplate DataType="{x:Type OmagOFFICE:TextParamItem}">
-                            <Grid Margin="0,0,0,5">
+                     <Grid Margin="0,0,0,5">
-                                <Grid.ColumnDefinitions>
+                        <Grid.ColumnDefinitions>
-                                    <ColumnDefinition Width="2*"/>
+                           <ColumnDefinition Width="2*"/>
-                                    <ColumnDefinition Width="1*"/>
+                           <ColumnDefinition Width="1*"/>
-                                </Grid.ColumnDefinitions>
+                        </Grid.ColumnDefinitions>
-                                <TextBlock Text="{Binding Name}" VerticalAlignment="Center" Foreground="{DynamicResource Omag_White}"/>
+                        <TextBlock Text="{Binding Name}" VerticalAlignment="Center"/>
-                                <EgtWPFLib5:EgtTextBox Grid.Column="1"
+                        <EgtWPFLib5:EgtTextBox Grid.Column="1"
                                                Text="{Binding Value}" IsEnabled="{Binding IsEnable}"/>
-                            </Grid>
+                     </Grid>
-                        </DataTemplate>
+                  </DataTemplate>
-                        <DataTemplate DataType="{x:Type OmagOFFICE:CheckParamItem}">
+                  <DataTemplate DataType="{x:Type OmagOFFICE:CheckParamItem}">
-                            <Grid Margin="0,0,0,5">
+                     <Grid Margin="0,0,0,5">
-                                <Grid.ColumnDefinitions>
+                        <Grid.ColumnDefinitions>
-                                    <ColumnDefinition Width="2*"/>
+                           <ColumnDefinition Width="2*"/>
-                                    <ColumnDefinition Width="1*"/>
+                           <ColumnDefinition Width="1*"/>
-                                </Grid.ColumnDefinitions>
+                        </Grid.ColumnDefinitions>
-                                <TextBlock Text="{Binding Name}" Foreground="{DynamicResource Omag_White}"/>
+                        <TextBlock Text="{Binding Name}"/>
-                                <CheckBox Grid.Column="1" 
+                        <CheckBox Grid.Column="1" 
                                   IsChecked="{Binding Value}" IsEnabled="{Binding IsEnable}"
                                   HorizontalAlignment="Center"/>
-                            </Grid>
+                     </Grid>
-                        </DataTemplate>
+                  </DataTemplate>
-                    </ItemsControl.Resources>
+               </ItemsControl.Resources>
-                    <ItemsControl.ItemsPanel>
+               <ItemsControl.ItemsPanel>
-                        <ItemsPanelTemplate>
+                  <ItemsPanelTemplate>
-                            <StackPanel/>
+                     <StackPanel/>
-                        </ItemsPanelTemplate>
+                  </ItemsPanelTemplate>
-                    </ItemsControl.ItemsPanel>
+               </ItemsControl.ItemsPanel>
 
-                </ItemsControl>
+            </ItemsControl>
 
-                <TextBlock Text="{Binding OutputMessage}"
+            <TextBlock Text="{Binding OutputMessage}"
                        Foreground="{Binding MsgColor}"
                        TextWrapping="Wrap"
                        TextAlignment="Justify"
                        Margin="0,0,0,5"/>
-
+            
-                <Button Content="{Binding InternalMsg}"
+            <Button Content="{Binding InternalMsg}"
                        Command="{Binding InternalCommand}"
                        Visibility="{Binding Internal_Visibility}"
                        Style="{StaticResource CompoWindow_Button}"/>
-
+             
-                <Button Content="{Binding AlzAndFrontMsg}"
+             <Button Content="{Binding AlzAndFrontMsg}"
                        Command="{Binding AlzAndFrontCommand}"
                        Visibility="{Binding AlzAndFront_Visibility}"
                        Style="{StaticResource CompoWindow_Button}"/>
 
-                <UniformGrid Columns="2"
+            <UniformGrid Columns="2"
                             Margin="0,0,0,5"
                             Visibility="{Binding AddRemove_Visibility}">
-                    <Button Content="{Binding AddMsg}"
+               <Button Content="{Binding AddMsg}"
                           Command="{Binding AddCommand}"
                           Style="{StaticResource CompoWindow_Button}"/>
-                    <Button Content="{Binding CancelMsg}"
+               <Button Content="{Binding CancelMsg}"
                           Command="{Binding CancelCommand}"
                           Style="{StaticResource CompoWindow_Button}"/>
-                </UniformGrid>
+            </UniformGrid>
 
-            </StackPanel>
+         </StackPanel>
-
+            
-        </Grid>
+      </Grid>
-
+      
-    </DockPanel>
+   </DockPanel>
 
 </UserControl>

CompoWindow/CompoWindowVM.vb

@@ -146,7 +146,7 @@ Public Class CompoWindowVM
 
    Friend Function MakePreview(ByRef sMsg As String) As Boolean
       If Not EgtLuaExecLine(LUA_CMP_DRAW & "(true)") Then
-         sMsg = EgtMsg(91689)   ' Error in component execution
+         sMsg = "Error in component execution"
          m_bDrawOk = False
       Else
          EgtLuaGetGlobStringVar(LUA_CMP_VARS & ".MSG", sMsg)

Constants/ConstGen.vb

@@ -21,7 +21,6 @@ Module ConstGen
    ' File con dati di licenza
    Public Const LIC_FILE_NAME As String = "OmagOFFICE.lic"
    Public Const S_LICENCE As String = "Licence"
-   Public Const K_LOCKID As String = "LockId"
    Public Const K_KEY As String = "Key"
    Public Const K_NESTKEY As String = "NestKey"
 
@@ -77,7 +76,5 @@ Module ConstGen
    Public Const SETUP_LUA As String = "SetUp.lua"
    ' Sottodirettorio per BackUp
    Public Const BACKUP_DIR As String = "BackUp"
-   ' Info per rotazione in registrazione grezzo
-   Public Const INFO_REGROT As String = "RegRot"
 
 End Module

Constants/ConstIni.vb

@@ -37,7 +37,6 @@ Module ConstIni
    Public Const K_CONTOURFROMCAMERA As String = "ContourFromCamera"
    Public Const K_SUPPORT As String = "Support"
    Public Const K_PHOTODIR As String = "PhotoDir"
-   Public Const K_SHOWNBARROW As String = "ShowNbArrow"
 
    Public Const S_LANGUAGES As String = "Languages"
    Public Const K_LANGUAGE As String = "Language"
@@ -97,7 +96,6 @@ Module ConstIni
 
    Public Const S_SIDES As String = "Sides"
    Public Const K_MAXSIDEANGLE As String = "MaxSideAngle"
-   Public Const K_SIZEALWAYSONTOP As String = "SizeAlwaysOnTop"
    Public Const K_PARSIDE_AS_TRF As String = "ParSideAsTrf"
    Public Const K_SIDEANGLE As String = "SideAngle"
    Public Const K_DELTA_ANG_TG As String = "DeltaAngTg"
@@ -106,7 +104,6 @@ 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"
@@ -116,7 +113,6 @@ Module ConstIni
    Public Const K_FILOTOPOFFSET As String = "FiloTopOffset"
    Public Const K_FILOTOPDEPTH As String = "FiloTopDepth"
    Public Const K_FILOTOPROUNDOFF As String = "FiloTopRoundOff"
-   Public Const K_TEXTCOLORENT As String = "TextColorEnt"
 
    Public Const S_NEST As String = "Nest"
    Public Const K_DIRECT As String = "Direct"
@@ -129,7 +125,6 @@ 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"

CsvWindow/CsvWindowV.xaml

@@ -13,112 +13,101 @@
    MaxWidth="500"                         
    ResizeMode="NoResize">
 
-    <DockPanel Margin="5,5,5,0" Background="{StaticResource Omag_DarkGray}">
+   <DockPanel Margin="5,5,5,0">
 
-       
+      <TextBlock Text="{Binding CsvPath}"
-        <UniformGrid Columns="15"
+                 DockPanel.Dock="Top"
-                   DockPanel.Dock="Top"
+                 Margin="0,0,0,5"/>
+
+      <UniformGrid Columns="2"
+                   DockPanel.Dock="Bottom"
                    Margin="0,0,0,5">
-            <Button Command="{Binding NewCommand}"
+         <Button Content="{Binding InsertMsg}"
-                 Margin="0,0,2.5,0"               
-                 Style = "{DynamicResource CSV_Button}">
-                <Image Source="/Resources/TopCommandBar/Reset.png" Stretch="Uniform"/>
-            </Button>
-            <Button Command="{Binding OpenCommand}"
-                 Margin="2.5,0,2.5,0"
-                    Style = "{DynamicResource CSV_Button}">
-                <Image Source="/Resources/TopCommandBar/Import.png" Stretch="Uniform"/>
-            </Button>
-            <ToggleButton IsChecked="{Binding Plus_IsChecked}"
-                          Style="{DynamicResource CSV_ToggleButton}"
-                       Margin="2.5,0,2.5,0">
-                <Image Source="/Resources/CsvWindow/CsvPlus - Color.png"/>
-            </ToggleButton>
-            <ToggleButton IsChecked="{Binding Minus_IsChecked}"
-                          Style="{DynamicResource CSV_ToggleButton}"
-                       Margin="2.5,0,0,0">
-                <Image Source="/Resources/CsvWindow/CsvMinus - Color.png"/>
-            </ToggleButton>
-
-            <Button ToolTip="{Binding InsertMsg}"
                  Command="{Binding InsertCommand}"
                  Margin="0,0,2.5,0"
-                 Style = "{DynamicResource CSV_Button}">
+                 Style="{StaticResource CompoWindow_Button}"/>
-                <Image Source="/Resources/CsvWindow/Inserisci-pezzo CSV.png" Stretch="Uniform"/>
+         <Button Content="{Binding RemoveMsg}"
-            </Button>
-                <Button ToolTip="{Binding RemoveMsg}"
                  Command="{Binding RemoveCommand}"
                  Margin="2.5,0,0,0"
-                 Style = "{DynamicResource CSV_Button}">
+                 Style="{StaticResource CompoWindow_Button}"/>
-                <Image Source="/Resources/CsvWindow/Parcheggia-pezzo CSV.png" Stretch="Uniform"/>
+      </UniformGrid>
-            </Button>
-        </UniformGrid>
 
-        <TextBlock Text="{Binding CsvPath}"
+      <UniformGrid Columns="4"
-                 DockPanel.Dock="Top"
+                   DockPanel.Dock="Bottom"
-                 Foreground="{StaticResource Omag_White}"
+                   Margin="0,0,0,5">
-                 Margin="0,0,0,5"/>
+         <Button Command="{Binding NewCommand}"
-        
+                 Margin="0,0,2.5,0">
-        <TreeView ItemsSource="{Binding CsvTypeList}"
+            <Image Source="/Resources/CsvWindow/CsvNew.png"/>
-                Background="Transparent"
+         </Button>
-                BorderThickness="0"
+         <Button Command="{Binding OpenCommand}"
+                 Margin="2.5,0,2.5,0">
+            <Image Source="/Resources/CsvWindow/CsvOpen.png"/>
+         </Button>
+         <ToggleButton IsChecked="{Binding Plus_IsChecked}"
+                       Margin="2.5,0,2.5,0">
+            <Image Source="/Resources/CsvWindow/CsvPlus.png"/>
+         </ToggleButton>
+         <ToggleButton IsChecked="{Binding Minus_IsChecked}"
+                       Margin="2.5,0,0,0">
+            <Image Source="/Resources/CsvWindow/CsvMinus.png"/>
+         </ToggleButton>
+      </UniformGrid>
+
+      <TreeView ItemsSource="{Binding CsvTypeList}"
                 Margin="0,0,0,5" >
 
-            <TreeView.ItemContainerStyle>
+         <TreeView.ItemContainerStyle>
-                <Style TargetType="{x:Type TreeViewItem}">
+            <Style TargetType="{x:Type TreeViewItem}">
-                    <Setter Property="IsExpanded" Value="{Binding IsExpanded, Mode=TwoWay}" />
+               <Setter Property="IsExpanded" Value="{Binding IsExpanded, Mode=TwoWay}" />
-                    <EventSetter Event="MouseUp" Handler="PartTypeClick"/>
+               <EventSetter Event="MouseUp" Handler="PartTypeClick"/>
-                </Style>
+            </Style>
-            </TreeView.ItemContainerStyle>
+         </TreeView.ItemContainerStyle>
 
-            <TreeView.Resources>
+         <TreeView.Resources>
-                <HierarchicalDataTemplate DataType="{x:Type OmagOFFICE:CsvPartType}"
+            <HierarchicalDataTemplate DataType="{x:Type OmagOFFICE:CsvPartType}"
                                       ItemsSource="{Binding CsvPartList}">
 
-                    <Grid>
+               <Grid>
-                        <Grid.ColumnDefinitions>
+                  <Grid.ColumnDefinitions>
-                            <ColumnDefinition Width="Auto"/>
+                     <ColumnDefinition Width="Auto"/>
-                            <ColumnDefinition Width="1*"/>
+                     <ColumnDefinition Width="1*"/>
-                        </Grid.ColumnDefinitions>
+                  </Grid.ColumnDefinitions>
 
-                        <Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Width="32" Margin="0,8,6,4" />
+                  <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" Foreground="{StaticResource Omag_White}"/>
+                  <TextBlock Grid.Column="1" Text="{Binding Name}" FontSize="15" Margin="10" />
 
-                    </Grid>
+               </Grid>
-                    <HierarchicalDataTemplate.ItemContainerStyle>
+               <HierarchicalDataTemplate.ItemContainerStyle>
-                        <Style TargetType="{x:Type TreeViewItem}">
+                  <Style TargetType="{x:Type TreeViewItem}">
-                            <EventSetter Event="MouseUp" Handler="PartItemClick"/>
+                     <EventSetter Event="MouseUp" Handler="PartItemClick"/>
-                            <Style.Triggers>
+                     <Style.Triggers>
-                                <DataTrigger Binding="{Binding bIsActive}" Value="true">
+                        <DataTrigger Binding="{Binding bIsActive}" Value="False">
-                                    <Setter Property="Foreground" Value="{StaticResource Omag_White}"/>
+                           <Setter Property="Foreground" Value="{StaticResource Omag_Gray}"/>
-                                </DataTrigger>
+                        </DataTrigger>
-                                <DataTrigger Binding="{Binding bIsActive}" Value="False">
+                     </Style.Triggers>
-                                    <Setter Property="Foreground" Value="{StaticResource Omag_Gray}"/>
+                  </Style>
-                                </DataTrigger>
+               </HierarchicalDataTemplate.ItemContainerStyle>
-                            </Style.Triggers>
-                        </Style>
-                    </HierarchicalDataTemplate.ItemContainerStyle>
 
-                </HierarchicalDataTemplate>
+            </HierarchicalDataTemplate>
 
-                <DataTemplate DataType="{x:Type OmagOFFICE:CsvPartItem}">
+            <DataTemplate DataType="{x:Type OmagOFFICE:CsvPartItem}">
-                    <Grid Width="246" Margin="0,5,0,5">
+               <Grid Width="246" Margin="0,5,0,5">
-                        <Grid.ColumnDefinitions>
+                  <Grid.ColumnDefinitions>
-                            <ColumnDefinition Width="1*"/>
+                     <ColumnDefinition Width="1*"/>
-                            <ColumnDefinition Width="60"/>
+                     <ColumnDefinition Width="60"/>
-                            <ColumnDefinition Width="1*"/>
+                     <ColumnDefinition Width="1*"/>
-                        </Grid.ColumnDefinitions>
+                  </Grid.ColumnDefinitions>
 
-                        <TextBlock Grid.Column="0" Text="{Binding Name}" Height="18" FontSize="14" HorizontalAlignment="Right"/>
+                  <TextBlock Grid.Column="0" Text="{Binding Name}" Height="18" FontSize="14" HorizontalAlignment="Right"/>
-                        <TextBlock Grid.Column="1" Text="{Binding sText1}" Height="18" FontSize="14" HorizontalAlignment="Center"/>
+                  <TextBlock Grid.Column="1" Text="{Binding sText1}" Height="18" FontSize="14" HorizontalAlignment="Center"/>
-                        <TextBlock Grid.Column="2" Text="{Binding sText2}" Height="18" FontSize="14" HorizontalAlignment="Left"/>
+                  <TextBlock Grid.Column="2" Text="{Binding sText2}" Height="18" FontSize="14" HorizontalAlignment="Left"/>
 
-                    </Grid>
+               </Grid>
-                </DataTemplate>
+            </DataTemplate>
-            </TreeView.Resources>
+         </TreeView.Resources>
 
-        </TreeView>
+      </TreeView>
 
-    </DockPanel>
+   </DockPanel>
 
 </EgtWPFLib5:EgtCustomWindow>

CurrMachWindow/CurrMachWindowV.xaml

@@ -6,21 +6,19 @@
    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}"
@@ -35,37 +33,30 @@
 <!--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>
@@ -75,14 +66,12 @@
           <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,12 +9,6 @@
       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,17 +29,9 @@ 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
@@ -157,18 +149,10 @@ 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
@@ -203,18 +187,10 @@ 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
@@ -249,18 +225,10 @@ 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
@@ -295,18 +263,10 @@ 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
@@ -326,18 +286,10 @@ 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
@@ -456,28 +408,28 @@ Public Class CurrMachWindowVM
                ' --- DRILL ---
                CreateMachiningList(MCH_MY.DRILLING, m_AvailableDrillList, m_CurrDrillingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrDrillingList.Count <= 1 Then
+               If m_CurrDrillingList.Count = 0 Then
                   CurrentMachine.sCurrDrilling = String.Empty
                End If
 
                ' --- MILL ---
                CreateMachiningList(MCH_MY.MILLING, m_AvailableMillList, m_CurrMillingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrMillingList.Count <= 1 Then
+               If m_CurrMillingList.Count = 0 Then
                   CurrentMachine.sCurrMilling = String.Empty
                End If
 
                ' --- SCASSO ---
                CreateMachiningList(MCH_MY.POCKETING, m_AvailableMillList, m_CurrPocketingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrPocketingList.Count <= 1 Then
+               If m_CurrPocketingList.Count = 0 Then
                   CurrentMachine.sCurrPocketing = String.Empty
                End If
 
                ' --- WATERJET ---
                CreateMachiningList(MCH_MY.WATERJETTING, m_AvailableWaterjetList, m_CurrWaterjettingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrWaterjettingList.Count <= 1 Then
+               If m_CurrWaterjettingList.Count = 0 Then
                   CurrentMachine.sCurrWaterJetting = String.Empty
                End If
                m_CurrWaterjettingQualityList = New List(Of String)(CurrentMachine.Qualities)
@@ -487,28 +439,28 @@ Public Class CurrMachWindowVM
                ' --- DRILL ---
                CreateMachiningList(MCH_MY.DRILLING, m_AvailableDrillList, m_CurrDrillingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrDrillingList.Count <= 1 Then
+               If m_CurrDrillingList.Count = 0 Then
                   CurrentMachine.sCurrDrilling = String.Empty
                End If
 
                ' --- MILL ---
                CreateMachiningList(MCH_MY.MILLING, m_AvailableMillList, m_CurrMillingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrMillingList.Count <= 1 Then
+               If m_CurrMillingList.Count = 0 Then
                   CurrentMachine.sCurrMilling = String.Empty
                End If
 
                ' --- SCASSO ---
                CreateMachiningList(MCH_MY.POCKETING, m_AvailableMillList, m_CurrPocketingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrPocketingList.Count <= 1 Then
+               If m_CurrPocketingList.Count = 0 Then
                   CurrentMachine.sCurrPocketing = String.Empty
                End If
 
                ' --- WATERJET ---
                CreateMachiningList(MCH_MY.WATERJETTING, m_AvailableWaterjetList, m_CurrWaterjettingList)
                ' Se la lista è vuota cancello la lavorazione corrente di questo tipo
-               If m_CurrWaterjettingList.Count <= 1 Then
+               If m_CurrWaterjettingList.Count = 0 Then
                   CurrentMachine.sCurrWaterJetting = String.Empty
                End If
                m_CurrWaterjettingQualityList = New List(Of String)(CurrentMachine.Qualities)
@@ -520,13 +472,11 @@ Public Class CurrMachWindowVM
 
       If m_CurrSawingList.Count > 0 Then
          If CurrentMachine.sCurrSawing <> String.Empty Then
-            SetCurrSawing(CurrentMachine.sCurrSawing)
+            SelCurrSawing = CurrentMachine.sCurrSawing
          Else
             Dim sCurrSawing As String = ""
-            ' GetPrivateProfileString(S_MACH_MACH, K_CURRSAWING, Nothing, sCurrSawing, sMachIniFile)
+            GetPrivateProfileString(S_MACH_MACH, K_CURRSAWING, Nothing, sCurrSawing, sMachIniFile)
-            GetPrivateProfileString(S_MACH_MACH, K_CURRSAWING_OFFICE, Nothing, sCurrSawing, sMachIniFile)
+            SelCurrSawing = sCurrSawing
-            'SelCurrSawing = sCurrSawing
-            SetCurrSawing(sCurrSawing)
          End If
       Else
          CurrentMachine.sCurrSawing = String.Empty
@@ -536,11 +486,7 @@ Public Class CurrMachWindowVM
       If CurrentMachine.bDrilling And m_CurrDrillingList.Count > 1 Then
          CurrDrilling_Visibility = Visibility.Visible
          If CurrentMachine.sCurrDrilling <> String.Empty Then
-            SetCurrDrilling(CurrentMachine.sCurrDrilling)
+            SelCurrDrilling = 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
@@ -549,11 +495,7 @@ Public Class CurrMachWindowVM
       If CurrentMachine.bMilling And m_CurrMillingList.Count > 1 Then
          CurrMilling_Visibility = Visibility.Visible
          If CurrentMachine.sCurrMilling <> String.Empty Then
-            SetCurrMilling(CurrentMachine.sCurrMilling)
+            SelCurrMilling = 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
@@ -562,11 +504,7 @@ Public Class CurrMachWindowVM
       If CurrentMachine.bPocketing And CurrPocketingList.Count > 1 Then
          CurrPocketing_Visibility = Visibility.Visible
          If CurrentMachine.sCurrPocketing <> String.Empty Then
-            SetCurrPocketing(CurrentMachine.sCurrPocketing)
+            SelCurrPocketing = 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
@@ -577,18 +515,10 @@ 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
-               SetCurrWaterjetting(CurrentMachine.sCurrWaterJetting)
+               SelCurrWaterjetting = 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
-               SetCurrWaterjettingQuality(CurrentMachine.sCurrWaterJettingQuality)
+               SelCurrWaterjettingQuality = 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/DxfImportSceneHostV.xaml.vb

@@ -112,7 +112,7 @@ Public Class DxfImportSceneHostV
 
    Private Sub OnMouseDownScene(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles ImportDxfScene.OnMouseDownScene
       ' Solo se in modalità angoli o gocciolatoio su lati esterni
-      If DxfImportWindowMap.refDxfImportWindowVM.SideAngle_IsChecked Or DxfImportWindowMap.refDxfImportWindowVM.Drip_IsChecked Or DxfImportWindowMap.refDxfImportWindowVM.Engrave_IsChecked Then
+      If DxfImportWindowMap.refDxfImportWindowVM.SideAngle_IsChecked Or DxfImportWindowMap.refDxfImportWindowVM.Drip_IsChecked Then
          OnMouseDownSceneSideAngle(e)
       ElseIf DxfImportWindowMap.refDxfImportWindowVM.FiloTop_IsChecked Then
          OnMouseDownSceneFiloTop(e)

DxfImportWindow/DxfImportWindowV.xaml

@@ -6,200 +6,14 @@
    Title="{Binding TitleMsg}"
    IsMinimizable="False"
    ShowInTaskbar="False"
-   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}" WindowStartupLocation="CenterOwner"
+   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}" WindowStartupLocation="CenterOwner">
-    xmlns:theme="clr-namespace:Microsoft.Windows.Themes;assembly=PresentationFramework.Aero">
-    
-    <EgtWPFLib5:EgtCustomWindow.Resources>
-        <!--gradiente colore-->
-               
-        <!--<Style x:Key="ScrollBarButton" TargetType="{x:Type RepeatButton}">
-            <Setter Property="OverridesDefaultStyle" Value="true"/>
-            <Setter Property="Focusable" Value="false"/>
-            <Setter Property="IsTabStop" Value="false"/>
-            <Setter Property="Template">
-                <Setter.Value>
-                    <ControlTemplate TargetType="{x:Type RepeatButton}">
-                        <theme:ScrollChrome x:Name="Chrome" RenderPressed="{TemplateBinding IsPressed}" RenderMouseOver="{TemplateBinding IsMouseOver}" SnapsToDevicePixels="true" theme:ScrollChrome.ScrollGlyph="{TemplateBinding theme:ScrollChrome.ScrollGlyph}"/>
-                    </ControlTemplate>
-                </Setter.Value>
-            </Setter>
-        </Style>-->
-        
-        <Style x:Key="ScrollBarThumb" TargetType="{x:Type Thumb}">
-            <Setter Property="OverridesDefaultStyle" Value="true"/>
-            <Setter Property="IsTabStop" Value="false"/>
-            <Setter Property="Template">
-                <Setter.Value>
-                    <ControlTemplate TargetType="{x:Type Thumb}">
-                        <Border x:Name="Background" CornerRadius="0" Background="Transparent" BorderThickness="{TemplateBinding BorderThickness}" BorderBrush="{TemplateBinding BorderBrush}">
-                            <Grid Background="Transparent"  Margin="1">
-                                <Border Opacity="0"  x:Name="BackgroundAnimation" Background="Transparent" />
-                                <Rectangle x:Name="BackgroundGradient" RadiusX="8" RadiusY="8" Fill="#FF095CA8" Stroke="#1C1D22" StrokeThickness="0.5">
-                                    <!--<Rectangle.Fill>
-                                        <LinearGradientBrush StartPoint=".7,0" EndPoint=".7,1">
-                                            <GradientStop Color="#1C1D22" Offset="0.375" />
-                                            <GradientStop Color="#1C1D22" Offset="0.625" />
-                                        </LinearGradientBrush>
-                                    </Rectangle.Fill>-->
-                                </Rectangle>
-                            </Grid>
-                        </Border>
-                    </ControlTemplate>
-                </Setter.Value>
-            </Setter>
-        </Style>
-        
-        <!--<Style x:Key="HorizontalScrollBarPageButton" TargetType="{x:Type RepeatButton}">
-            <Setter Property="OverridesDefaultStyle" Value="true"/>
-            <Setter Property="Background" Value="Transparent"/>
-            <Setter Property="Focusable" Value="false"/>
-            <Setter Property="IsTabStop" Value="false"/>
-            <Setter Property="Template">
-                <Setter.Value>
-                    <ControlTemplate TargetType="{x:Type RepeatButton}">
-                        <Rectangle Fill="{TemplateBinding Background}" Height="{TemplateBinding Height}" Width="{TemplateBinding Width}"/>
-                    </ControlTemplate>
-                </Setter.Value>
-            </Setter>
-        </Style>-->
-        
-        <Style x:Key="VerticalScrollBarPageButton" TargetType="{x:Type RepeatButton}">
-            <Setter Property="OverridesDefaultStyle" Value="true"/>
-            <Setter Property="Background" Value="Transparent"/>
-            <Setter Property="Focusable" Value="false"/>
-            <Setter Property="IsTabStop" Value="false"/>
-            <Setter Property="Template">
-                <Setter.Value>
-                    <ControlTemplate TargetType="{x:Type RepeatButton}">
-                        <Rectangle Fill="{TemplateBinding Background}" Height="{TemplateBinding Height}" Width="{TemplateBinding Width}"/>
-                    </ControlTemplate>
-                </Setter.Value>
-            </Setter>
-        </Style>
-        
-        <Style x:Key="ScrollBarStyle1" TargetType="{x:Type ScrollBar}">
-            <Setter Property="Background" Value="Transparent"/>
-            <Setter Property="Stylus.IsPressAndHoldEnabled" Value="false"/>
-            <Setter Property="Stylus.IsFlicksEnabled" Value="false"/>
-            <Setter Property="Foreground" Value="{DynamicResource {x:Static SystemColors.ControlTextBrushKey}}"/>
-            <Setter Property="Width" Value="{DynamicResource {x:Static SystemParameters.VerticalScrollBarWidthKey}}"/>
-            <Setter Property="MinWidth" Value="{DynamicResource {x:Static SystemParameters.VerticalScrollBarWidthKey}}"/>
-            <Setter Property="Template">
-                <Setter.Value>
-                    <ControlTemplate TargetType="{x:Type ScrollBar}">
-                        <Grid x:Name="Bg" Background="{TemplateBinding Background}" SnapsToDevicePixels="true">
-                            <Grid.RowDefinitions>
-                                <RowDefinition MaxHeight="1"/>
-                                <RowDefinition Height="0.00001*"/>
-                                <RowDefinition MaxHeight="1"/>
-                            </Grid.RowDefinitions>
-                            <!--<RepeatButton Command="{x:Static ScrollBar.LineUpCommand}" IsEnabled="{TemplateBinding IsMouseOver}" />-->
-                            <Track x:Name="PART_Track" IsDirectionReversed="true" IsEnabled="{TemplateBinding IsMouseOver}" Grid.Row="1">
-                                <Track.DecreaseRepeatButton>
-                                    <RepeatButton Command="{x:Static ScrollBar.PageUpCommand}" Style="{StaticResource VerticalScrollBarPageButton}"/>
-                                </Track.DecreaseRepeatButton>
-                                <Track.IncreaseRepeatButton>
-                                    <RepeatButton Command="{x:Static ScrollBar.PageDownCommand}" Style="{StaticResource VerticalScrollBarPageButton}"/>
-                                </Track.IncreaseRepeatButton>
-                                <Track.Thumb>
-                                    <Thumb Style="{StaticResource ScrollBarThumb}"/>
-                                </Track.Thumb>
-                            </Track>
-                            <!--<RepeatButton Command="{x:Static ScrollBar.LineDownCommand}" IsEnabled="{TemplateBinding IsMouseOver}" Grid.Row="2" theme:ScrollChrome.ScrollGlyph="DownArrow"/>-->
-                        </Grid>
-                        <ControlTemplate.Triggers>
-                            <Trigger Property="IsEnabled" Value="false">
-                                <Setter Property="Background" TargetName="Bg" Value="Transparent"/>
-                            </Trigger>
-                        </ControlTemplate.Triggers>
-                    </ControlTemplate>
-                </Setter.Value>
-            </Setter>
-            
-            <!--<Style.Triggers>
-                <Trigger Property="Orientation" Value="Horizontal">
-                    <Setter Property="Width" Value="Auto"/>
-                    <Setter Property="MinWidth" Value="0"/>
-                    <Setter Property="Height" Value="{DynamicResource {x:Static SystemParameters.HorizontalScrollBarHeightKey}}"/>
-                    <Setter Property="MinHeight" Value="{DynamicResource {x:Static SystemParameters.HorizontalScrollBarHeightKey}}"/>
-                    <Setter Property="Background" Value="Transparent"/>
-                    <Setter Property="Template">
-                        <Setter.Value>
-                            <ControlTemplate TargetType="{x:Type ScrollBar}">
-                                <Grid x:Name="Bg" Background="{TemplateBinding Background}" SnapsToDevicePixels="true">
-                                    <Grid.ColumnDefinitions>
-                                        <ColumnDefinition MaxWidth="{DynamicResource {x:Static SystemParameters.HorizontalScrollBarButtonWidthKey}}"/>
-                                        <ColumnDefinition Width="0.00001*"/>
-                                        <ColumnDefinition MaxWidth="{DynamicResource {x:Static SystemParameters.HorizontalScrollBarButtonWidthKey}}"/>
-                                    </Grid.ColumnDefinitions>
-                                    <RepeatButton Command="{x:Static ScrollBar.LineLeftCommand}" IsEnabled="{TemplateBinding IsMouseOver}" theme:ScrollChrome.ScrollGlyph="LeftArrow" Style="{StaticResource CustomScrollBarButton}"/>
-                                    <Track x:Name="PART_Track" Grid.Column="1" IsEnabled="{TemplateBinding IsMouseOver}">
-                                        <Track.DecreaseRepeatButton>
-                                            <RepeatButton Command="{x:Static ScrollBar.PageLeftCommand}" Style="{StaticResource CustomScrollBarButton}"/>
-                                        </Track.DecreaseRepeatButton>
-                                        <Track.IncreaseRepeatButton>
-                                            <RepeatButton Command="{x:Static ScrollBar.PageRightCommand}" Style="{StaticResource CustomScrollBarButton}"/>
-                                        </Track.IncreaseRepeatButton>
-                                        <Track.Thumb>
-                                            <Thumb Style="{StaticResource ScrollBarThumb}"/>
-                                        </Track.Thumb>
-                                    </Track>
-                                    <RepeatButton Command="{x:Static ScrollBar.LineRightCommand}" Grid.Column="2" IsEnabled="{TemplateBinding IsMouseOver}" theme:ScrollChrome.ScrollGlyph="RightArrow" Style="{StaticResource CustomScrollBarButton}"/>
-                                </Grid>
-                                <ControlTemplate.Triggers>
-                                    <Trigger Property="IsEnabled" Value="false">
-                                        <Setter Property="Background" TargetName="Bg" Value="Transparent"/>
-                                    </Trigger>
-                                </ControlTemplate.Triggers>
-                            </ControlTemplate>
-                        </Setter.Value>
-                    </Setter>
-                </Trigger>
-            </Style.Triggers>-->
-        </Style>
-        
-        <Style x:Key="ScrollViewerStyle1" TargetType="{x:Type ScrollViewer}">
-            <Setter Property="Template">
-                <Setter.Value>
-                    <ControlTemplate TargetType="{x:Type ScrollViewer}">
-                        <Grid x:Name="Grid" Background="{TemplateBinding Background}">
-                            <Grid.ColumnDefinitions>
-                                <ColumnDefinition Width="*"/>
-                                <ColumnDefinition Width="Auto"/>
-                            </Grid.ColumnDefinitions>
-                            <Grid.RowDefinitions>
-                                <RowDefinition Height="*"/>
-                                <RowDefinition Height="Auto"/>
-                            </Grid.RowDefinitions>
-                            <Rectangle x:Name="Corner" Grid.Column="1" Fill="{StaticResource Omag_Black}" Grid.Row="1"/>
-                            <ScrollContentPresenter x:Name="PART_ScrollContentPresenter" CanHorizontallyScroll="False" ContentTemplate="{TemplateBinding ContentTemplate}" CanVerticallyScroll="False" Grid.Column="0" Content="{TemplateBinding Content}" CanContentScroll="{TemplateBinding CanContentScroll}" Margin="{TemplateBinding Padding}" Grid.Row="0"/>
-                            <ScrollBar Style="{DynamicResource ScrollBarStyle1}" x:Name="PART_VerticalScrollBar" 
-                                       AutomationProperties.AutomationId="VerticalScrollBar" Cursor="Arrow" Grid.Column="1" 
-                                       Maximum="{TemplateBinding ScrollableHeight}" Minimum="0" Grid.Row="0" 
-                                       Value="{Binding VerticalOffset, Mode=OneWay, RelativeSource={RelativeSource TemplatedParent}}" ViewportSize="{TemplateBinding ViewportHeight}" Visibility="{TemplateBinding ComputedVerticalScrollBarVisibility}" 
-                                       Margin="2,0,0,0"/>
-                            <ScrollBar Style="{DynamicResource ScrollBarStyle1}" x:Name="PART_HorizontalScrollBar" 
-                                       AutomationProperties.AutomationId="HorizontalScrollBar" Cursor="Arrow" Grid.Column="0" 
-                                       Maximum="{TemplateBinding ScrollableWidth}" Minimum="0" Orientation="Horizontal" Grid.Row="1" 
-                                       Value="{Binding HorizontalOffset, Mode=OneWay, RelativeSource={RelativeSource TemplatedParent}}" ViewportSize="{TemplateBinding ViewportWidth}" Visibility="{TemplateBinding ComputedHorizontalScrollBarVisibility}"/>
-                        </Grid>
-                    </ControlTemplate>
-                </Setter.Value>
-            </Setter>
-            <Style.Triggers>
-                <Trigger Property="IsEnabled" Value="false">
-                    <Setter Property="Foreground" Value="{DynamicResource Omag_Blue}"/>
-                </Trigger>
-            </Style.Triggers>
-        </Style>
-    </EgtWPFLib5:EgtCustomWindow.Resources>
 
-    <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">
@@ -226,159 +40,145 @@
                 </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">
+            <UniformGrid Columns="2" Rows="2">
-                    <Button Content="{Binding UseRegionMsg}"
+               <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>
+            </UniformGrid>
-            </GroupBox>
+         </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">
+            <UniformGrid Columns="2">
-                    <RadioButton Content="{Binding MmMsg}"
+               <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>
+            </UniformGrid>
-            </GroupBox>
+         </GroupBox>
 
-            <UniformGrid Columns="5"
+         <UniformGrid Columns="4"
                    DockPanel.Dock="Top"
                    IsEnabled="{Binding SideEntity_IsEnabled}"
-                   Margin="0,0,0,5">
+                   Margin="0,0,0,5">             
-                <!--Inclina lati-->
+            <!--Inclina lati-->
-                <ToggleButton Content="{Binding SideAngleMsg}"
+            <ToggleButton Content="{Binding SideAngleMsg}"
                        IsChecked="{Binding SideAngle_IsChecked}"
                        Style="{StaticResource CompoWindow_WrapToggleButton}"/>
 
-                <!--Filo Top-->
+            <!--Filo Top-->
-                <ToggleButton Content="{Binding FiloTopMsg}"
+            <ToggleButton Content="{Binding FiloTopMsg}"
                    IsChecked="{Binding FiloTop_IsChecked}"
                    Style="{StaticResource CompoWindow_WrapToggleButton}"/>
 
-                <ToggleButton Content="{Binding EngraveMsg}"
-                   IsChecked="{Binding Engrave_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-->
+            <!--Fora da sotto-->
-                <ToggleButton Content="{Binding UnderDrillMsg}"
+            <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>
 
-            <GroupBox Header="Dati pezzo"                     
+         <Grid DockPanel.Dock="Bottom"
-                      BorderThickness="{StaticResource BorderGpBx_Thickness}"
+               Visibility="{Binding PartData_Visibility}"
-                      Foreground="{StaticResource Omag_White}"
+               Margin="0,0,0,10">
-                      Margin="0">
+            <Grid.ColumnDefinitions>
-                <ScrollViewer Style="{DynamicResource ScrollViewerStyle1}" VerticalScrollBarVisibility="Auto" Focusable="False">
+               <ColumnDefinition Width="1.8*"/>
-                    <StackPanel>
+               <ColumnDefinition Width="1.2*"/>
-                    <Grid Visibility="{Binding PartData_Visibility}"
+            </Grid.ColumnDefinitions>
-                         Margin="0,0,0,10">
-                        <Grid.ColumnDefinitions>
-                            <ColumnDefinition Width="1.8*"/>
-                            <ColumnDefinition Width="1.2*"/>
-                        </Grid.ColumnDefinitions>
 
-                        <TextBlock Text="{Binding PartNumMsg}"/>
+            <TextBlock Text="{Binding PartNumMsg}"/>
-                        <EgtWPFLib5:EgtTextBox Text="{Binding PartNum}"
+            <EgtWPFLib5:EgtTextBox Text="{Binding PartNum}"
                                    Grid.Column="1"/>
-                    </Grid>
+         </Grid>
 
-                    <Grid Visibility="{Binding PartData_Visibility}"
+         <Grid DockPanel.Dock="Bottom"
-                          Margin="0,0,0,10">
+               Visibility="{Binding PartData_Visibility}"
-                        <TextBlock Text="{Binding TopMsg}"/>
+               Margin="0,0,0,10">
-                        <CheckBox IsChecked="{Binding TopIsChecked}"
+            <TextBlock Text="{Binding TopMsg}"/>
-                                  HorizontalAlignment="Right" Margin="6,0,6,0"/>
+            <CheckBox IsChecked="{Binding TopIsChecked}"
-                    </Grid>
+               HorizontalAlignment="Right" Margin="6,0,6,0"/>
+         </Grid>
 
-                    <Grid Visibility="{Binding OrderList_Visibility}"
+         <Grid DockPanel.Dock="Bottom"
-                          Margin="0,0,0,10">
+               Visibility="{Binding OrderList_Visibility}"
-                        <Grid.ColumnDefinitions>
+               Margin="0,0,0,10">
-                            <ColumnDefinition Width="1.8*"/>
+            <Grid.ColumnDefinitions>
-                            <ColumnDefinition Width="1.2*"/>
+               <ColumnDefinition Width="1.8*"/>
-                        </Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1.2*"/>
+            </Grid.ColumnDefinitions>
 
-                        <TextBlock Text="{Binding ListMsg}"/>
+            <TextBlock Text="{Binding ListMsg}"/>
-                        <EgtWPFLib5:EgtTextBox Text="{Binding List}"
+            <EgtWPFLib5:EgtTextBox Text="{Binding List}"
                                    Grid.Column="1"/>
-                    </Grid>
+         </Grid>
 
-                    <Grid Visibility="{Binding OrderList_Visibility}"
+         <Grid DockPanel.Dock="Bottom"
-                          Margin="0,0,0,10">
+               Visibility="{Binding OrderList_Visibility}"
-                        <Grid.ColumnDefinitions>
+               Margin="0,0,0,10">
-                            <ColumnDefinition Width="1.8*"/>
+            <Grid.ColumnDefinitions>
-                            <ColumnDefinition Width="1.2*"/>
+               <ColumnDefinition Width="1.8*"/>
-                        </Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1.2*"/>
+            </Grid.ColumnDefinitions>
 
-                        <TextBlock Text="{Binding OrderMsg}"/>
+            <TextBlock Text="{Binding OrderMsg}"/>
-                        <EgtWPFLib5:EgtTextBox Text="{Binding Order}"
+            <EgtWPFLib5:EgtTextBox Text="{Binding Order}"
                                    Grid.Column="1"/>
-                    </Grid>
+         </Grid>
 
-                    <TextBlock Text="{Binding OutputMessage}"
+         <TextBlock Text="{Binding OutputMessage}"
-                                Foreground="{Binding MsgColor}"
+                 Foreground="{Binding MsgColor}"
-                                DockPanel.Dock="Bottom"
+                 DockPanel.Dock="Bottom"
-                                TextWrapping="Wrap"
+                 TextWrapping="Wrap"
-                                TextAlignment="Center"
+                 TextAlignment="Center"
-                                Margin="0,0,0,20"/>
+                 Margin="0,0,0,20"/>
-                    
-                    <ContentControl VerticalAlignment="Center"
-                         Content="{Binding SideEntityControl}" ScrollViewer.VerticalScrollBarVisibility="Visible"/>
-                    
-                </StackPanel>
-                </ScrollViewer>
-            </GroupBox>
 
-        </DockPanel>
+         <ContentControl VerticalAlignment="Center"
+                         Content="{Binding SideEntityControl}"/>
 
-        <OmagOFFICE:DxfImportSceneHostV/>
+      </DockPanel>
-
-    </DockPanel>
 
+      <OmagOFFICE:DxfImportSceneHostV/>
+      
+   </DockPanel>
+   
 </EgtWPFLib5:EgtCustomWindow>

DxfImportWindow/DxfImportWindowVM.vb

@@ -142,7 +142,7 @@ Public Class DxfImportWindowVM
          Return m_SideAngle_IsChecked
       End Get
       Set(value As Boolean)
-         If m_Drip_IsChecked Or m_UnderDrill_IsChecked Or m_FiloTop_IsChecked Or m_Engrave_IsChecked Then Return
+         If m_Drip_IsChecked Or m_UnderDrill_IsChecked Or m_FiloTop_IsChecked Then Return
          m_SideAngle_IsChecked = value
          If value Then
             ' Aggiungo regioni per percorsi interni
@@ -190,7 +190,7 @@ Public Class DxfImportWindowVM
          Return m_FiloTop_IsChecked
       End Get
       Set(value As Boolean)
-         If m_SideAngle_IsChecked Or m_Drip_IsChecked Or m_UnderDrill_IsChecked Or m_Engrave_IsChecked Then Return
+         If m_SideAngle_IsChecked Or m_Drip_IsChecked Or m_UnderDrill_IsChecked Then Return
          m_FiloTop_IsChecked = value
          If value Then
             ' Aggiungo regioni per percorsi interni
@@ -233,61 +233,13 @@ Public Class DxfImportWindowVM
       End Set
    End Property
 
-   Private m_Engrave_IsChecked As Boolean
-   Public Property Engrave_IsChecked As Boolean
-      Get
-         Return m_Engrave_IsChecked
-      End Get
-      Set(value As Boolean)
-         If m_Drip_IsChecked Or m_UnderDrill_IsChecked Or m_FiloTop_IsChecked Or m_SideAngle_IsChecked Then Return
-         m_Engrave_IsChecked = value
-         If value Then
-            ' Aggiungo regioni per percorsi interni
-            AdjustSelectRegions()
-            ' Messaggio di selezione contorno
-            SetOutputMessage(EgtMsg(MSG_DRAWPAGEUC + 6), MSG_TYPE.INFO)     ' Selezionare un contorno
-            ' Imposto modalità sideangle
-            m_SideEntityControlVM = New SideEntityControlVM(SideEntityControlVM.CallingWindowOpt.DXFIMPORT,
-                                                            DxfImportWindowMap.refDxfImportSceneHostV.ImportDxfScene,
-                                                            SideEntityControlVM.ModeOpt.ENGRAVE)
-            SideEntityControl = New SideEntityControlV(m_SideEntityControlVM)
-            Open_IsEnabled = False
-            Type_IsEnabled = False
-            Measure_IsEnabled = False
-            PartData_Visibility = Visibility.Collapsed
-            OrderList_Visibility = Visibility.Collapsed
-            OkIsEnabled = False
-         Else
-            ' Rimuovo regioni per percorsi interni
-            RemoveSelectRegions()
-            m_SideEntityControlVM.Close()
-            Open_IsEnabled = True
-            Type_IsEnabled = True
-            Measure_IsEnabled = True
-            PartData_Visibility = Visibility.Visible
-            OrderList_Visibility = Visibility.Visible
-            OkIsEnabled = True
-            m_SideEntityControlVM = Nothing
-            SideEntityControl = Nothing
-            ' Elimino scritte angoli per input e inserisco quelle definitive
-            SideEntityControlVM.WriteSideAngleForNest(DxfImportWindowMap.refDxfImportSceneHostV.ImportDxfScene.GetCtx())
-            ' Deseleziono tutto
-            DxfImportWindowMap.refDxfImportSceneHostV.Deselect()
-            ' Pulisco area messaggi
-            ClearOutputMessage()
-         End If
-         NotifyPropertyChanged("EngraveIsChecked")
-         EgtZoom(ZM.ALL)
-      End Set
-   End Property
-
    Private m_Drip_IsChecked As Boolean
    Public Property Drip_IsChecked As Boolean
       Get
          Return m_Drip_IsChecked
       End Get
       Set(value As Boolean)
-         If m_SideAngle_IsChecked Or m_UnderDrill_IsChecked Or m_FiloTop_IsChecked Or m_Engrave_IsChecked Then Return
+         If m_SideAngle_IsChecked Or m_UnderDrill_IsChecked Or m_FiloTop_IsChecked Then Return
          m_Drip_IsChecked = value
          If value Then
             ' Messaggio di selezione contorno
@@ -331,7 +283,7 @@ Public Class DxfImportWindowVM
          Return m_UnderDrill_IsChecked
       End Get
       Set(value As Boolean)
-         If m_SideAngle_IsChecked Or m_Drip_IsChecked Or m_FiloTop_IsChecked Or m_Engrave_IsChecked Then Return
+         If m_SideAngle_IsChecked Or m_Drip_IsChecked Or m_FiloTop_IsChecked Then Return
          m_UnderDrill_IsChecked = value
          If value Then
             ' Aggiungo regioni di selezione per percorsi interni
@@ -541,12 +493,6 @@ Public Class DxfImportWindowVM
       End Get
    End Property
 
-   Public ReadOnly Property EngraveMsg As String
-      Get
-         Return EgtMsg(90397)
-      End Get
-   End Property
-
    Public ReadOnly Property DripMsg As String
       Get
          Return EgtMsg(MSG_IMPORTPAGEUC + 8)
@@ -700,13 +646,9 @@ Public Class DxfImportWindowVM
       Case FT.DXF
          ' recupero unità di misura del file
          Dim dScale As Double = If(m_MmIsChecked, ONEMM, ONEINCH)
-            ' Importo file DXF
+         ' Importo file DXF
-            If Not EgtImportDxf(m_sFilePath, dScale) Then Return False
+         If Not EgtImportDxf(m_sFilePath, dScale) Then Return False
-            ' Riporto al piano tutte le superifici
+      Case FT.NGE
-            EgtSelectAll()
-            EgtScale(GDB_ID.SEL, Frame3d.GLOB, 1, 1, 0)
-            EgtDeselectAll()
-         Case FT.NGE
          ' Carico Nge
          If Not EgtOpenFile(m_sFilePath) Then Return False
          ' Filtro Nge
@@ -898,7 +840,7 @@ Public Class DxfImportWindowVM
 
    Friend Sub SelectedPartChanged()
       ' Se sono in modalità inclinazioni o gocciolatoio calcolo lati inclinabili e creo testi
-      If SideAngle_IsChecked() Or Drip_IsChecked() Or FiloTop_IsChecked Or Engrave_IsChecked Then
+      If SideAngle_IsChecked() Or Drip_IsChecked() Or FiloTop_IsChecked Then
          m_SideEntityControlVM.ReLoadSideAnglePage(SideEntityControlVM.CallingWindowOpt.DXFIMPORT)
       End If
    End Sub
@@ -983,9 +925,9 @@ Public Class DxfImportWindowVM
    Private Sub SetMsgColor(nMsgType As MSG_TYPE)
       Select Case nMsgType
          Case MSG_TYPE.INFO
-            m_MsgColor = Brushes.White
+            m_MsgColor = Brushes.Black
          Case MSG_TYPE.WARNING
-            m_MsgColor = Brushes.Gold
+            m_MsgColor = Brushes.SaddleBrown
          Case MSG_TYPE.ERROR_
             m_MsgColor = Brushes.Red
       End Select

EgtStoneLib/CamAuto.vb

@@ -1,6 +1,4 @@
-Imports System.Security.Cryptography
+Imports EgtUILib
-Imports EgtUILib
-Imports EgtWPFLib5
 
 Friend Module CamAuto
 
@@ -26,18 +24,15 @@ Friend Module CamAuto
       bOk = bOk AndAlso EgtLuaCallFunction("CAM.Add")
       EgtLuaGetGlobIntVar("CAM.ERR", nErr)
       EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
+      If nErr <> 0 Then
          bOk = False
          EgtOutLog("Error in CamAuto : " & nErr.ToString())
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
-         OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(91017), MSG_TYPE.WARNING)
       End If
       ResetOrderMachiningFlag()
       Return bOk
    End Function
 
-   Friend Function AddWaterJetMachining(nOperId As Integer, ByRef nWarn As Integer) As Boolean
+   Friend Function AddWaterJetMachining( nOperId As Integer, ByRef nWarn As Integer) As Boolean
       EgtLuaCreateGlobTable("CAM")
       SetLuaStandardCamParams()
       EgtLuaSetGlobIntVar("CAM.OPERID", nOperId)
@@ -47,34 +42,9 @@ Friend Module CamAuto
       bOk = bOk AndAlso EgtLuaCallFunction("CAM.AddWaterJet")
       EgtLuaGetGlobIntVar("CAM.ERR", nErr)
       EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
+      If nErr <> 0 Then
          bOk = False
          EgtOutLog("Error in CamAuto : " & nErr.ToString())
-         ' m_MainWindow.m_CurrentProjectPageUC.ClearMessage()
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
-      End If
-      Return bOk
-   End Function
-
-   ' versione CamAuto 2.6l1: gestione tagli con ridotto affondamento
-   Friend Function AddWaterJetMachining(LocaList As List(Of Integer), ByRef nWarn As Integer) As Boolean
-      EgtLuaCreateGlobTable("CAM")
-      SetLuaStandardCamParams()
-      For i As Integer = 0 To LocaList.Count - 1
-         EgtLuaSetGlobIntVar("CAM.TAB_OPERID." & (i + 1).ToString, LocaList(i))
-      Next
-      Dim nErr As Integer = 999
-      Dim bOk As Boolean = EgtLuaExecFile(m_sCamAutoDir & "\CamAuto.lua")
-      bOk = bOk AndAlso EgtLuaGetGlobIntVar("CAM.ERR", nErr) AndAlso nErr = 0
-      bOk = bOk AndAlso EgtLuaCallFunction("CAM.AddWaterJets")
-      EgtLuaGetGlobIntVar("CAM.ERR", nErr)
-      EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
-         bOk = False
-         EgtOutLog("Error in CamAuto : " & nErr.ToString())
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
       End If
       Return bOk
    End Function
@@ -88,11 +58,9 @@ Friend Module CamAuto
       bOk = bOk AndAlso EgtLuaCallFunction("CAM.Erase")
       EgtLuaGetGlobIntVar("CAM.ERR", nErr)
       EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
+      If nErr <> 0 Then
          bOk = False
          EgtOutLog("Error in CamAuto : " & nErr.ToString())
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
       End If
       ResetOrderMachiningFlag()
       Return bOk
@@ -107,11 +75,9 @@ Friend Module CamAuto
       bOk = bOk AndAlso EgtLuaCallFunction("CAM.InvertVerticalCut")
       EgtLuaGetGlobIntVar("CAM.ERR", nErr)
       EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
+      If nErr <> 0 Then
          bOk = False
          EgtOutLog("Error in CamAuto : " & nErr.ToString())
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
       End If
       Return bOk
    End Function
@@ -122,7 +88,6 @@ Friend Module CamAuto
    End Function
 
    Friend Function ResetAllMachinings(ByRef nWarn As Integer) As Boolean
-      EgtOutLog(" ++ ReserAllMachining ++ ")
       ' Cancello tutte le lavorazioni
       EraseMachinings(GDB_ID.NULL)
       ' Reinserisco tutte le lavorazioni piane (non sono previste le lavorazioni delle cornici)
@@ -192,69 +157,6 @@ Friend Module CamAuto
       Return bOk
    End Function
 
-   Friend Function ResetAllSplitCut() As Boolean
-      Dim PartList As New List(Of Integer)
-      ' Ricerca nei grezzi dei pezzi (devono essere ricercati tra quelli presenti nei grezzi)
-      Dim bOk As Boolean = True
-      ' Recupero il numero di fasi presenti nel progetto
-      Dim nPhaseCount As Integer = EgtGetPhaseCount()
-      For nPhase As Integer = 1 To nPhaseCount
-         EgtSetCurrPhase(nPhase)
-         Dim nRawId As Integer = EgtGetFirstRawPart()
-         While nRawId <> GDB_ID.NULL
-            Dim nParId As Integer = EgtGetFirstPartInRawPart(nRawId)
-            If EgtVerifyRawPartPhase(nRawId, nPhase) Then
-               While nParId <> GDB_ID.NULL
-                  Dim nNextParId As Integer = EgtGetNextPartInRawPart(nParId)
-                  ' verifico se il pezzo passato è un taglio di sepatazione (il nome deve contenere "SpliCut")
-                  Dim sName As String = String.Empty
-                  If EgtGetName(nParId, sName) AndAlso sName.Contains(SPLIT_CUT) Then
-                     ' Rimuovo il pezzo dal grezzo
-                     If EgtRemovePartFromRawPart(nParId) Then
-                        ' Salvo l'indice del pezzo se non è stato già inserito
-                        Dim nIndex As Integer = PartList.FirstOrDefault(Function(nId) nId = nParId)
-                        If nIndex = 0 Then PartList.Add(nParId)
-                     End If
-                  End If
-                  nParId = nNextParId
-               End While
-            End If
-            nRawId = EgtGetNextRawPart(nRawId)
-         End While
-      Next
-      ' Reimposto la prima fase del progetto
-      EgtSetCurrPhase(1)
-      ' Procedo ad eliminare il pezzo
-      For Each Item As Integer In PartList
-         bOk = bOk And EgtErase(Item)
-      Next
-      Return bOk
-   End Function
-
-   Friend Function RemoveCurrentSplitCut(nIdSplitCut As Integer) As Boolean
-      Dim bOk As Boolean = False
-      Dim nCurrPhase As Integer = EgtGetCurrPhase()
-      Dim nRawId As Integer = EgtGetFirstRawPart()
-      While nRawId <> GDB_ID.NULL
-         Dim nParId As Integer = EgtGetFirstPartInRawPart(nRawId)
-         If EgtVerifyRawPartPhase(nRawId, nCurrPhase) Then
-            While nParId <> GDB_ID.NULL
-               If nParId = nIdSplitCut Then
-                  ' Rimuovo il pezzo dal grezzo
-                  bOk = EgtRemovePartFromRawPart(nParId)
-                  Exit While
-               End If
-               nParId = EgtGetNextPartInRawPart(nParId)
-            End While
-         End If
-         If bOk Then Exit While
-         nRawId = EgtGetNextRawPart(nRawId)
-      End While
-      ' Elimino il pezzo
-      bOk = bOk And EgtErase(nIdSplitCut)
-      Return bOk
-   End Function
-
    ' verifico che il contorno passato non sia stato separato
    Friend Function VerifyOutLoopIsClosed(nIdLayerOutLoop As Integer) As Boolean
       Dim nIdMy As Integer = EgtGetFirstInGroup(nIdLayerOutLoop)
@@ -307,11 +209,9 @@ Friend Module CamAuto
       bOk = bOk AndAlso EgtLuaCallFunction("CAM.UpdateAllTp")
       EgtLuaGetGlobIntVar("CAM.ERR", nErr)
       EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
+      If nErr <> 0 Then
          bOk = False
          EgtOutLog("Error in CamAuto : " & nErr.ToString())
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
       End If
       Return bOk
    End Function
@@ -325,11 +225,9 @@ Friend Module CamAuto
       bOk = bOk AndAlso EgtLuaCallFunction("CAM.Sort")
       EgtLuaGetGlobIntVar("CAM.ERR", nErr)
       EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
+      If nErr <> 0 Then
          bOk = False
          EgtOutLog("Error in CamAuto : " & nErr.ToString())
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
       End If
       Return bOk
    End Function
@@ -344,11 +242,9 @@ Friend Module CamAuto
       bOk = bOk AndAlso EgtLuaCallFunction("CAM.SpecApplyDisp")
       EgtLuaGetGlobIntVar("CAM.ERR", nErr)
       EgtLuaResetGlobVar("CAM")
-      If nErr > 0 Then
+      If nErr <> 0 Then
          bOk = False
          EgtOutLog("Error in CamAuto : " & nErr.ToString())
-      ElseIf nErr < 0 Then
-         EgtOutLog("Warning in CamAuto : " & nErr.ToString())
       End If
       If ResetOrderMachiningFlag() Then
          ResetOrderMachiningFlag()
@@ -364,7 +260,7 @@ Friend Module CamAuto
             EgtGetGroupObjs(EgtGetFirstNameInGroup(nPartId, NAME_UNDERDRILL)) = 0 Then
             Return True
          End If
-         ' Se tutti i pezzi
+      ' Se tutti i pezzi
       Else
          ' Salvo fase attualmente corrente
          Dim nOriPhase As Integer = EgtGetCurrPhase()
@@ -491,7 +387,6 @@ Friend Module CamAuto
       Return EgtRemoveOperationHome(nId)
    End Function
 
-   ' DA AGGIORNARE PER CAMBIO UTENSILE LAMA
    Friend Function VerifySetup(ByRef sMissingTools As String) As Boolean
       Dim bOk As Boolean = True
       Dim bIsMultiCut = (EgtGetHeadId("H101") <> GDB_ID.NULL)
@@ -506,9 +401,9 @@ Friend Module CamAuto
             Dim sTool2 As String = String.Empty
             EgtGetMachiningParam(MCH_MP.TUUID, sTuuid)
             EgtTdbGetToolFromUUID(sTuuid, sTool)
-            If String.IsNullOrWhiteSpace(sTool) Then
+            If String.IsNullOrWhiteSpace( sTool) Then
                Dim sMchTool As String = ""
-               EgtGetMachiningParam(MCH_MP.TOOL, sMchTool)
+               EgtGetMachiningParam( MCH_MP.TOOL, sMchTool)
                bOk = False
                If sMissingTools.IndexOf(sMchTool) = -1 Then
                   sMissingTools = sMissingTools & sMchTool & ", "
@@ -522,7 +417,7 @@ Friend Module CamAuto
                   sTool2 = sTool & "-2"
                End If
                If String.Compare(sTool, CurrentMachine.sCurrSaw) <> 0 AndAlso
-                  (String.IsNullOrWhiteSpace(sTool2) OrElse String.Compare(sTool2, CurrentMachine.sCurrSaw) <> 0) AndAlso
+                  ( String.IsNullOrWhiteSpace( sTool2) OrElse String.Compare(sTool2, CurrentMachine.sCurrSaw) <> 0) AndAlso
                   String.Compare(sTool, CurrentMachine.sCurrDripSaw) <> 0 Then
                   bOk = False
                   If sMissingTools.IndexOf(sTool) = -1 Then
@@ -586,10 +481,9 @@ Friend Module CamAuto
       Dim dReducedDepth As Double = GetPrivateProfileDouble(S_MACH_NEST, K_MACH_REDUCEDDEPTH, 1, CurrentMachine.sMachIniFile)
       ' Ciclo sulle lavorazioni
       Dim nOperId As Integer = EgtGetFirstOperation()
-      Dim LocalListOperId As New List(Of Integer)
       While nOperId <> GDB_ID.NULL
          ' verifico sia una lavorazione valida di taglio con lama
-         If IsValidMachining(nOperId) And EgtGetOperationType(nOperId) = MCH_OY.SAWING Then
+         If IsValidMachining( nOperId) And EgtGetOperationType( nOperId) = MCH_OY.SAWING Then
             ' verifica interferenza
             Dim nFlag As Integer = FMI_TYPE.NONE
             If Not VerifyComposedMachining(nOperId, nFlag) Then
@@ -601,14 +495,12 @@ Friend Module CamAuto
                ' se abilitato e attivo waterjet, lo aggiungo per completare il taglio
                If CurrentMachine.WaterJettingActive Then
                   Dim nWarn As Integer = 0
-                  LocalListOperId.Add(nOperId)
+                  AddWaterJetMachining(nOperId, nWarn)
-                  'AddWaterJetMachining(nOperId, nWarn)
                End If
             End If
          End If
          nOperId = EgtGetNextOperation(nOperId)
       End While
-      If LocalListOperId.Count > 0 Then AddWaterJetMachining(LocalListOperId, 0)
       Return bModified
    End Function
 
@@ -712,8 +604,8 @@ Friend Module CamAuto
          If nOriLeadIn <> MCH_SAW_LI.STRICT Then
             EgtSetMachiningParam(MCH_MP.LEADINTYPE, MCH_SAW_LI.STRICT)
             Dim dUserAddLen As Double = 0
-            EgtGetInfo(nMchId, INFO_MCH_USER_SAL, dUserAddLen)
+            EgtGetInfo( nMchId, INFO_MCH_USER_SAL, dUserAddLen)
-            EgtRemoveInfo(nMchId, INFO_MCH_USER_SAL)
+            EgtRemoveInfo( nMchId, INFO_MCH_USER_SAL)
             Dim dAddLen As Double = 0
             EgtGetMachiningParam(MCH_MP.STARTADDLEN, dAddLen)
             EgtSetMachiningParam(MCH_MP.STARTADDLEN, dAddLen - dUserAddLen - dSafeLen)
@@ -732,8 +624,8 @@ Friend Module CamAuto
          If nOriLeadOut <> MCH_SAW_LO.STRICT Then
             EgtSetMachiningParam(MCH_MP.LEADOUTTYPE, MCH_SAW_LO.STRICT)
             Dim dUserAddLen As Double = 0
-            EgtGetInfo(nMchId, INFO_MCH_USER_EAL, dUserAddLen)
+            EgtGetInfo( nMchId, INFO_MCH_USER_EAL, dUserAddLen)
-            EgtRemoveInfo(nMchId, INFO_MCH_USER_EAL)
+            EgtRemoveInfo( nMchId, INFO_MCH_USER_EAL)
             Dim dAddLen As Double = 0
             EgtGetMachiningParam(MCH_MP.ENDADDLEN, dAddLen)
             EgtSetMachiningParam(MCH_MP.ENDADDLEN, dAddLen - dUserAddLen - dSafeLen)
@@ -903,7 +795,6 @@ Friend Module CamAuto
    Private Function SetLuaStandardCamParams(Optional bDripOk As Boolean = True) As Boolean
       Dim sMaterial As String = CurrentMachine.CurrMat.sName
       Dim sSawMch As String = CurrentMachine.sCurrSawing
-      Dim sSawTiltedMch As String = CurrentMachine.sCurrSawingTilted
       Dim sMillMch As String = CurrentMachine.sCurrMilling
       Dim sDrillMch As String = CurrentMachine.sCurrDrilling
       Dim sWaterJetMch As String = CurrentMachine.sCurrWaterJetting
@@ -921,7 +812,6 @@ Friend Module CamAuto
       Dim dMillingShort As Double = GetPrivateProfileDouble(S_MACH_NEST, K_MACH_MILLING_SHORTENING, 0, CurrentMachine.sMachIniFile)
       EgtLuaSetGlobStringVar("CAM.MATERIAL", sMaterial)
       EgtLuaSetGlobStringVar("CAM.SAWMCH", sSawMch)
-      EgtLuaSetGlobStringVar("CAM.SAWTILTEDMCH", sSawTiltedMch)
       EgtLuaSetGlobStringVar("CAM.MILLMCH", sMillMch)
       EgtLuaSetGlobStringVar("CAM.DRILLMCH", sDrillMch)
       EgtLuaSetGlobStringVar("CAM.WATERJETMCH", sWaterJetMch)
@@ -942,29 +832,24 @@ Friend Module CamAuto
       Return True
    End Function
 
-   ' ver. 2.7f1 
    Friend Function GetTableCount() As Integer
       If EgtGetTableId(MAIN_TAB) = GDB_ID.NULL Then Return 0
       If EgtGetTableId(SECOND_TAB) = GDB_ID.NULL Then Return 1
       If EgtGetTableId(THIRD_TAB) = GDB_ID.NULL Then Return 2
-      If EgtGetTableId(FORTH_TAB) = GDB_ID.NULL Then Return 3
+      Return 3
-      Return 4
    End Function
 
    Friend Function GetTableName(nInd As Integer) As String
       If nInd = 1 Then Return MAIN_TAB
       If nInd = 2 Then Return SECOND_TAB
       If nInd = 3 Then Return THIRD_TAB
-      If nInd = 4 Then Return FORTH_TAB
       Return ""
    End Function
 
    Friend Function GetCurrentTable() As Integer
       Dim sTabName As String = MAIN_TAB
       EgtGetTableName(sTabName)
-      If sTabName = FORTH_TAB Then
+      If sTabName = THIRD_TAB Then
-         Return 4
-      ElseIf sTabName = THIRD_TAB Then
          Return 3
       ElseIf sTabName = SECOND_TAB Then
          Return 2
@@ -1071,13 +956,13 @@ Friend Module CamAuto
       Dim nRawId As Integer = EgtGetFirstRawPart()
       If nRawId = GDB_ID.NULL Then Return False
       ' Se non ci sono pezzi, esco
-      Dim nPart1Id As Integer = EgtGetFirstPartInRawPart(nRawId)
+      Dim nPart1Id As Integer = EgtGetFirstPartInRawPart( nRawId)
       If nPart1Id = GDB_ID.NULL Then Return True
       ' Verifico se cornice curva
       Dim nDir As Integer = 0
       EgtGetInfo(nPart1Id, INFO_FRAME_DIR, nDir)
-      Dim bSwap As Boolean = (nDir = 0)
+      Dim bSwap As Boolean = ( nDir = 0)
-      Dim bCurved As Boolean = (nDir >= 2)
+      Dim bCurved As Boolean = ( nDir >= 2)
       ' Recupero la lavorazione corrente di sgrossatura con lama
       Dim sCurrSawRou As String = CurrentMachine.sCurrSawRoughing
       If String.IsNullOrEmpty(sCurrSawRou) Then Return True
@@ -1104,8 +989,8 @@ Friend Module CamAuto
       ' Imposto la geometria
       EgtSetMachiningGeometry(vId)
       ' Imposto trim iniziale e finale
-      EgtSetMachiningParam(MCH_MP.STARTADDLEN, If(bSwap, -dTrimEnd, -dTrimStart))
+      EgtSetMachiningParam(MCH_MP.STARTADDLEN, If( bSwap, -dTrimEnd, -dTrimStart))
-      EgtSetMachiningParam(MCH_MP.ENDADDLEN, If(bSwap, -dTrimStart, -dTrimEnd))
+      EgtSetMachiningParam(MCH_MP.ENDADDLEN, If( bSwap, -dTrimStart, -dTrimEnd))
       ' Se cornice curva, imposto SCC
       If bCurved Then EgtSetMachiningParam(MCH_MP.SOLCHOICETYPE, MCH_SCC.ADIR_NEAR)
       ' Applico la lavorazione
@@ -1120,13 +1005,13 @@ Friend Module CamAuto
       Dim nRawId As Integer = EgtGetFirstRawPart()
       If nRawId = GDB_ID.NULL Then Return False
       ' Se non ci sono pezzi, esco
-      Dim nPart1Id As Integer = EgtGetFirstPartInRawPart(nRawId)
+      Dim nPart1Id As Integer = EgtGetFirstPartInRawPart( nRawId)
       If nPart1Id = GDB_ID.NULL Then Return True
       ' Verifico se cornice curva
       Dim nDir As Integer = 0
-      EgtGetInfo(nPart1Id, INFO_FRAME_DIR, nDir)
+      EgtGetInfo( nPart1Id, INFO_FRAME_DIR, nDir)
-      Dim bSwap As Boolean = (nDir = 0)
+      Dim bSwap As Boolean = ( nDir = 0)
-      Dim bCurved As Boolean = (nDir >= 2)
+      Dim bCurved As Boolean = ( nDir >= 2)
       ' Recupero la lavorazione corrente di finitura con lama
       Dim sCurrSawFin As String = CurrentMachine.sCurrSawFinishing
       If String.IsNullOrEmpty(sCurrSawFin) Then Return True
@@ -1163,8 +1048,8 @@ Friend Module CamAuto
       ' Imposto la geometria
       EgtSetMachiningGeometry(vId)
       ' Imposto trim iniziale e finale
-      EgtSetMachiningParam(MCH_MP.STARTADDLEN, If(bSwap, -dTrimEnd, -dTrimStart))
+      EgtSetMachiningParam(MCH_MP.STARTADDLEN, If( bSwap, -dTrimEnd, -dTrimStart))
-      EgtSetMachiningParam(MCH_MP.ENDADDLEN, If(bSwap, -dTrimStart, -dTrimEnd))
+      EgtSetMachiningParam(MCH_MP.ENDADDLEN, If( bSwap, -dTrimStart, -dTrimEnd))
       ' Se cornice curva, imposto SCC
       If bCurved Then EgtSetMachiningParam(MCH_MP.SOLCHOICETYPE, MCH_SCC.ADIR_NEAR)
       ' Applico la lavorazione
@@ -1179,13 +1064,13 @@ Friend Module CamAuto
       Dim nRawId As Integer = EgtGetFirstRawPart()
       If nRawId = GDB_ID.NULL Then Return False
       ' Se non ci sono pezzi, esco
-      Dim nPart1Id As Integer = EgtGetFirstPartInRawPart(nRawId)
+      Dim nPart1Id As Integer = EgtGetFirstPartInRawPart( nRawId)
       If nPart1Id = GDB_ID.NULL Then Return True
       ' Verifico se cornice curva
       Dim nDir As Integer = 0
       EgtGetInfo(nPart1Id, INFO_FRAME_DIR, nDir)
-      Dim bSwap As Boolean = (nDir = 0)
+      Dim bSwap As Boolean = ( nDir = 0)
-      Dim bCurved As Boolean = (nDir >= 2)
+      Dim bCurved As Boolean = ( nDir >= 2)
       ' Recupero la lavorazione corrente di spatolatura con lama
       Dim sCurrSawSideFin As String = CurrentMachine.sCurrSawSideFinishing
       If String.IsNullOrEmpty(sCurrSawSideFin) Then Return True
@@ -1206,8 +1091,8 @@ Friend Module CamAuto
       ' Imposto la geometria
       EgtSetMachiningGeometry(vId)
       ' Imposto trim iniziale e finale
-      EgtSetMachiningParam(MCH_MP.STARTADDLEN, If(bSwap, -dTrimEnd, -dTrimStart))
+      EgtSetMachiningParam(MCH_MP.STARTADDLEN, If( bSwap, -dTrimEnd, -dTrimStart))
-      EgtSetMachiningParam(MCH_MP.ENDADDLEN, If(bSwap, -dTrimStart, -dTrimEnd))
+      EgtSetMachiningParam(MCH_MP.ENDADDLEN, If( bSwap, -dTrimStart, -dTrimEnd))
       ' Se cornice curva, imposto SCC
       If bCurved Then EgtSetMachiningParam(MCH_MP.SOLCHOICETYPE, MCH_SCC.ADIR_NEAR)
       ' Applico la lavorazione
@@ -1346,14 +1231,14 @@ Friend Module CamAuto
             dStartDist = dEndDist
             dEndDist = dTemp
          End If
-         ' altrimenti
+      ' altrimenti
       Else
          Dim vtSide As Vector3d
          ' Se faccia non limitata da altre o sopra la limitante
          If bFree Then
             EgtSetMachiningParam(MCH_MP.FACEUSE, MCH_MIL_FU.ORTUP_DOWN)
             vtSide = Vector3d.Z_AX()
-            ' altrimenti è stata trovata una faccia adiacente limitante
+         ' altrimenti è stata trovata una faccia adiacente limitante
          Else
             If vtAdjN.x > 10 * EPS_SMALL Then
                EgtSetMachiningParam(MCH_MP.FACEUSE, MCH_MIL_FU.ORTUP_LEFT)
@@ -1444,14 +1329,4 @@ Friend Module CamAuto
       Return EgtApplyMachining(False)
    End Function
 
-   Friend Function GetRegistrationRotation() As Double
-      Dim dRegRot As Double = 0
-      EgtGetInfo(GetCurrentRaw(), INFO_REGROT, dRegRot)
-      Return dRegRot
-   End Function
-
-   Friend Function SetRegistrationRotation(dRegRot As Double) As Boolean
-      Return EgtSetInfo(GetCurrentRaw(), INFO_REGROT, dRegRot)
-   End Function
-
 End Module

EgtStoneLib/ConstMach.vb

@@ -48,7 +48,6 @@ Module ConstMach
    Public Const MAIN_TAB As String = "MainTab"
    Public Const SECOND_TAB As String = "2ndTab"
    Public Const THIRD_TAB As String = "3rdTab"
-   Public Const FORTH_TAB As String = "4thTab"
    ' Nome tavola ausiliaria per spostamento finale pezzi
    Public Const AUX_TAB As String = "AuxTab"
 
@@ -167,7 +166,6 @@ Module ConstMach
    ' Info in entità da tagliare per affondamento
    Public Const INFO_DEPTH As String = "Depth"
    Public Const INFO_DEPTH2 As String = "Depth2"
-   Public Const INFO_AGG2 As String = "Agg2"
    Public Const INFO_WIDTH As String = "Width"
    ' Info in entità da tagliare per taglio ristretto
    Public Const INFO_STRICT As String = "Strict"
@@ -262,8 +260,6 @@ Module ConstMach
    Public Const INFO_AUX_SPLIT_WJ As String = "AUX_SPLIT_WJ"
    ' Info in OutLoop per punto inzio lavorazione WaterJet
    Public Const INFO_START As String = "Start"
-   ' Nome dei tagli diretti inseriti in fase di Splitting
-   Public Const SPLIT_CUT As String = "SplitCut"
 
    ' Nome di pezzo che è una cornice
    Public Const NAME_FRAME As String = "Frame"
@@ -330,9 +326,6 @@ 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

@@ -122,7 +122,6 @@
    Public Const K_TAB2_ADDITIONALTABLE As String = "Tab2AdditionalTable"
    Public Const K_TAB3_ADDITIONALTABLE As String = "Tab3AdditionalTable"
    Public Const K_CENTER_RAW_ONX As String = "CenterRawOnX"
-   Public Const K_CHANGETABWD As String = "ChangeTabWD"
 
    Public Const S_PHOTO As String = "Photo"
    Public Const K_PHOTO_OFFSETX As String = "OffsetX"
@@ -241,7 +240,6 @@
 
    Public Const S_MACH_MACH As String = "Mach"
    Public Const K_CURRSAW As String = "CurrSaw"
-   Public Const K_CURRSAWTILTED As String = "CurrSawTilted"
    Public Const K_CURRDRILL As String = "CurrDrill"
    Public Const K_CURRMILL As String = "CurrMill"
    Public Const K_CURRMILLNOTIP As String = "CurrMillNoTip"
@@ -249,14 +247,9 @@
    Public Const K_CURRDRIPDRILL As String = "CurrDripDrill"
    Public Const K_CURRWATERJET As String = "CurrWaterJet"
    Public Const K_CURRSAWING As String = "CurrSawing"
-   Public Const K_CURRSAWINGTILTED As String = "CurrSawingTilted"
-   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"
@@ -264,9 +257,7 @@
    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/CurrentMachine.vb

@@ -107,7 +107,6 @@ Public Module CurrentMachine
 
    ' Variabili che contengono il nome degli utensili disponibili per tipo
    Private m_sCurrSaw As String = String.Empty
-   Private m_sCurrSawTilted As String = String.Empty
    Private m_sCurrDrill As String = String.Empty
    Private m_sCurrMill As String = String.Empty
    Private m_sCurrMillNoTip As String = String.Empty
@@ -117,7 +116,6 @@ Public Module CurrentMachine
 
    ' Variabili che contengono le lavorazioni correntemente attive (utilizzate per definire lavorazioni nel programma)
    Private m_sCurrSawing As String = String.Empty
-   Private m_sCurrSawingTilted As String = String.Empty
    Private m_sCurrDrilling As String = String.Empty
    Private m_sCurrMilling As String = String.Empty
    Private m_sCurrPocketing As String = String.Empty
@@ -733,18 +731,6 @@ Friend Property sCurrMillNoTip As String
       End Set
    End Property
 
-   Friend Property sCurrSawingTilted As String
-      Get
-         Return m_sCurrSawingTilted
-      End Get
-      Set(value As String)
-         If WritePrivateProfileString(S_MACH_MACH, K_CURRSAWINGTILTED, value, sMachIniFile) Then
-            m_sCurrSawingTilted = value
-            'm_MainWindow.m_CurrentProjectPageUC.MachiningTxBx.Text = value
-         End If
-      End Set
-   End Property
-
    Friend Property sCurrDrilling As String
       Get
          Return m_sCurrDrilling
@@ -1284,13 +1270,6 @@ Friend Property sCurrMillNoTip As String
       ' Leggo utensili correnti
       ' lama
       GetPrivateProfileString(S_MACH_MACH, K_CURRSAW, Nothing, m_sCurrSaw, sMachIniFile)
-      ' lama inclinata
-      If m_nShowToolChanger = 4 Then
-         GetPrivateProfileString(S_MACH_MACH, K_CURRSAWTILTED, Nothing, m_sCurrSawTilted, sMachIniFile)
-      Else
-         ' se non è configurato il cambio utensile e allora imposto l'unica lama disponibile per i tagli inclinati
-         m_sCurrSawTilted = m_sCurrSaw
-      End If
       ' foretto
       GetPrivateProfileString(S_MACH_MACH, K_CURRDRILL, Nothing, m_sCurrDrill, sMachIniFile)
       ' fresa
@@ -1307,8 +1286,6 @@ Friend Property sCurrMillNoTip As String
       ' Leggo lavorazioni correnti
       ' lama
       m_sCurrSawing = EstCalc.GetCurrSawing()
-      ' lama inlicnata
-      m_sCurrSawingTilted = EstCalc.GetCurrSawingTilted()
       ' foretto
       m_sCurrDrilling = EstCalc.GetCurrDrilling()
       ' fresa

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, True)
+      Return EgtSetInfo(nOperId, INFO_CURRSAWING, sCurrSawing)
    End Function
 
    Friend Function GetCurrSawing() As String
@@ -258,18 +258,10 @@ Module EstCalc
       Return sCurrSawing
    End Function
 
-   Friend Function GetCurrSawingTilted() As String
-      Dim nOperId As Integer = EgtGetFirstNameInGroup(EgtGetCurrMachGroup(), "Opers")
-      If nOperId = GDB_ID.NULL Then Return ""
-      Dim sCurrSawing As String = String.Empty
-      EgtGetInfo(nOperId, INFO_CURRSAWING, sCurrSawing)
-      Return sCurrSawing
-   End Function
-
    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, True)
+      Return EgtSetInfo(nOperId, INFO_CURRMILLING, sCurrMilling)
    End Function
 
    Friend Function GetCurrMilling() As String
@@ -283,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, True)
+      Return EgtSetInfo(nOperId, INFO_CURRDRILLING, sCurrDrilling)
    End Function
 
    Friend Function GetCurrDrilling() As String
@@ -297,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, True)
+      Return EgtSetInfo(nOperId, INFO_CURRPOCKETING, sCurrMilling)
    End Function
 
    Friend Function GetCurrPocketing() As String
@@ -311,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, True)
+      Return EgtSetInfo(nOperId, INFO_CURRWATERJETTING, sCurrMilling)
    End Function
 
    Friend Function GetCurrWaterjetting() As String
@@ -340,7 +332,7 @@ Module EstCalc
       Return (nFlag <> 0)
    End Function
 
-   Public Function AdjustAdditionalTable(Optional bForced As Boolean = False) As Boolean
+   Public Function AdjustAdditionalTable() As Boolean
       ' Recupero altezza sottotavola corrente
       Dim nFixtId As Integer = EgtGetFirstNameInGroup(EgtGetCurrMachGroup(), MACH_FIXT_GROUP)
       Dim nAddTabId As Integer = EgtGetFirstNameInGroup(nFixtId, MACH_ADD_TABLE)
@@ -351,27 +343,18 @@ Module EstCalc
          dCurrAddTab = b3AddTab.DimZ()
       End If
       ' Se valore cambiato, aggiorno...
-      Dim dDeltaZ As Double = CurrentMachine.dAdditionalTable - dCurrAddTab
+      Dim dDeltaZ As Double = dAdditionalTable - dCurrAddTab
-      Dim bChanged As Boolean = (Math.Abs(dDeltaZ) > EPS_SMALL)
+      If Math.Abs(dDeltaZ) > EPS_SMALL Then
-      If bChanged Or bForced Then
-         Dim bOldEnMod As Boolean = EgtGetEnableModified()
-         If Not bChanged AndAlso bOldEnMod Then EgtDisableModified()
          AddAdditionalTable()
          UpdateAllRawsZ(dDeltaZ)
-         If GetPhoto() <> GDB_ID.NULL Then
+         ' !!!  FOTO DA GESTIRE  !!!
-            UpdatePhoto()
+         'If GetPhoto() <> GDB_ID.NULL Then
-            UpdateContour()
+         '   UpdatePhoto()
-            If EgtGetRawPartCount() > 0 Then
+         '   UpdateContour()
-               ShowPhoto(False)
+         '   If EgtGetRawPartCount() > 0 Then
-               Dim nRawGrpId As Integer = EgtGetFirstRawPart()
+         '      ShowPhoto(False)
-               While nRawGrpId <> GDB_ID.NULL
+         '   End If
-                  Dim nRawSolidId As Integer = EgtGetFirstNameInGroup(nRawGrpId, NAME_RAW_SOLID)
+         'End If
-                  If nRawSolidId <> GDB_ID.NULL Then EgtSetTextureName(nRawSolidId, PHOTO_NAME)
-                  nRawGrpId = EgtGetNextRawPart(nRawGrpId)
-               End While
-            End If
-         End If
-         If Not bChanged AndAlso bOldEnMod Then EgtEnableModified()
       End If
       Return True
    End Function
@@ -743,65 +726,49 @@ Module EstCalc
          nLayId = EgtGetNextName(nLayId, NAME_INLOOP)
       End While
       ' Aggiorno le entità con tallone e quelle con angolo esterno
-      Const AGG_DEPTH As Double = 0.75
+      Const AGG_DEPTH As Double = 2.0
-      Dim bSizeOnTop As Boolean = (GetMainPrivateProfileInt(S_SIDES, K_SIZEALWAYSONTOP, 0) <> 0)
       For Each nEnt As Integer In vEnt
          ' Se aggiornamento vietato, vado oltre
-         If EgtExistsInfo(nEnt, INFO_SIDE_FIXED) Then Continue For
+         If EgtExistsInfo( nEnt, INFO_SIDE_FIXED) Then continue for
          ' Recupero eventuali tallone ed angolo originale
          Dim dHeel As Double = 0
          Dim dSideAng As Double = 0
          EgtGetInfo(nEnt, INFO_HEEL, dHeel)
          EgtGetInfo(nEnt, INFO_ORIG_SIDE_ANGLE, dSideAng)
-         ' Se inclinazione con tallone
          If Math.Abs(dSideAng) > EPS_ANG_SMALL And dHeel > 10 * EPS_SMALL Then
-            ' Inclinazione esterna
+            ' Angolo esterno
             If dSideAng > 0 Then
                ' Se tallone inferiore a spessore
                If dHeel < dTh - 10 * EPS_SMALL Then
                   EgtSetInfo(nEnt, INFO_SIDE_ANGLE, 0.0)
                   EgtSetInfo(nEnt, INFO_SIDE_ANGLE2, dSideAng)
-                  If Not bSizeOnTop Then
+                  EgtSetInfo(nEnt, INFO_OFFSET2, -(dTh - dHeel) * Math.Tan(dSideAng * Math.PI / 180))
-                     EgtSetInfo(nEnt, INFO_OFFSET, 0)
-                     EgtSetInfo(nEnt, INFO_OFFSET2, -(dTh - dHeel) * Math.Tan(dSideAng * Math.PI / 180))
-                  Else
-                     EgtSetInfo(nEnt, INFO_OFFSET, (dTh - dHeel) * Math.Tan(dSideAng * Math.PI / 180))
-                     EgtSetInfo(nEnt, INFO_OFFSET2, 0)
-                  End If
                   EgtSetInfo(nEnt, INFO_DEPTH2, (dTh - dHeel) + AGG_DEPTH)
-                  EgtSetInfo(nEnt, INFO_AGG2, AGG_DEPTH)
+               ' altrimenti, tallone superiore a spessore -> non c'è taglio inclinato
-                  ' altrimenti, tallone superiore a spessore -> non c'è taglio inclinato
                Else
                   EgtSetInfo(nEnt, INFO_SIDE_ANGLE, 0.0)
                   EgtSetInfo(nEnt, INFO_SIDE_ANGLE2, 0.0)
                   EgtRemoveInfo(nEnt, INFO_OFFSET2)
                   EgtRemoveInfo(nEnt, INFO_DEPTH2)
-                  EgtRemoveInfo(nEnt, INFO_AGG2)
                End If
-               ' Inclinazione interna
+            ' Angolo interno
             Else
                ' Se tallone inferiore a spessore
                If dHeel < dTh - 10 * EPS_SMALL Then
                   EgtSetInfo(nEnt, INFO_OFFSET, dHeel * Math.Tan(-dSideAng * Math.PI / 180))
                   EgtSetInfo(nEnt, INFO_SIDE_ANGLE2, 0.0)
                   EgtSetInfo(nEnt, INFO_DEPTH2, dHeel + AGG_DEPTH)
-                  EgtSetInfo(nEnt, INFO_AGG2, AGG_DEPTH)
+               ' altrimenti, tallone superiore a spessore -> non c'è taglio inclinato
-                  ' altrimenti, tallone superiore a spessore -> non c'è taglio inclinato
                Else
                   EgtSetInfo(nEnt, INFO_SIDE_ANGLE, 0.0)
                   EgtRemoveInfo(nEnt, INFO_OFFSET)
                   EgtRemoveInfo(nEnt, INFO_SIDE_ANGLE2)
                   EgtRemoveInfo(nEnt, INFO_DEPTH2)
-                  EgtRemoveInfo(nEnt, INFO_AGG2)
                End If
             End If
-            ' Se altrimenti inclinazione esterna
+         ' Se altrimenti inclinazione esterna
          ElseIf dSideAng > EPS_ANG_SMALL Then
-            If Not bSizeOnTop Then
+            EgtSetInfo(nEnt, INFO_OFFSET, -dTh * Math.Tan(dSideAng * Math.PI / 180))
-               EgtSetInfo(nEnt, INFO_OFFSET, -dTh * Math.Tan(dSideAng * Math.PI / 180))
-            Else
-               EgtSetInfo(nEnt, INFO_OFFSET, 0)
-            End If
          End If
       Next
       Return True
@@ -1023,22 +990,8 @@ Module EstCalc
       Const STORE_DIST As Double = 200
       ' 40 il Font usato per indicare il numero di pezzi in parcheggio "# N"
       Const STORE_OFFS As Double = 20 + 40 + 20
-      Dim dStoreLarg As Double = GetPrivateProfileDouble("Store", "StoreLargh", STORE_LARGH, CurrentMachine.sMachIniFile)
+      Dim dStXmin As Double = b3Tab.Min().x - 0.5 * (STORE_LARGH - b3Tab.DimX())
-      Dim dStoreDist As Double = GetPrivateProfileDouble("Store", "StoreDist", STORE_DIST, CurrentMachine.sMachIniFile)
+      Return EgtPackBox(nId, dStXmin, -INFINITO, dStXmin + STORE_LARGH, b3Tab.Min().y - STORE_DIST, STORE_OFFS, False)
-      Dim dStoreOffs As Double = GetPrivateProfileDouble("Store", "StoreOffs", STORE_OFFS, CurrentMachine.sMachIniFile)
-      Dim dStXmin As Double = b3Tab.Min().x - 0.5 * (dStoreLarg - b3Tab.DimX())
-
-      ' Verifico che il pezzo ha una posizione salvata
-      Dim ptCenter As Point3d
-      If EgtGetInfo(nId, "PosInPark", ptCenter) Then
-         Dim ptCurrPos As Point3d
-         EgtCenterPoint(nId, GDB_ID.ROOT, ptCurrPos)
-         Dim vt As New Vector3d(ptCenter - ptCurrPos)
-         EgtMove(nId, vt, GDB_RT.GLOB)
-         Return True
-      End If
-
-      Return EgtPackBox(nId, dStXmin, -INFINITO, dStXmin + dStoreLarg, b3Tab.Min().y - dStoreDist, dStoreOffs, False)
    End Function
 
    Friend Function VerifyPartsNesting(bReducedCut As Boolean) As Boolean

EgtStoneLib/SplitAuto.vb

@@ -92,12 +92,11 @@ 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 EgtGetMachiningGeometry( 0, nEntId, nSub) Then
-                     ' EgtGetType( nEntId) = GDB_TY.CRV_ARC OrElse
+                     If EgtGetType( nEntId) = GDB_TY.CRV_ARC OrElse EgtGetType( nEntId) = GDB_TY.CRV_COMPO Then Mach.m_bIsLine = False
-                     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_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_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_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)
@@ -384,53 +383,28 @@ Public Module SplitAuto
       For Each nCut As Integer In vCuts
          RemoveMachiningPreview(nCut)
       Next
-      ' ---------------------------------- LAVORAZIONI ----------------------------------
+      ' Sposto tutte le lavorazioni disabilitate e le eventuali inglobate nella nuova fase
-      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
-            ' Provo ad inserire la lavorazione nell'elenco
+            ' sposto la lavorazione
-            AddMach(MchList, nId)
+            EgtChangeOperationPhase(nId, nNewPhase)
             ' 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 As String In sItems
+               For Each sId2 In sItems
                   Dim nId2 As Integer = 0
                   StringToInt(sId2, nId2)
-                  If nId2 > 0 Then
+                  If nId2 > 0 Then EgtChangeOperationPhase(nId2, nNewPhase)
-                     ' Provo ad inserire la lavorazione nell'elenco
-                     AddMach(MchList, nId2)
-                  End If
                Next
             End If
          End If
          nId = nNextId
       End While
-      ' Procedo ora a spostare le lavorazioni nella nuova disposizione
+      Return True
-      For Each ItemMchId As Integer In MchList
+   End Function
-         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,14 +444,15 @@ 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 Not IsHorizontal(dAngOrizzDeg) Then
+         If bRotateVacuumNearExtraStrokeX And (Math.Abs(dRotAngDeg - 90) < 45 Or Math.Abs(dRotAngDeg - 270) < 45) Then
             If frMinRect.Orig().x < b3Tab.Center().x Then
                dPreferredRot = m_dPrefVertRotXMinus
             Else
                dPreferredRot = m_dPrefVertRotXPlus
             End If
-         ElseIf bRotateVacuumNearExtraStrokeY And IsHorizontal(dAngOrizzDeg) Then
+         ElseIf bRotateVacuumNearExtraStrokeY And (Math.Abs(dRotAngDeg - 90) > 45 Or Math.Abs(dRotAngDeg - 270) > 45) Then
             ' se l'orientemanto è orizzontale e la macchina è stata abilitata
             If frMinRect.Orig().y < b3Tab.Center().y Then
                dPreferredRot = m_dPrefVertRotYPlus
@@ -459,7 +460,6 @@ 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,34 +530,16 @@ 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
-      ' Posizione Home dell'asse rotante
-      Dim dCHome As Double
-      EgtGetAxisHomePos("C", dCHome)
-      ' 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)
-      ' Calcolo gli assi macchina
       Dim dX, dY, dZ As Double
       Dim nStat As Integer
-      EgtGetCalcPositions(ptRef, dRotAngMachDeg, 0, nStat, dX, dY, dZ)
+      Dim dCHome As Double
-      ' Verifico le corse
+      EgtGetAxisHomePos("C", dCHome)
-      EgtVerifyOutstroke(dX, dY, dZ, dRotAngMachDeg, 0, nStat)
+      ' imposto la l'uscita della ventosa come fosse l'uscita di un utensile
+      EgtSetCalcTool("", "H4", 1)
+      EgtGetCalcPositions(ptRef, dRotAngDeg + dCHome, 0, nStat, dX, dY, dZ)
+      EgtVerifyOutstroke(dX, dY, dZ, dRotAngDeg + dCHome, 0, nStat)
       Return nStat
    End Function
 

EgtStoneLib/VeinMatchingWindow.xaml

@@ -1,7 +1,7 @@
 <Window x:Class="VeinMatchingWindow"
-        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   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"
-        Height="500" Width="500" ShowInTaskbar="False" Initialized="Window_Initialized" MinWidth="300" MinHeight="300">
+   Height="500" Width="500" ShowInTaskbar="False" Initialized="Window_Initialized" MinWidth="300" MinHeight="300">
 
    <Grid Name="VeinMatchingGrid" Background="{StaticResource Omag_Gray}">
       <Grid.ColumnDefinitions>
@@ -11,16 +11,20 @@
 
       <StackPanel Orientation="Vertical">
          <ToggleButton Name="ShowTextBtn" Height="40" Width="80"
-                       Margin="0,5,0,0"/>
+                       Margin="0,5,0,0"
+                       Content="ShowText"/>
          <ToggleButton Name="EditBtn" Height="40" Width="80"
-                       Margin="0,5,0,0"/>
+                       Margin="0,5,0,0"
+                       Content="Edit"/>
          <ToggleButton Name="VerifyBtn" Height="40" Width="80"
-                       Margin="0,5,0,0"/>
+                       Margin="0,5,0,0"
+                       Content="Verify"/>
          <ToggleButton Name="MagneticBtn" Height="40" Width="80"
-                       Visibility="Collapsed"
+                       Margin="0,5,0,0"
-                       Margin="0,5,0,0"/>
+                       Content="Magnetic"/>
          <Button Name="ExportBtn" Height="40" Width="80"
-                 Margin="0,5,0,0"/>
+                 Margin="0,5,0,0"
+                 Content="Export"/>
          <Button Name="AssemblyBtn" Height="40" Width="80"
                  Margin="0,5,0,0"
                  Content="3D"/>

EgtStoneLib/VeinMatchingWindow.xaml.vb

@@ -1,9 +1,9 @@
 Imports System.IO
 Imports System.Windows.Interop
 Imports System.Collections.ObjectModel
+Imports System.Runtime.InteropServices
 Imports EgtUILib
 Imports EgtWPFLib5
-Imports OmagOFFICE.VeinMatchingWindow
 
 Public Class VeinMatchingWindow
 
@@ -29,18 +29,6 @@ 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
@@ -50,11 +38,11 @@ Public Class VeinMatchingWindow
       ' Per non farla visualizzare alla creazione
       Me.Left = 32000
       ' Assegno messaggi
-      ExportBtn.Content = EgtMsg(91601)        ' Esporta
+      ExportBtn.Content = EgtMsg(MSG_VEINMATCHING + 1)        ' Esporta
-      ShowTextBtn.Content = EgtMsg(91609)      ' Mostra Info
+      ShowTextBtn.Content = EgtMsg(MSG_VEINMATCHING + 2)      ' Mostra Info
-      EditBtn.Content = EgtMsg(91610)          ' Modifica
+      EditBtn.Content = EgtMsg(MSG_VEINMATCHING + 3)          ' Modifica
-      VerifyBtn.Content = EgtMsg(91611)        ' Verifica
+      VerifyBtn.Content = EgtMsg(MSG_VEINMATCHING + 4)        ' Verifica
-      MagneticBtn.Content = EgtMsg(91612)      ' Magnetico
+      MagneticBtn.Content = EgtMsg(MSG_VEINMATCHING + 5)      ' Magnetico
    End Sub
 
    Private Sub Window_Loaded(sender As Object, e As RoutedEventArgs) Handles Me.Loaded
@@ -261,14 +249,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
@@ -278,7 +266,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
@@ -298,15 +286,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
@@ -334,7 +322,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
@@ -512,31 +500,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)
+         vtMove += New Vector3d( -DIM_REG + SAFE_DIST - b3Parts.Min().x, 0, 0)
-      End If
+      End If 
       If b3Parts.Min().y < -DIM_REG + SAFE_DIST Then
-         vtMove += New Vector3d(0, -DIM_REG + SAFE_DIST - b3Parts.Min().y, 0)
+         vtMove += New Vector3d( 0, -DIM_REG + SAFE_DIST - b3Parts.Min().y, 0)
-      End If
+      End If 
       If b3Parts.Max().x > DIM_REG - SAFE_DIST Then
-         vtMove += New Vector3d(DIM_REG - SAFE_DIST - b3Parts.Max().x, 0, 0)
+         vtMove += New Vector3d( DIM_REG - SAFE_DIST - b3Parts.Max().x, 0, 0)
-      End If
+      End If 
       If b3Parts.Max().y > DIM_REG - SAFE_DIST Then
-         vtMove += New Vector3d(0, DIM_REG - SAFE_DIST - b3Parts.Max().y, 0)
+         vtMove += New Vector3d( 0, DIM_REG - SAFE_DIST - b3Parts.Max().y, 0)
-      End If
+      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
@@ -585,9 +573,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
+      If Not EgtGetStatus( nVeinId2, nStat) OrElse nStat <> GDB_ST.ON_ Then
-         EgtSetStatus(nVeinId2, GDB_ST.ON_)
+         EgtSetStatus( nVeinId2, GDB_ST.ON_)
-      End If
+      End If 
       ' Se impostato, nascondo scritte, sono nel layer "Region"
       If Not m_bShowText Then
          Dim nVeinRegId As Integer = EgtGetFirstNameInGroup(nVeinId2, NAME_REGION)
@@ -996,7 +984,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
@@ -1084,7 +1072,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)
@@ -1102,7 +1090,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)
@@ -1718,44 +1706,43 @@ 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, ptS, ptE As Point3d
+      Dim ptSRef, ptERef, 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
 
-      ' vettore lato cucina
+      ' verifco che sia già stato ruotato 
-      Dim vtRotRef As Vector3d = ptERef - ptSRef
+      Dim nInfo3D As Integer = 0
-      ' vettore lato AlzFront
+      EgtGetInfo(Item.SideId, "Info3D", nInfo3D)
-      Dim vtRot As Vector3d = ptE - ptS
 
-      ' ruoto il solido intorno al lato di riferimento
+      If nInfo3D <> 1 Then
-      If nType = ALETTE.A Then
+         ' ruoto il solido intorno al lato di riferimento
-         EgtRotate(Item.PartId, ptE, vtRot, 90, GDB_RT.GLOB)
+         Dim vtRot As Vector3d = ptERef - ptSRef
-      ElseIf nType = ALETTE.F Then
+         If nType = 1 Then
-         EgtRotate(Item.PartId, ptE, vtRot, -90, GDB_RT.GLOB)
+            EgtRotate(Item.PartId, ptE, vtRot, -90, GDB_RT.GLOB)
+         ElseIf nType = 2 Then
+            EgtRotate(Item.PartId, ptE, vtRot, 90, GDB_RT.GLOB)
+         End If
       End If
 
       ' punto di riferimento per la traslazione sul solido
       Dim ptSolid As Point3d
-      If nType = ALETTE.A Then
+      If nType = 1 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, GDB_ID.ROOT, ptSolid)
+         EgtStartPoint(nFrontCrvId, ptSolid)
-      ElseIf nType = ALETTE.F Then
+      ElseIf nType = 2 Then
-         EgtStartPoint(Item.SideId, GDB_ID.ROOT, ptSolid)
+         EgtStartPoint(Item.SideId, ptSolid)
       End If
 
-      ' Dim ItemFrame As New Frame3d
+      Dim ItemFrame As New Frame3d
-      ' If Not EgtGetGroupGlobFrame(Item.PartId, ItemFrame) Then Return False
+      If Not EgtGetGroupGlobFrame(Item.PartId, ItemFrame) Then Return False
-      ' ptSolid.ToGlob(ItemFrame)
+      ptSolid.ToGlob(ItemFrame)
 
       'punto di riferimento per la traslazione sul piano cucina
       Dim ptKitchen As Point3d = ptERef
@@ -1763,16 +1750,6 @@ 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,7 +1,9 @@
-<DockPanel x:Class="InstrumentPanelV"
+<EgtFloating:EgtFloatingPanel 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">
+   xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
+   IsTopDockable="True" IsBottomDockable="False" IsLeftDockable="False"
+   IsRightDockable="False" Style="{StaticResource ToolBar_EgtFloatingPanel}">
 
       <ToggleButton ToolTip="{Binding GetDistToolTip}"
                     Style="{StaticResource ToolBar_ToggleButton}"
@@ -9,4 +11,4 @@
          <Image Source="/Resources/InstrumentPanel/GetDist.png" Stretch="Uniform"/>
       </ToggleButton>
 
-</DockPanel>
+</EgtFloating:EgtFloatingPanel>

InstrumentPanel/PrintPanelV.xaml

@@ -1,12 +0,0 @@
-<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

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

InstrumentPanel/PrintPanelVM.vb

@@ -1,91 +0,0 @@
-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, EgtMsg(91688))    ' 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,19 +28,16 @@
       </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>
@@ -78,8 +75,7 @@
 
        <!--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>
 
@@ -120,19 +116,17 @@
                 </Grid>
              
                 <ListBox ItemsSource="{Binding MaterialList}"
-                          SelectedItem="{Binding SelMaterial}"
+                     SelectedItem="{Binding SelMaterial}"
-                          Style="{StaticResource OptionWnd_ListBox}"
+                     DisplayMemberPath="sName"
-                          DisplayMemberPath="sName"
+                     Grid.RowSpan="2"
-                          Grid.RowSpan="2"
+                     Margin="0,0,0,5"/>
-                          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}"
@@ -163,8 +157,7 @@
       </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}"
@@ -175,8 +168,7 @@
 
       </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}">
@@ -202,8 +194,7 @@
       </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" >
 
           

MachOptionWindow/MachOptionWindowVM.vb

@@ -576,13 +576,13 @@ Public Class MachOptionWindowVM
 
    Public ReadOnly Property OkMsg As String
       Get
-         Return EgtMsg(91651) ' Ok
+         Return "Ok"
       End Get
    End Property
 
    Public ReadOnly Property CancelMsg As String
       Get
-         Return EgtMsg(91652) ' Cancel
+         Return "Cancel"
       End Get
    End Property
 

MachinePanel/MachinePanelV.xaml

@@ -1,27 +1,29 @@
-<DockPanel x:Class="MachinePanelV"
+<EgtFloating:EgtFloatingPanel x:Class="MachinePanelV"
    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"
+   xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
+   IsTopDockable="True" IsBottomDockable="False" IsLeftDockable="False"
+   IsRightDockable="False"
+   Background="{StaticResource Omag_Gray}" BorderBrush="{StaticResource Omag_Gray}"
    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}"
+           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>
+   
 
-    <Button Command="{Binding ToolDbCommand}" ToolTip="{Binding ToolDBToolTip}" Style="{StaticResource ToolBar_Button}">
+</EgtFloating:EgtFloatingPanel>
-        <Image Source="/Resources/NewIcons/DB-lavorazioni.png" Stretch="Uniform"/>
-    </Button>
-    <Button Command="{Binding MachDbCommand}" ToolTip="{Binding MachiningDbToolTip}" Style="{StaticResource ToolBar_Button}">
-        <Image Source="/Resources/NewIcons/DB-utensili.png" Stretch="UniformToFill"/>
-    </Button>
-    <Button Command="{Binding SetUpCommand}" ToolTip="{Binding SetUpToolTip}" Style="{StaticResource ToolBar_Button}">
-        <Image Source="/Resources/NewIcons/ToolChangerPos.png" Stretch="Uniform" />
-    </Button>
-    <Button Command="{Binding WaterjetDbCommand}" ToolTip="{Binding WaterjetDbToolTip}"
-           Style="{StaticResource ToolBar_Button}" Visibility="{Binding WjDb_Visibility}">
-        <Image Source="/Resources/NewIcons/DB-WJ.png" Stretch="UniformToFill"/>
-    </Button>
-    <Button Command="{Binding MachOptionsCommand}" ToolTip="{Binding OptionsToolTip}" Style="{StaticResource ToolBar_Button}">
-        <Image Source="/Resources/TopCommandBar/Options.png" Stretch="Uniform" />
-    </Button>
-</DockPanel>

MachinePanel/MachinePanelV.xaml.vb

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

MachinePanel/MyMachinePanelVM.vb

@@ -105,7 +105,7 @@ Public Class MyMachinePanelVM
       ' procedo ad inizializzare la classe → carico la lista "MachineList" che visualizzo per l'inserimento di nuovi MachGroup
       Machine.MachineListInit(sMchRoots, MachineList)
       ' Inizializzo valori visibilità parametri Db utensili e lavorazioni
-      ' OmagOFFICETMDbParamVisibility.Init()
+      OmagOFFICETMDbParamVisibility.Init()
    End Sub
 
    ''' <summary>
@@ -121,72 +121,9 @@ Public Class MyMachinePanelVM
       End If
 
       Dim ToolDbWindowVM As New ToolDbWindowVM(CurrentMachine.sMachDir, CurrentMachine.sMachIniFile, OmagOFFICEMap.refSceneHostVM.MainScene.GetCtx(), "Stone", OmagOFFICEMap.refMainWindowVM.MainWindowM.nUserLevel > 5)
-      ' imposto colori sfondo
+      Dim ToolDbWindowV As New ToolDbWindowV(Application.Current.MainWindow, ToolDbWindowVM)
-      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.BackgroundListCmBxTxBl = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
-      ToolDbWindowVM.ForegroundCmBxTxBl = Brushes.White
-      ToolDbWindowVM.BorderBrushCmBxTxBl = Brushes.Black
-      ToolDbWindowVM.BorderThicknessCmBxTxBl = New Thickness(1)
-      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 = New Thickness(1)
-
-      ''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 = 768
+         ToolDbWindowV.Height = 640
          ToolDbWindowV.Width = 1024
          ToolDbWindowV.ShowDialog()
       Else
@@ -205,94 +142,22 @@ 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")
          MessageBox.Show(EgtMsg(MSG_MACHININGDBERRORS + 8), EgtMsg(MSG_MESSAGEBOX + 1), MessageBoxButton.OK, MessageBoxImage.Error)
          Return
       End If
-
-      EgtOutLog("Call function: Creazione oggetto MachDbWindowVM")
-      TimeSpanInit()
       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)
-      EgtOutLog(TimeSpanEnd())
-
-      EgtOutLog("Call function: Aggiorna oggetto MachDbWindowVM")
-      TimeSpanInit()
-      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)
-      MachDbWindowVM.MyForegroundChColor = Brushes.White
-
-      ' Definisco lo stile della ComboBox
-      MachDbWindowVM.BackgroundCmBxTxBl = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
-      MachDbWindowVM.BackgroundListCmBxTxBl = DirectCast(New System.Windows.Media.BrushConverter().ConvertFromString("#1C1D22"), Brush)
-      MachDbWindowVM.ForegroundCmBxTxBl = Brushes.White
-      MachDbWindowVM.BorderBrushCmBxTxBl = Brushes.Black
-      MachDbWindowVM.BorderThicknessCmBxTxBl = New Thickness(1)
-      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 = New Thickness(1)
-      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 = New Thickness(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 = New Thickness(0, 0, 0, 1)
-      MachDbWindowVM.BorderBrushDataGridCell = Brushes.DarkGray
-      MachDbWindowVM.BorderThicknessDataGridCell = New Thickness(0, 0, 1, 0)
-
-      EgtOutLog(TimeSpanEnd())
-
-      EgtOutLog("Call function: Creazione oggetto MachDbWindowV")
-      TimeSpanInit()
-      Dim MachDbWindowV As New MyMachiningDbWindowV(Application.Current.MainWindow, MachDbWindowVM)
-
 
       If EgtWPFLib5.MachiningTreeViewItem.m_MatType <> 0 Then
-         EgtOutLog("Call function: Visualizzazione oggetto MachDbWindowV")
-         TimeSpanInit()
          MachDbWindowV.Height = 768
          MachDbWindowV.Width = 1024
          MachDbWindowV.ShowDialog()
-         EgtOutLog(TimeSpanEnd())
       Else
          Exit Sub
       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
       ' Lama
@@ -341,14 +206,14 @@ Public Class MyMachinePanelVM
       If Not bOkSetUp Then
          SetUp_Background = Brushes.Red
       Else
-         SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
+         SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), 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("#1C1D22"), SolidColorBrush)
+         OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
       End If
    End Sub
 
@@ -387,8 +252,7 @@ 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()
@@ -474,8 +338,7 @@ 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

@@ -219,17 +219,12 @@ Public Class MainWindowM
       EgtUILib.GetPrivateProfileString( S_LICENCE, K_NESTKEY, "", sNestKey, sLicFile)
       EgtSetNestKey( sNestKey)
       Dim bNetHwKey As Boolean = ( GetMainPrivateProfileInt(S_GENERAL, K_NETKEY, 0) = 1)
-      EgtSetNetHwKey(bNetHwKey)
+      EgtSetNetHwKey( bNetHwKey)
-      Dim sLockId As String = ""
-      EgtUILib.GetPrivateProfileString(S_LICENCE, K_LOCKID, "", sLockId, sLicFile)
-      If Not String.IsNullOrEmpty(sLockId) Then
-         EgtSetLockId(sLockId)
-      End If
       ' Verifico abilitazione nesting automatico
       m_bAutoNestOption = Not String.IsNullOrWhiteSpace( sNestKey)
       ' Recupero livello e opzioni della chiave
-      Dim bKey As Boolean = EgtGetKeyLevel(9423, 2707, 1, m_nKeyLevel) And
+      Dim bKey As Boolean = EgtGetKeyLevel(9423, 2410, 1, m_nKeyLevel) And
-                            EgtGetKeyOptions(9423, 2707, 1, m_nKeyOptions)
+                            EgtGetKeyOptions(9423, 2410, 1, m_nKeyOptions)
       ' Verifico abilitazione prodotto
       Dim bProd As Boolean = GetKeyOption(KEY_OPT.OFFICE_BASE)
       ' Inizializzazione generale di EgtInterface
@@ -291,7 +286,7 @@ Public Class MainWindowM
       ' Leggo nome cartella delle foto
       GetMainPrivateProfileString(S_GENERAL, K_PHOTODIR, sDataRoot & "\Data", m_sPhotoDir)
       ' Creo connessione al Db
-      If m_SlabDB AndAlso Not ManageDb.ConnectToDb(m_sPhotoDir & "\" & DB_FILENAME) Then
+      If m_SlabDB And Not ManageDb.ConnectToDb(m_sPhotoDir & "\" & DB_FILENAME) Then
          EgtOutLog("Error connecting to DB")
          MessageBox.Show(EgtMsg(92000 + 1), EgtMsg(MSG_EGTMSGBOX + 15), MessageBoxButton.OK, MessageBoxImage.Error)
          m_SlabDB = False
@@ -299,7 +294,6 @@ Public Class MainWindowM
       ' Info su opzioni chiave
       EgtOutLog("KeyOptions : " & bKey.ToString() & " " & m_nKeyOptions.ToString() & " " & bProd.ToString())
       EgtPHOTOLib.MainData.SetConfigDir(m_sConfigDir)
-      EgtPHOTOLib.MainData.SetDebugLevel(m_nDebug)
       EgtPHOTOLib.MainData.SetKeyLevel(m_nKeyLevel)
       EgtPHOTOLib.MainData.SetKeyOptions(CInt(m_nKeyOptions))
       EgtPHOTOLib.MainData.SetPhotoDir(m_sPhotoDir)

MainWindow/MainWindowV.xaml

@@ -4,29 +4,24 @@
    xmlns:OmagOFFICE="clr-namespace:OmagOFFICE"
    xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
    DataContext="{StaticResource MainWindowVM}"
-   Style="{DynamicResource MainWindowStyle}"
+   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
    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>
 
-    <EgtWPFLib5:EgtCustomWindow.InputBindings>
-        <KeyBinding Key="Escape" Command="{Binding EscapeCommand}"/>
-    </EgtWPFLib5:EgtCustomWindow.InputBindings>
-    
    <!--Pannello principale -->
-    <DockPanel>
+   <DockPanel>
 
-        <!--StatusBar -->
+      <!--StatusBar -->
-        <OmagOFFICE:StatusBarV DataContext="{StaticResource StatusBarVM}"
+      <OmagOFFICE:StatusBarV DataContext="{StaticResource StatusBarVM}"
                              DockPanel.Dock="Bottom"/>
-        <!--Progetto corrente -->
+      <!--Progetto corrente -->
-        <OmagOFFICE:ProjectV DataContext="{StaticResource ProjectVM}"/>
+      <OmagOFFICE:ProjectV DataContext="{StaticResource ProjectVM}"/>
-
-    </DockPanel>
 
+   </DockPanel>
+   
 </EgtWPFLib5:EgtCustomWindow>

MainWindow/MainWindowVM.vb

@@ -45,7 +45,6 @@ Public Class MainWindowVM
    ' definizione comandi
    Private m_cmdAboutBox As ICommand
    Private m_cmdCloseApplication As ICommand
-   Private m_cmdEscape As ICommand
 
 #Region "CONSTRUCTOR"
 
@@ -137,27 +136,6 @@ Public Class MainWindowVM
 
 #Region "COMMANDS"
 
-#Region "Escape"
-
-   Public ReadOnly Property EscapeCommand() As ICommand
-      Get
-         If m_cmdEscape Is Nothing Then
-            m_cmdEscape = New Command(AddressOf Escape)
-         End If
-         Return m_cmdEscape
-      End Get
-   End Property
-
-   Public Sub Escape()
-      If Not IsNothing(OmagOFFICEMap.refSplitModeVM) Then
-         OmagOFFICEMap.refSplitModeVM.DeactiveSplitCut()
-         OmagOFFICEMap.refSplitModeVM.DeselectWJBridgesPart()
-         OmagOFFICEMap.refSplitModeVM.ResetAllMark()
-      End If
-   End Sub
-
-#End Region
-
 #Region "AboutBoxCommand"
 
    ' Returns a command that manage the MainWindow_Unloaded command

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: AssemblyProduct("OmagOFFICE")> 
-<Assembly: AssemblyCopyright("Copyright ©  2017-2025 by Egalware s.r.l.")>
+<Assembly: AssemblyCopyright("Copyright ©  2017-2022 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.7.7.1")>
+<Assembly: AssemblyVersion("2.4.10.1")>
-<Assembly: AssemblyFileVersion("2.7.7.1")>
+<Assembly: AssemblyFileVersion("2.4.10.1")>
 

My Project/app.manifest

@@ -1,79 +0,0 @@
-<?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

@@ -1,109 +0,0 @@
-<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

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

MyMachGroupPanel/MyMachGroupPanelVM.vb

@@ -189,10 +189,6 @@ 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
@@ -233,24 +229,23 @@ 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("#1C1D22"), SolidColorBrush)
+         OmagOFFICEMap.refMachinePanelVM.SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), 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("#1C1D22"), SolidColorBrush)
+            OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
          End If
       Else
          OmagOFFICEMap.refOptionPanelVM.RawPart_Background = OmagOFFICEDictionary.TabControl_Header_Background
-         OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
+         OmagOFFICEMap.refRawPartTabVM.CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
       End If
 
       ' Se non esiste il grezzo vado subito alla sua definizione
@@ -351,11 +346,11 @@ Public Class MyMachGroup
          If Not EgtGetInfo(Id, INFO_SLABHEIGHT, dSlabHeight) Then dSlabHeight = 0
          Dim sCurrSawing As String = String.Empty
          If Not EgtGetInfo(m_nOpersGroupId, INFO_CURRSAWING, sCurrSawing) Then sCurrSawing = "---"
-         Return EgtMsg(91683) & sSlabName & Environment.NewLine &                   ' Name: 
+         Return "Name: " & sSlabName & Environment.NewLine &
-                EgtMsg(91684) & sMaterial & Environment.NewLine &                   ' Material: 
+                "Material: " & sMaterial & Environment.NewLine &
-                EgtMsg(91685) & LenToString(dSlabHeight, 3) & Environment.NewLine & ' Thickness: 
+                "Thickness: " & LenToString(dSlabHeight, 3) & Environment.NewLine &
-                EgtMsg(91686) & sCurrSawing & Environment.NewLine &                 ' Sawing: 
+                "Sawing: " & sCurrSawing & Environment.NewLine &
-                EgtMsg(91687) & Machine                                             ' Machine: 
+                "Machine: " & Machine
       End Get
    End Property
 

MyMachiningDbWindow/MyMachiningDbWindowV.xaml

@@ -12,199 +12,164 @@
    CloseCommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
                             Height="900">
 
-   <EgtWPFLib5:EgtCustomWindow.InputBindings>
+    <EgtWPFLib5:EgtCustomWindow.InputBindings>
-      <KeyBinding Key="Escape" Command="{Binding ReloadMachiningCommand}"
+        <KeyBinding Key="Escape" Command="{Binding ReloadMachiningCommand}"
          CommandParameter="{Binding Path=SelectedItem,ElementName=MachiningsTreeView}"/>
-   </EgtWPFLib5:EgtCustomWindow.InputBindings>
+    </EgtWPFLib5:EgtCustomWindow.InputBindings>
 
-   <EgtWPFLib5:EgtCustomWindow.Resources>
+    <EgtWPFLib5:EgtCustomWindow.Resources>
-      <!--<EgtWPFLib5:MachiningParamVisibilityConverter x:Key="MachiningParamVisibilityConverter"/>-->
+        <EgtWPFLib5:MachiningParamVisibilityConverter x:Key="MachiningParamVisibilityConverter"/>
-      <EgtWPFLib5:DepthUnitConverter x:Key="DepthUnitConverter"/>
+        <EgtWPFLib5:DepthUnitConverter x:Key="DepthUnitConverter"/>
-      <EgtWPFLib5:ErrorVisibilityConverter x:Key="ErrorVisibilityConverter"/>
+        <EgtWPFLib5:ErrorVisibilityConverter x:Key="ErrorVisibilityConverter"/>
-      <sys:Int32 x:Key="Invert">0</sys:Int32>
+        <sys:Int32 x:Key="Invert">0</sys:Int32>
-      <sys:Int32 x:Key="LeaveTab">1</sys:Int32>
+        <sys:Int32 x:Key="LeaveTab">1</sys:Int32>
-      <sys:Int32 x:Key="WorkSide">2</sys:Int32>
+        <sys:Int32 x:Key="WorkSide">2</sys:Int32>
-      <sys:Int32 x:Key="HeadSide">3</sys:Int32>
+        <sys:Int32 x:Key="HeadSide">3</sys:Int32>
-      <sys:Int32 x:Key="LeadInType">4</sys:Int32>
+        <sys:Int32 x:Key="LeadInType">4</sys:Int32>
-      <sys:Int32 x:Key="ExtLinkType">5</sys:Int32>
+        <sys:Int32 x:Key="ExtLinkType">5</sys:Int32>
-      <sys:Int32 x:Key="LeadOutType">6</sys:Int32>
+        <sys:Int32 x:Key="LeadOutType">6</sys:Int32>
-      <sys:Int32 x:Key="CurveUse">7</sys:Int32>
+        <sys:Int32 x:Key="CurveUse">7</sys:Int32>
-      <sys:Int32 x:Key="StepType">8</sys:Int32>
+        <sys:Int32 x:Key="StepType">8</sys:Int32>
-      <sys:Int32 x:Key="LeadLinkType">9</sys:Int32>
+        <sys:Int32 x:Key="LeadLinkType">9</sys:Int32>
-      <sys:Int32 x:Key="Speed">10</sys:Int32>
+        <sys:Int32 x:Key="Speed">10</sys:Int32>
-      <sys:Int32 x:Key="Feed">11</sys:Int32>
+        <sys:Int32 x:Key="Feed">11</sys:Int32>
-      <sys:Int32 x:Key="StartFeed">12</sys:Int32>
+        <sys:Int32 x:Key="StartFeed">12</sys:Int32>
-      <sys:Int32 x:Key="EndFeed">13</sys:Int32>
+        <sys:Int32 x:Key="EndFeed">13</sys:Int32>
-      <sys:Int32 x:Key="TipFeed">14</sys:Int32>
+        <sys:Int32 x:Key="TipFeed">14</sys:Int32>
-      <sys:Int32 x:Key="OffSr">15</sys:Int32>
+        <sys:Int32 x:Key="OffSr">15</sys:Int32>
-      <sys:Int32 x:Key="OffSl">16</sys:Int32>
+        <sys:Int32 x:Key="OffSl">16</sys:Int32>
-      <sys:Int32 x:Key="SideAngle">17</sys:Int32>
+        <sys:Int32 x:Key="SideAngle">17</sys:Int32>
-      <sys:Int32 x:Key="Approx">18</sys:Int32>
+        <sys:Int32 x:Key="Approx">18</sys:Int32>
-      <sys:Int32 x:Key="StartPos">19</sys:Int32>
+        <sys:Int32 x:Key="StartPos">19</sys:Int32>
-      <sys:Int32 x:Key="StartSlowLen">20</sys:Int32>
+        <sys:Int32 x:Key="StartSlowLen">20</sys:Int32>
-      <sys:Int32 x:Key="EndSlowLen">21</sys:Int32>
+        <sys:Int32 x:Key="EndSlowLen">21</sys:Int32>
-      <sys:Int32 x:Key="ThrouAddLen">22</sys:Int32>
+        <sys:Int32 x:Key="ThrouAddLen">22</sys:Int32>
-      <sys:Int32 x:Key="StepPar">23</sys:Int32>
+        <sys:Int32 x:Key="StepPar">23</sys:Int32>
-      <sys:Int32 x:Key="ReturnPos">24</sys:Int32>
+        <sys:Int32 x:Key="ReturnPos">24</sys:Int32>
-      <sys:Int32 x:Key="TabLen">25</sys:Int32>
+        <sys:Int32 x:Key="TabLen">25</sys:Int32>
-      <sys:Int32 x:Key="TabDist">26</sys:Int32>
+        <sys:Int32 x:Key="TabDist">26</sys:Int32>
-      <sys:Int32 x:Key="TabHeight">27</sys:Int32>
+        <sys:Int32 x:Key="TabHeight">27</sys:Int32>
-      <sys:Int32 x:Key="TabAngle">28</sys:Int32>
+        <sys:Int32 x:Key="TabAngle">28</sys:Int32>
-      <sys:Int32 x:Key="LiTang">29</sys:Int32>
+        <sys:Int32 x:Key="LiTang">29</sys:Int32>
-      <sys:Int32 x:Key="LiPerp">30</sys:Int32>
+        <sys:Int32 x:Key="LiPerp">30</sys:Int32>
-      <sys:Int32 x:Key="LiElev">31</sys:Int32>
+        <sys:Int32 x:Key="LiElev">31</sys:Int32>
-      <sys:Int32 x:Key="LiCompLen">32</sys:Int32>
+        <sys:Int32 x:Key="LiCompLen">32</sys:Int32>
-      <sys:Int32 x:Key="LoTang">33</sys:Int32>
+        <sys:Int32 x:Key="LoTang">33</sys:Int32>
-      <sys:Int32 x:Key="LoPerp">34</sys:Int32>
+        <sys:Int32 x:Key="LoPerp">34</sys:Int32>
-      <sys:Int32 x:Key="LoElev">35</sys:Int32>
+        <sys:Int32 x:Key="LoElev">35</sys:Int32>
-      <sys:Int32 x:Key="LoCompLen">36</sys:Int32>
+        <sys:Int32 x:Key="LoCompLen">36</sys:Int32>
-      <sys:Int32 x:Key="StartAddLen">37</sys:Int32>
+        <sys:Int32 x:Key="StartAddLen">37</sys:Int32>
-      <sys:Int32 x:Key="EndAddLen">38</sys:Int32>
+        <sys:Int32 x:Key="EndAddLen">38</sys:Int32>
-      <sys:Int32 x:Key="StepExtArc">39</sys:Int32>
+        <sys:Int32 x:Key="StepExtArc">39</sys:Int32>
-      <sys:Int32 x:Key="StepIntArc">40</sys:Int32>
+        <sys:Int32 x:Key="StepIntArc">40</sys:Int32>
-      <sys:Int32 x:Key="SideStep">41</sys:Int32>
+        <sys:Int32 x:Key="SideStep">41</sys:Int32>
-      <sys:Int32 x:Key="VertFeed">42</sys:Int32>
+        <sys:Int32 x:Key="VertFeed">42</sys:Int32>
-      <sys:Int32 x:Key="NamePar">43</sys:Int32>
+        <sys:Int32 x:Key="NamePar">43</sys:Int32>
-      <sys:Int32 x:Key="Tool">44</sys:Int32>
+        <sys:Int32 x:Key="Tool">44</sys:Int32>
-      <sys:Int32 x:Key="DepthStr">45</sys:Int32>
+        <sys:Int32 x:Key="DepthStr">45</sys:Int32>
-      <sys:Int32 x:Key="UserNotes">46</sys:Int32>
+        <sys:Int32 x:Key="UserNotes">46</sys:Int32>
-      <sys:Int32 x:Key="OverLap">47</sys:Int32>
+        <sys:Int32 x:Key="OverLap">47</sys:Int32>
-      <sys:Int32 x:Key="SubType">49</sys:Int32>
+        <sys:Int32 x:Key="SubType">49</sys:Int32>
-      <sys:Int32 x:Key="SelectedSolChoiceType">50</sys:Int32>
+        <sys:Int32 x:Key="SelectedSolChoiceType">50</sys:Int32>
-      <sys:Int32 x:Key="AxRotRef">51</sys:Int32>
+        <sys:Int32 x:Key="AxRotRef">51</sys:Int32>
-      <sys:Int32 x:Key="BlockedAxesRef">52</sys:Int32>
+        <sys:Int32 x:Key="BlockedAxesRef">52</sys:Int32>
-      <sys:Int32 x:Key="FaceUseType">53</sys:Int32>
+        <sys:Int32 x:Key="FaceUseType">53</sys:Int32>
-      <sys:Int32 x:Key="InvertToolDir">54</sys:Int32>
+        <sys:Int32 x:Key="InvertToolDir">54</sys:Int32>
-      <sys:Int32 x:Key="StepBack">55</sys:Int32>
+        <sys:Int32 x:Key="StepBack">55</sys:Int32>
-      <sys:Int32 x:Key="StepSideAngBack">56</sys:Int32>
+        <sys:Int32 x:Key="StepSideAngBack">56</sys:Int32>
-      <sys:Int32 x:Key="BackFeed">57</sys:Int32>
+        <sys:Int32 x:Key="BackFeed">57</sys:Int32>
-      <sys:Int32 x:Key="StepSideAng">58</sys:Int32>
+        <sys:Int32 x:Key="StepSideAng">58</sys:Int32>
-      <sys:Int32 x:Key="ForwardAngle">59</sys:Int32>
+        <sys:Int32 x:Key="ForwardAngle">59</sys:Int32>
-      <sys:Int32 x:Key="Probing">60</sys:Int32>
+        <sys:Int32 x:Key="Probing">60</sys:Int32>
-      <sys:Int32 x:Key="ProbingMinDist">61</sys:Int32>
+        <sys:Int32 x:Key="ProbingMinDist">61</sys:Int32>
-      <sys:Int32 x:Key="ProbingMaxDist">62</sys:Int32>
+        <sys:Int32 x:Key="ProbingMaxDist">62</sys:Int32>
-      <sys:Int32 x:Key="ExtCornType">63</sys:Int32>
+        <sys:Int32 x:Key="ExtCornType">63</sys:Int32>
-      <sys:Int32 x:Key="IntCornType">64</sys:Int32>
+        <sys:Int32 x:Key="IntCornType">64</sys:Int32>
-      <sys:Int32 x:Key="CornSlowLen">65</sys:Int32>
+        <sys:Int32 x:Key="CornSlowLen">65</sys:Int32>
-      <sys:Int32 x:Key="CornSlowPerc">66</sys:Int32>
+        <sys:Int32 x:Key="CornSlowPerc">66</sys:Int32>
-      <sys:Int32 x:Key="LiHole">67</sys:Int32>
+        <sys:Int32 x:Key="LiHole">67</sys:Int32>
-      <sys:Int32 x:Key="LiHoleRad">68</sys:Int32>
+        <sys:Int32 x:Key="LiHoleRad">68</sys:Int32>
-      <sys:Int32 x:Key="LpTurns">69</sys:Int32>
+        <sys:Int32 x:Key="LpTurns">69</sys:Int32>
-      <sys:Int32 x:Key="HpTurns">70</sys:Int32>
+        <sys:Int32 x:Key="HpTurns">70</sys:Int32>
-      <sys:Int32 x:Key="ThicknessFeed">71</sys:Int32>
+        <sys:Int32 x:Key="ThicknessFeed">71</sys:Int32>
-      <SolidColorBrush x:Key="ListBorder" Color="#828790"/>
+    </EgtWPFLib5:EgtCustomWindow.Resources>
-   </EgtWPFLib5:EgtCustomWindow.Resources>
 
-   <Grid Background="Transparent">
+    <Grid>
-      <Grid.ColumnDefinitions>
+        <Grid.ColumnDefinitions>
-         <ColumnDefinition Width="0.95*"/>
+            <ColumnDefinition Width="0.75*"/>
-         <ColumnDefinition Width="2*"/>
+            <ColumnDefinition Width="2*"/>
-         <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
-      </Grid.ColumnDefinitions>
+        </Grid.ColumnDefinitions>
 
-      <Grid Background="Transparent">
+        <Grid>
-         <Grid.RowDefinitions>
+            <Grid.RowDefinitions>
-            <RowDefinition Height="0.75*"/>
+                <RowDefinition Height="1*"/>
-            <RowDefinition Height="12*"/>
+                <RowDefinition Height="11*"/>
-         </Grid.RowDefinitions>
+            </Grid.RowDefinitions>
 
-         <UniformGrid Grid.Row="0" Columns="8">
+            <UniformGrid Grid.Row="0" Columns="3">
-            <Button ToolTip="New" Command="{Binding NewCommand}"
+                <Button Content="New" Command="{Binding NewCommand}"
                CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
-               IsEnabled="{Binding IsEnabledNewBtn, Mode=OneWay}"              
+               IsEnabled="{Binding IsEnabledNewBtn, Mode=OneWay}"/>
-               Style = "{DynamicResource MachiningDB_Button}">
+                <Button Content="Save" Command="{Binding SaveCommand}"
-               <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}"        
+               IsEnabled="{Binding IsEnabledSaveBtn, Mode=OneWay}"/>
-               Style = "{DynamicResource MachiningDB_Button}">
+                <Button Content="Remove" Command="{Binding RemoveCommand}"
-               <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}">
+            </UniformGrid>
-               <Image Source="/Resources/TopCommandBar/Remove.png" Stretch="Uniform"/>
-            </Button>
 
-            <Button ToolTip="Import" Command="{Binding ImportCommand}"
+            <TreeView Name="MachiningsTreeView" Grid.Row="1"
-               CommandParameter="{Binding Path=SelectedItem, ElementName=MachiningsTreeView}"
+            ItemsSource="{Binding Path=MachiningsList}">
-               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.ItemContainerStyle>
+                    <Style TargetType="{x:Type TreeViewItem}">
+                        <Setter Property="IsSelected" Value="{Binding IsSelected, Mode=TwoWay}" />
+                        <Setter Property="IsExpanded" Value="{Binding IsExpanded, Mode=TwoWay}" />
+                        <Setter Property="IsEnabled" Value="{Binding IsEnabled, Mode=TwoWay}" />
+                    </Style>
+                </TreeView.ItemContainerStyle>
 
-         <TreeView Name="MachiningsTreeView" Grid.Row="1"
+                <TreeView.Resources>
-                      Background="Transparent" BorderThickness="0"
+                    <HierarchicalDataTemplate DataType="{x:Type EgtWPFLib5:FamilyMachiningTreeViewItem}" ItemsSource="{Binding Items}">
-                      ItemsSource="{Binding Path=MachiningsList}">
-            <TreeView.ItemContainerStyle>
-               <Style TargetType="{x:Type TreeViewItem}" BasedOn="{StaticResource Db_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}" />
-               </Style>
-            </TreeView.ItemContainerStyle>
 
-            <TreeView.Resources>
+                        <Grid >
-               <HierarchicalDataTemplate DataType="{x:Type EgtWPFLib5:FamilyMachiningTreeViewItem}" ItemsSource="{Binding Items}">
+                            <Grid.ColumnDefinitions>
+                                <ColumnDefinition Width="Auto"/>
+                                <ColumnDefinition Width="1*"/>
+                                <ColumnDefinition Width="Auto"/>
+                            </Grid.ColumnDefinitions>
 
-                  <Grid  Background="Transparent">
+                            <Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Width="32" Margin="0,8,6,4" />
-                     <Grid.ColumnDefinitions>
+                            <TextBlock Grid.Column="1" Text="{Binding Name}" FontSize="15" Margin="10" />
-                        <ColumnDefinition Width="Auto"/>
+                            <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding FamilyColor}" />
-                        <ColumnDefinition Width="1*"/>
-                        <ColumnDefinition Width="Auto"/>
-                     </Grid.ColumnDefinitions>
 
-                     <Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Width="32" Margin="0" />
+                        </Grid>
-                     <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>
 
-               </HierarchicalDataTemplate>
+                    <DataTemplate DataType="{x:Type EgtWPFLib5:MachiningTreeViewItem}">
+                        <Grid >
+                            <Grid.ColumnDefinitions>
+                                <ColumnDefinition Width="Auto"/>
+                                <ColumnDefinition Width="1*"/>
+                                <ColumnDefinition Width="Auto"/>
+                            </Grid.ColumnDefinitions>
 
-               <DataTemplate DataType="{x:Type EgtWPFLib5:MachiningTreeViewItem}">
+                            <!--<Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Margin="0,8,6,4" />-->
-                  <Grid  Background="Transparent">
+                            <TextBlock Grid.Column="1" Text="{Binding NamePar}" Height="18" FontSize="15"  Margin="10"/>
-                     <Grid.ColumnDefinitions>
+                            <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding ToolColor}" />
-                        <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" />-->
+                        </Grid>
-                     <TextBlock Grid.Column="1" Text="{Binding NamePar}" Height="21" FontSize="13"  Margin="30,0,10,0"
+                    </DataTemplate>
-                                       VerticalAlignment="Center" HorizontalAlignment="left"/>
+                </TreeView.Resources>
-                     <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding ToolColor}" />
 
-                  </Grid>
+            </TreeView>
 
-               </DataTemplate>
+        </Grid>
-            </TreeView.Resources>
 
-         </TreeView>
+        <ContentControl Content="{Binding ParamPageV}" Grid.Column="1" Grid.ColumnSpan="2"/>
 
-
+    </Grid>
-      </Grid>
-
-      <ContentControl Content="{Binding ParamPageV}" Grid.Column="1" Grid.ColumnSpan="2"/>
-
-   </Grid>
 
 </EgtWPFLib5:EgtCustomWindow>

MyMachiningDbWindow/MyMachiningDbWindowV.xaml.vb

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

MySceneHost/MySceneHostVM.vb

@@ -47,27 +47,12 @@ Public Class MySceneHostVM
       ' Problemi
       ' Se manca la chiave
       If OmagOFFICEMap.refMainWindowVM.MainWindowM.nKeyLevel = -1 Or OmagOFFICEMap.refMainWindowVM.MainWindowM.nKeyLevel = -2 Then
-         If Not EgtGetNetHwKey() Then
+         EgtOutLog("Missing Dongle")
-            EgtOutLog("Missing Dongle")
+         ' Box di avviso chiave mancante : "Chiave non presente. \n Inserirla e riavviare il programma."  "Errore"
-            ' Box di avviso chiave mancante : "Chiave non presente. \nInserirla e riavviare il programma."  "Errore"
+         Dim sText As String = EgtMsg(MSG_MISSINGKEYWD + 2) & vbCrLf & EgtMsg(MSG_MISSINGKEYWD + 3)
-            Dim sText As String = EgtMsg(10102) & vbCrLf & EgtMsg(10103)
+         Dim sTitle As String = EgtMsg(MSG_MISSINGKEYWD + 1)
-            Dim sTitle As String = EgtMsg(10101)
-            MessageBox.Show(sText, sTitle, MessageBoxButton.OK, MessageBoxImage.Error)
-         Else
-            EgtOutLog("NetDongle is full")
-            ' Box di avviso slot chiave di rete occupato : "Chiave di Rete completamente occupata. \n Uscire dal programma su un altro PC." "Errore"
-            Dim sText As String = EgtMsg(10110) & vbCrLf & EgtMsg(10111)
-            Dim sTitle As String = EgtMsg(10101)
-            MessageBox.Show(sText, sTitle, MessageBoxButton.OK, MessageBoxImage.Error)
-         End If
-         ' Se altrimenti manca il collegamento con la chiave di rete
-      ElseIf OmagOFFICEMap.refMainWindowVM.MainWindowM.nKeyLevel = -9 Then
-         EgtOutLog("Missing Link with Net Dongle")
-         ' Box di avviso chiave mancante : "Collegamento con la Chiave di rete non riuscito. \n Verificare la connessione." "Errore"
-         Dim sText As String = EgtMsg(10108) & vbCrLf & EgtMsg(10109)
-         Dim sTitle As String = EgtMsg(10101)
          MessageBox.Show(sText, sTitle, MessageBoxButton.OK, MessageBoxImage.Error)
-         ' Altrimenti manca la licenza
+      ' Altrimenti manca la licenza
       Else
          EgtOutLog("Problems with Licence")
          ' Box di avviso licenza con problemi : "Programma senza licenza. \n Caricala e riavvia il programma."  "Errore"
@@ -102,14 +87,12 @@ Public Class MySceneHostVM
 
    Public Overrides Sub InitSceneEvents()
       AddHandler MainScene.OnMouseDownScene, AddressOf OnMouseDownScene
-      'AddHandler OnMouseDownScene_DoubleClick_1, AddressOf OnMouseDownScene_DoubleClick
       AddHandler MainScene.OnMouseMoveScene, AddressOf OnMouseMoveScene
       AddHandler MainScene.OnMouseUpScene, AddressOf OnMouseUpScene
       AddHandler MainScene.KeyDown, AddressOf OnKeyDownScene
       AddHandler MainScene.OnCursorPos, AddressOf OnCursorPos
       AddHandler MainScene.OnShowDistance, AddressOf OnShowDistance
       AddHandler MainScene.OnChangedSnapPointType, AddressOf OnChangedSnapPointType
-
    End Sub
 
    Private Sub PreInitializeScene()
@@ -169,19 +152,17 @@ Public Class MySceneHostVM
       MainScene.SetSnapPointType(SP.PT_SKETCH)
    End Sub
 
-   Public Overrides Function SaveProject() As Boolean
+   Public Overrides Sub SaveProject()
-      Dim bOk As Boolean = MyBase.SaveProject()
+      MyBase.SaveProject()
       ' Imposto stato gestione mouse diretto della scena a nessuno
       MainScene.SetStatusNull()
-      Return bOk
+   End Sub
-   End Function
 
-   Public Overrides Function SaveAsProject() As Boolean
+   Public Overrides Sub SaveAsProject()
-      Dim bOk As Boolean = MyBase.SaveAsProject()
+      MyBase.SaveAsProject()
       ' Imposto stato gestione mouse diretto della scena a nessuno
       MainScene.SetStatusNull()
-      Return bOk
+   End Sub
-   End Function
 
    Private Function GetMachineBaseDirs() As String
       ' Trasformo l'elenco dei direttori radice macchina in una stringa del tipo "..\Dir1\Example01|..\Dir2\|Example02"
@@ -202,7 +183,7 @@ Public Class MySceneHostVM
 
 #Region "ProjectManager"
 
-   Public Overrides Function NewProject() As Boolean
+   Public Overrides Sub NewProject()
       EgtSetCurrentContext(MainScene.GetCtx())
       Dim bOk As Boolean = MainController.NewProject()
       ' Eventuale reset VM
@@ -210,10 +191,9 @@ Public Class MySceneHostVM
          VeinMatching.Clear()
       End If
       MainScene.SetStatusNull()
-      Return bOk
+   End Sub
-   End Function
 
-   Public Overrides Function OpenProject(sFilePath As String) As Boolean
+   Public Overrides Sub OpenProject(sFilePath As String)
       EgtSetCurrentContext(MainScene.GetCtx())
       Dim bOk As Boolean = False
       If String.IsNullOrEmpty(sFilePath) Then
@@ -236,38 +216,33 @@ Public Class MySceneHostVM
          Dim sVmFile As String = Path.ChangeExtension(sFile, ".vme")
          VeinMatching.Open(sVmFile)
       End If
-      Return bOk
+   End Sub
-   End Function
 
-   Public Overrides Function ExportProject() As Boolean
+   Public Overrides Sub ExportProject()
-      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)
+         MessageBox.Show(EgtMsg( 91501), "", MessageBoxButton.OK, MessageBoxImage.Exclamation)
-         Return bOk
+         Return
       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 bOk
+      If DirDlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return
       WriteMainPrivateProfileString(S_GENERAL, K_EXPORTDIR, DirDlg.SelectedPath)
       ' Eseguo esportazione
-      bOk = ExecExport(DirDlg.SelectedPath)
+      If ExecExport(DirDlg.SelectedPath) Then
-      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())
-      Return bOk
+   End Sub
-   End Function
 
    Private Function ExecExport(sDirDest As String) As Boolean
       ' salvo il nome della macchina correntemente selezionata
@@ -413,33 +388,31 @@ Public Class MySceneHostVM
       Return bOk
    End Function
 
-   Public Function DxfOutProject() As Boolean
+   Public Sub DxfOutProject()
       EgtSetCurrentContext(MainScene.GetCtx())
       ' Verifico che il progetto sia salvato
       If EgtGetModified() Then
-         MessageBox.Show(EgtMsg(91501), "", MessageBoxButton.OK, MessageBoxImage.Exclamation)
+         MessageBox.Show(EgtMsg( 91501), "", MessageBoxButton.OK, MessageBoxImage.Exclamation)
-         Return False
+         Return
       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 False
+      If DirDlg.ShowDialog() <> Windows.Forms.DialogResult.OK Then Return
       WriteMainPrivateProfileString(S_GENERAL, K_DXFOUTDIR, DirDlg.SelectedPath)
       ' Eseguo esportazione
-      Dim bOk As Boolean = ExecDxfOut(DirDlg.SelectedPath)
+      If ExecDxfOut(DirDlg.SelectedPath) Then
-      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())
-      Return bOk
+   End Sub
-   End Function
 
    Private Function ExecDxfOut(sDirDest As String) As Boolean
       ' Path completa del progetto corrente
@@ -736,8 +709,6 @@ Public Class MySceneHostVM
    End Sub
 
    Private Sub OnSavingProject(ByVal sender As Object, sFile As String)
-      ' Salvo le info del progetto
-      TopCommandBarVM.SetInfoProj(sFile)
       ' Recupero tutti i file di texture associabili ai gruppi di lavoro del progetto
       Dim sDirToSearch As String = Path.GetDirectoryName(sFile)
       Dim sFileToSearch As String = Path.GetFileNameWithoutExtension(sFile) & "." & PHOTO_NAME & "*"
@@ -811,13 +782,6 @@ Public Class MySceneHostVM
    Private Sub OnMouseDownScene(sender As Object, e As Windows.Forms.MouseEventArgs)
       ' Si può selezionare solo con il tasto sinistro e se stato NULL
       If e.Button <> Windows.Forms.MouseButtons.Left Or Not MainScene.IsStatusNull() Then Return
-      If e.Clicks > 1 Then
-         Select Case OmagOFFICEMap.refOptionPanelVM.SelItem
-            Case OptionPanelVM.Tabs.MACHINING
-               OmagOFFICEMap.refMachiningTabVM.OnMouseDownScene_DoubleClick(sender, e)
-            Case OptionPanelVM.Tabs.SIMUL
-         End Select
-      End If
       ' Chiamo l'opportuno gestore
       Select Case OmagOFFICEMap.refOptionPanelVM.SelItem
          Case OptionPanelVM.Tabs.RAWPART

MySetUpWindow/MySetUpWindowV.xaml

@@ -1,200 +0,0 @@
-<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

@@ -1,29 +0,0 @@
-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

@@ -1,22 +1,21 @@
 <EgtWPFLib5:EgtCustomWindow x:Class="MyToolDbWindowV"
-                            xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   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"
-                            xmlns:sys="clr-namespace:System;assembly=mscorlib"
+   xmlns:sys="clr-namespace:System;assembly=mscorlib"
-                            xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
+   xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
-                            Title="{Binding Title}"
+   Title="{Binding Title}"
-                            Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
+   Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
-                            WindowStyle="None" ResizeMode="NoResize" TitleBarHeight="30" IsResizable="False"
+   WindowStyle="None" ResizeMode="NoResize" TitleBarHeight="30" IsResizable="False"
-                            IsMinimizable="False" WindowStartupLocation="CenterOwner" ShowInTaskbar="False"
+   IsMinimizable="False" WindowStartupLocation="CenterOwner" ShowInTaskbar="False"
-                            CloseCommand="{Binding CloseToolsDbCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}"
+   CloseCommand="{Binding CloseToolsDbCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}"
-                            CloseCommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
+   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>
 
    <EgtWPFLib5:EgtCustomWindow.Resources>
-      <!--<EgtWPFLib5:ToolParamVisibilityConverter x:Key="ToolParamVisibilityConverter"/>-->
+      <EgtWPFLib5:ToolParamVisibilityConverter x:Key="ToolParamVisibilityConverter"/>
       <EgtWPFLib5:ToolDrawUUIDConverter x:Key="ToolDrawUUIDConverter"/>
       <EgtWPFLib5:ErrorVisibilityConverter x:Key="ErrorVisibilityConverter"/>
       <sys:Int32 x:Key="Corr">0</sys:Int32>
@@ -47,115 +46,872 @@
       <sys:Int32 x:Key="TcPos">25</sys:Int32>
    </EgtWPFLib5:EgtCustomWindow.Resources>
 
-   <Grid Background="Transparent">
+   <Grid>
       <Grid.ColumnDefinitions>
-         <ColumnDefinition Width="0.95*"/>
+         <ColumnDefinition Width="0.75*"/>
          <ColumnDefinition Width="2*"/>
          <ColumnDefinition Width="1*"/>
       </Grid.ColumnDefinitions>
 
-      <Grid Background="Transparent">
+      <Grid>
          <Grid.RowDefinitions>
-            <RowDefinition Height="0.75*"/>
+            <RowDefinition Height="1*"/>
-            <RowDefinition Height="12*"/>
+            <RowDefinition Height="11*"/>
          </Grid.RowDefinitions>
 
-         <UniformGrid Grid.Row="0" Columns="8">
+         <UniformGrid Grid.Row="0" Columns="3">
-            <Button ToolTip="New" Command="{Binding NewCommand}"
+            <Button Content="New" Command="{Binding NewCommand}"
-                    CommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
+               CommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
-                    IsEnabled="{Binding IsEnabledNewBtn, Mode=OneWay}"
+               IsEnabled="{Binding IsEnabledNewBtn, Mode=OneWay}"/>
-                    Style = "{DynamicResource MachiningDB_Button}">
+            <Button Content="Save" Command="{Binding SaveCommand}"
-               <Image Source="/Resources/TopCommandBar/New.png" Stretch="Uniform"/>
+               CommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
-            </Button>
+               IsEnabled="{Binding IsEnabledSaveBtn, Mode=OneWay}"/>
-            <Button ToolTip="Save" Command="{Binding SaveCommand}"
+            <Button Content="Remove" Command="{Binding RemoveCommand}"
-                    CommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
+               CommandParameter="{Binding Path=SelectedItem, ElementName=ToolsTreeView}"
-                    IsEnabled="{Binding IsEnabledSaveBtn, Mode=OneWay}"
+               IsEnabled="{Binding IsEnabledRemoveBtn, 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=ToolsTreeView}"
-                    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 ReloadToolCommand}"
-                    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>
 
-         <!--Elenco degli utensili-->
+          <!--Elenco degli utensili-->
          <TreeView Name="ToolsTreeView" Grid.Row="1"
-                   Background="Transparent" BorderThickness="0"
                    ItemsSource="{Binding ToolsList}">
-            <TreeView.ItemContainerStyle>
-               <Style TargetType="{x:Type TreeViewItem}" BasedOn="{StaticResource Db_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}" />
-               </Style>
-            </TreeView.ItemContainerStyle>
 
-            <TreeView.Resources>
+         <TreeView.ItemContainerStyle>
-               <HierarchicalDataTemplate DataType="{x:Type EgtWPFLib5:FamilyToolTreeViewItem}" ItemsSource="{Binding Items}">
+            <Style TargetType="{x:Type TreeViewItem}">
+               <Setter Property="IsSelected" Value="{Binding IsSelected, Mode=TwoWay}" />
+               <Setter Property="IsExpanded" Value="{Binding IsExpanded, Mode=TwoWay}" />
+               <Setter Property="IsEnabled" Value="{Binding IsEnabled, Mode=TwoWay}" />
+            </Style>
+         </TreeView.ItemContainerStyle>
 
-                  <Grid  Background="Transparent">
+         <TreeView.Resources>
-                     <Grid.ColumnDefinitions>
+            <HierarchicalDataTemplate DataType="{x:Type EgtWPFLib5:FamilyToolTreeViewItem}" ItemsSource="{Binding Items}">
-                        <ColumnDefinition Width="Auto"/>
-                        <ColumnDefinition Width="1*"/>
-                        <ColumnDefinition Width="Auto"/>
-                     </Grid.ColumnDefinitions>
 
-                     <Image Grid.Column="0" Source="{Binding PictureString}" Height="32" Width="32" Margin="0" />
+               <Grid >
-                     <TextBlock Grid.Column="1" Text="{Binding Name}" FontSize="15" Margin="5,0,10,0" VerticalAlignment="Center" HorizontalAlignment="left" />
+                  <Grid.ColumnDefinitions>
-                     <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding FamilyColor}" />
+                     <ColumnDefinition Width="Auto"/>
+                     <ColumnDefinition Width="1*"/>
+                  </Grid.ColumnDefinitions>
 
-                  </Grid>
+                  <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" />
 
-               </HierarchicalDataTemplate>
+               </Grid>
 
-               <DataTemplate DataType="{x:Type EgtWPFLib5:ToolTreeViewItem}">
+            </HierarchicalDataTemplate>
-                  <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" />-->
+            <DataTemplate DataType="{x:Type EgtWPFLib5:ToolTreeViewItem}">
-                     <TextBlock Grid.Column="1" Text="{Binding NamePar}" Height="21" FontSize="13"  Margin="30,0,10,0"
+               <Grid >
-                                VerticalAlignment="Center" HorizontalAlignment="left"/>
+                  <Grid.ColumnDefinitions>
-                     <Ellipse Grid.Column="2" Height="10" Width="10" Fill="{Binding ToolColor}" />
+                     <ColumnDefinition Width="Auto"/>
+                     <ColumnDefinition Width="1*"/>
+                  </Grid.ColumnDefinitions>
 
-                  </Grid>
+                  <!--<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"/>
 
-               </DataTemplate>
+               </Grid>
+            </DataTemplate>
 
-            </TreeView.Resources>
+         </TreeView.Resources>
 
-         </TreeView>
+      </TreeView>
 
       </Grid>
 
-      <ContentControl Content="{Binding Path=ParamPageV}" Grid.Column="1"/>
+   <Grid Grid.Column="1" Grid.RowSpan="2" Margin="0,2,0,0">
+      <Grid.ColumnDefinitions>
+         <ColumnDefinition Width="1*"/>
+         <ColumnDefinition Width="1*"/>
+      </Grid.ColumnDefinitions>
+      <Grid.RowDefinitions>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+         <RowDefinition Height="1*"/>
+      </Grid.RowDefinitions>
+
+         <Grid Grid.Column="0" Grid.Row="0">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding NameParTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource NamePar}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="NameParTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.NamePar,
+                                         ElementName=ToolsTreeView, Mode=TwoWay,
+                                         UpdateSourceTrigger=PropertyChanged,
+                                         ValidatesOnDataErrors=True}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource NamePar}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.NameErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.NameErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}"/>
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="1">
+         <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
+         </Grid.ColumnDefinitions>
+         <Grid.RowDefinitions>
+            <RowDefinition Height="1*"/>
+            <RowDefinition Height="1*"/>
+         </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding MaxSpeedTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource MaxSpeed}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="MaxSpeedTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.MaxSpeed,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource MaxSpeed}}"/>
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="2">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding FeedTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Feed}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="FeedTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.Feed,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource Feed}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=FeedTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="3">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding StartFeedTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource StartFeed}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="StartFeedTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.StartFeed,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource StartFeed}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=StartFeedTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="4">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding TotLenTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource TotLen}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="TotLenTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.TotLen,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                                         ValidatesOnDataErrors=True}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource TotLen}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.TotLenErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.TotLenErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="5">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding TotDiamTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource TotDiam}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="TotDiamTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.TotDiam,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource TotDiam}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.TotDiamErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.TotDiamErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="6">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding ThickTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Thick}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="ThickTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.Thick,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                                         ValidatesOnDataErrors=True}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource Thick}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.ThickErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.ThickErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="7">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding MaxMatTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource MaxMat}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="MaxMatTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.MaxMat,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                                         ValidatesOnDataErrors=True}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource MaxMat}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.MaxMatErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.MaxMatErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="8">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding LonOffsetTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource LonOffset}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="LonOffsetTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.LonOffset,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource LonOffset}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=LonOffsetTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="9">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding HeadTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Head}}"/>
+            <ComboBox Name="HeadTxBx" Grid.Column="1"  Style="{DynamicResource ToolsComboBox}"
+               ItemsSource="{Binding Path=SelectedItem.HeadList, ElementName=ToolsTreeView,
+                                     UpdateSourceTrigger=PropertyChanged}"
+               SelectedItem="{Binding Path=SelectedItem.SelectedHead, ElementName=ToolsTreeView,
+                                      UpdateSourceTrigger=PropertyChanged}"
+               DisplayMemberPath="HText"
+               Visibility="{Binding Path=SelectedItem.Type,
+                                    ElementName=ToolsTreeView,
+                                    Converter={StaticResource ToolParamVisibilityConverter},
+                                    ConverterParameter={StaticResource Head}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.SelectedHeadErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.SelectedHeadErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="10">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding CorrTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Corr}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="CorrTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.Corr,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource Corr}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=CorrTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="0" Grid.Row="11">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding UserNotesTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource UserNotes}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="UserNotesTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.UserNotes,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource UserNotes}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=UserNotesTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="0">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding DrawTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Draw}}"/>
+            <Grid Grid.Column="1">
+               <Grid.ColumnDefinitions>
+                  <ColumnDefinition Width="1*"/>
+                  <ColumnDefinition Width="Auto"/>
+                  <ColumnDefinition Width="Auto"/>
+               </Grid.ColumnDefinitions>
+               <Border BorderThickness="0.5,1,0.5,0.5" BorderBrush="{DynamicResource TextBox.Static.Border}"
+                  Visibility="{Binding Path=SelectedItem.Type,
+                                       ElementName=ToolsTreeView,
+                                       Converter={StaticResource ToolParamVisibilityConverter},
+                                       ConverterParameter={StaticResource Draw}}">
+                  <TextBlock Name="DrawTxBx" Grid.Column="0" Margin="3,0,0,0"
+                             VerticalAlignment="Center" Foreground="Gray"
+                     ToolTip="{Binding Path=SelectedItem.Draw,
+                           ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                           Converter={StaticResource ToolDrawUUIDConverter}}"
+                     Text="{Binding Path=SelectedItem.Draw,
+                           ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                           ValidatesOnDataErrors=True,
+                           Converter={StaticResource ToolDrawUUIDConverter}}"/>
+               </Border>
+               <Button Grid.Column="1" Margin="5,0,0,0" Content="A"
+                  Command="{Binding Path=SelectedItem.AutoDrawCommand,ElementName=ToolsTreeView}"
+                  Width="{Binding ActualHeight, RelativeSource={RelativeSource Self}}"
+                  Visibility="{Binding Path=SelectedItem.Type,
+                                       ElementName=ToolsTreeView,
+                                       Converter={StaticResource ToolParamVisibilityConverter},
+                                       ConverterParameter={StaticResource Draw}}"/>
+               <Button Grid.Column="2" Margin="5,0,5,0" Content=". . ."
+                  Command="{Binding Path=SelectedItem.OpenDrawFileCommand,ElementName=ToolsTreeView}"
+                  Width="{Binding ActualHeight, RelativeSource={RelativeSource Self}}"
+                  Visibility="{Binding Path=SelectedItem.Type,
+                                       ElementName=ToolsTreeView,
+                                       Converter={StaticResource ToolParamVisibilityConverter},
+                                       ConverterParameter={StaticResource Draw}}"/>
+            </Grid>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.DrawErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.DrawErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="1">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding SpeedTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Speed}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="SpeedTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.Speed,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource Speed}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.SpeedErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.SpeedErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="2">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding TipFeedTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource TipFeed}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="TipFeedTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.TipFeed,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource TipFeed}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=TipFeedTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="3">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding EndFeedTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource EndFeed}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="EndFeedTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.EndFeed,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource EndFeed}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=EndFeedTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="4">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding LenTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Len}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="LenTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.Len,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                                         ValidatesOnDataErrors=True}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource Len}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.LenErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.LenErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="5">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding DiamTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Diam}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="DiamTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.Diam,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged,
+                                         ValidatesOnDataErrors=True}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource Diam}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.DiamErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.DiamErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="6">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding CornRadTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource CornRad}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="CornRadTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.CornRad,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource CornRad}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=CornRadTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="7">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding SideAngTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource SideAng}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="SideAngTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.SideAng,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource SideAng}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=SideAngTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="8">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding RadOffsetTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource RadOffset}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="RadOffsetTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.RadOffset,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource RadOffset}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=RadOffsetTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="9">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding ExitParTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource ExitPar}}"/>
+            <ComboBox Name="ExitParTxBx" Grid.Column="1" Style="{DynamicResource ToolsComboBox}"
+               ItemsSource="{Binding Path=SelectedItem.ExitList,
+                                     ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+               SelectedItem="{Binding Path=SelectedItem.SelectedExit, ElementName=ToolsTreeView,
+                                      UpdateSourceTrigger=PropertyChanged}"
+               Visibility="{Binding Path=SelectedItem.Type,
+                                    ElementName=ToolsTreeView,
+                                    Converter={StaticResource ToolParamVisibilityConverter},
+                                    ConverterParameter={StaticResource ExitPar}}"/>
+            <TextBlock Grid.Row="1" Grid.ColumnSpan="2" Style="{DynamicResource ValidationErrorTextBlock}"
+                  Text="{Binding Path=SelectedItem.SelectedExitErrorMsg, ElementName=ToolsTreeView}"
+                  Visibility="{Binding Path=SelectedItem.SelectedExitErrorMsg, ElementName=ToolsTreeView,
+                  Converter={StaticResource ErrorVisibilityConverter}}" Margin="0,0,5,0"/>
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="10">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding TcPosTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource TcPos}}"/>
+            <ComboBox Name="TcPosTxBx" Grid.Column="1" Style="{DynamicResource ToolsComboBox}"
+               ItemsSource="{Binding Path=SelectedItem.TcPosList, ElementName=ToolsTreeView,
+                                     UpdateSourceTrigger=PropertyChanged}"
+               SelectedItem="{Binding Path=SelectedItem.SelectedTcPos, ElementName=ToolsTreeView,
+                                     UpdateSourceTrigger=PropertyChanged}"
+               Visibility="{Binding Path=SelectedItem.Type,
+                                    ElementName=ToolsTreeView,
+                                    Converter={StaticResource ToolParamVisibilityConverter},
+                                    ConverterParameter={StaticResource TcPos}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=TcPosTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+         <Grid Grid.Column="1" Grid.Row="12">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding MaxAbsorptionTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource MaxAbsorption}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="MaxAbsorptionTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.MaxAbsorption,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource MaxAbsorption}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=MaxAbsorptionTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+         
+         <Grid Grid.Column="0" Grid.Row="12">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding MinFeedTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource MinFeed}}"/>
+            <EgtWPFLib5:EgtTextBox x:Name="MinFeedTxBx" Grid.Column="1" Style="{DynamicResource ToolsTextBox}"
+                                   Text="{Binding Path=SelectedItem.MinFeed,
+                                         ElementName=ToolsTreeView, UpdateSourceTrigger=PropertyChanged}"
+                                   Visibility="{Binding Path=SelectedItem.Type,
+                                               ElementName=ToolsTreeView,
+                                               Converter={StaticResource ToolParamVisibilityConverter},
+                                               ConverterParameter={StaticResource MinFeed}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=MinFeedTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+         <Grid Grid.Column="0" Grid.Row="13">
+            <Grid.ColumnDefinitions>
+               <ColumnDefinition Width="1*"/>
+               <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+               <RowDefinition Height="1*"/>
+               <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+
+            <TextBlock Text="{Binding CoolantTxBl}" Style="{DynamicResource ToolsTextBlock}"
+                       Visibility="{Binding Path=SelectedItem.Type, ElementName=ToolsTreeView,
+                                   Converter={StaticResource ToolParamVisibilityConverter},
+                                   ConverterParameter={StaticResource Coolant}}"/>
+            <ComboBox Name="CoolantTxBx" Grid.Column="1" Style="{DynamicResource ToolsComboBox}"
+                      ItemsSource="{Binding Path=SelectedItem.CoolantList, ElementName=ToolsTreeView,
+                                     UpdateSourceTrigger=PropertyChanged}"
+                      SelectedIndex="{Binding Path=SelectedItem.SelCoolant, ElementName=ToolsTreeView,
+                                     UpdateSourceTrigger=PropertyChanged}"
+                      IsSynchronizedWithCurrentItem="True"
+                      Visibility="{Binding Path=SelectedItem.Type,
+                                    ElementName=ToolsTreeView,
+                                    Converter={StaticResource ToolParamVisibilityConverter},
+                                    ConverterParameter={StaticResource Coolant}}"/>
+            <!--<ContentPresenter Grid.Row="1" Grid.ColumnSpan="2"
+               Content="{Binding ElementName=CoolantTxBx,
+                        Path=(Validation.Errors).CurrentItem,
+                        UpdateSourceTrigger=PropertyChanged}"/>-->
+
+         </Grid>
+
+      </Grid>
 
       <!--ContentControl che ospita la scena restituita sotto forma di WindowsFormsHost-->
       <ContentControl Content="{Binding ToolSceneHost}" Grid.Column="2"/>

MyToolDbWindow/MyToolDbWindowV.xaml.vb

@@ -1,32 +1,3 @@
-Imports EgtUILib
+Public Class MyToolDbWindowV
-
-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

@@ -1,294 +0,0 @@
-<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>
-               <!--Flux-->
-               <DataGridTextColumn Binding="{Binding Flux}"
-                            Width="*">
-                  <DataGridTextColumn.HeaderTemplate>
-                     <DataTemplate>
-                        <TextBlock Text="{Binding DataContext.Flux_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

@@ -1,20 +0,0 @@
-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,21 +12,6 @@
     <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>
@@ -124,26 +109,20 @@
   <PropertyGroup>
     <ApplicationIcon>Resources\OmagOFFICE.ico</ApplicationIcon>
   </PropertyGroup>
-  <PropertyGroup>
-    <ApplicationManifest>My Project\app.manifest</ApplicationManifest>
-  </PropertyGroup>
   <ItemGroup>
-    <Reference Include="DotNetZip">
-      <HintPath>..\..\EgtProg\OmagOFFICE\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>
     </Reference>
-    <Reference Include="EgtUILib, Version=2.7.5.2, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="EgtUILib">
-      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\EgtProg\DllD32\EgtUILib.dll</HintPath>
-      <HintPath>..\..\EgtProg\OmagOFFICE\EgtUILib.dll</HintPath>
     </Reference>
-    <Reference Include="EgtWPFLib5, Version=2.7.4.1, Culture=neutral, processorArchitecture=MSIL">
+    <Reference Include="EgtWPFLib5">
-      <SpecificVersion>False</SpecificVersion>
+      <HintPath>..\..\EgtProg\DllD32\EgtWPFLib5.dll</HintPath>
-      <HintPath>..\..\EgtProg\OmagOFFICE\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>
@@ -234,15 +213,8 @@
     <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>
@@ -258,17 +230,15 @@
     </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">
+    <Compile Include="OptionPanel\MachiningTab\FinalMoveRawModeV.xaml.vb">
-      <DependentUpon>MyWaterjetDbWindowV.xaml</DependentUpon>
+      <DependentUpon>FinalMoveRawModeV.xaml</DependentUpon>
     </Compile>
+    <Compile Include="OptionPanel\MachiningTab\FinalMoveRawModeVM.vb" />
     <Compile Include="OptionPanel\MachiningTab\MachiningTabV.xaml.vb">
       <DependentUpon>MachiningTabV.xaml</DependentUpon>
     </Compile>
@@ -281,10 +251,6 @@
     </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>
@@ -293,10 +259,6 @@
       <DependentUpon>SplitModeV.xaml</DependentUpon>
     </Compile>
     <Compile Include="OptionPanel\MachiningTab\SplitModeVM.vb" />
-    <Compile Include="OptionPanel\NestingTab\ChangeTableV.xaml.vb">
-      <DependentUpon>ChangeTableV.xaml</DependentUpon>
-    </Compile>
-    <Compile Include="OptionPanel\NestingTab\ChangeTableVM.vb" />
     <Compile Include="OptionPanel\NestingTab\MultiSelectionV.xaml.vb">
       <DependentUpon>MultiSelectionV.xaml</DependentUpon>
     </Compile>
@@ -431,10 +393,6 @@
       <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>
@@ -443,10 +401,6 @@
       <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>
@@ -467,15 +421,11 @@
       <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">
+    <Page Include="OptionPanel\MachiningTab\FinalMoveRawModeV.xaml">
       <SubType>Designer</SubType>
       <Generator>MSBuild:Compile</Generator>
     </Page>
@@ -491,10 +441,6 @@
       <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>
@@ -503,10 +449,6 @@
       <SubType>Designer</SubType>
       <Generator>MSBuild:Compile</Generator>
     </Page>
-    <Page Include="OptionPanel\NestingTab\ChangeTableV.xaml">
-      <SubType>Designer</SubType>
-      <Generator>MSBuild:Compile</Generator>
-    </Page>
     <Page Include="OptionPanel\NestingTab\MultiSelectionV.xaml">
       <SubType>Designer</SubType>
       <Generator>MSBuild:Compile</Generator>
@@ -632,13 +574,11 @@
       <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" />
@@ -760,241 +700,16 @@
     <Resource Include="Resources\TopCommandBar\DxfOut.png" />
   </ItemGroup>
   <ItemGroup>
-    <Resource Include="Resources\InstrumentPanel\Print.png" />
+    <Resource Include="Resources\NestingTab\BottomLeft.png" />
   </ItemGroup>
   <ItemGroup>
-    <Resource Include="Resources\NewIcons\1-BottomLeft.png" />
+    <Resource Include="Resources\NestingTab\BottomRight.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" />
+    <Resource Include="Resources\NestingTab\TopLeft.png" />
   </ItemGroup>
   <ItemGroup>
-    <BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
+    <Resource Include="Resources\NestingTab\TopRight.png" />
-      <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>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Crea-taglio.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Attrezzaggio.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Rimuovi-taglio.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Modifica-taglio.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Crea-taglio-parallelo.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\CsvWindow\CsvMinus - Color.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\CsvWindow\CsvPlus - Color.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\CsvWindow\Inserisci-pezzo CSV.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\CsvWindow\Parcheggia-pezzo CSV.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Linea-Elimina.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Linea-Muovi.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\Linea-Copia.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\DB-WJ.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DetailPage\Cancel.png" />
-    <Resource Include="Resources\DetailPage\Confirm.png" />
-    <Resource Include="Resources\DetailPage\Elimina.png" />
-    <Resource Include="Resources\DetailPage\Pencil.png" />
-    <Resource Include="Resources\DetailPage\Photo.png" />
-    <Resource Include="Resources\DetailPage\Polygon.png" />
-    <Resource Include="Resources\DetailPage\Print.png" />
-    <Resource Include="Resources\DetailPage\Reset.png" />
-    <Resource Include="Resources\DetailPage\Rubber.png" />
-    <Resource Include="Resources\DetailPage\Save.png" />
-    <Resource Include="Resources\DetailPage\ZoomAll.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\LightArrowOff.png" />
-    <Resource Include="Resources\NewIcons\LightArrowOn.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\table.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\NewIcons\tableS.png" />
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
   <PropertyGroup>

OptionPanel/MachiningTab/FinalMoveRawModeV.xaml

@@ -0,0 +1,72 @@
+<UserControl x:Class="FinalMoveRawModeV"
+             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">
+
+    <StackPanel IsEnabled="{Binding SplitModeIsEnabled}">
+        <Grid>
+            
+            <Grid.ColumnDefinitions>
+                <ColumnDefinition Width="1*"/>
+                <ColumnDefinition Width="1*"/>
+                <ColumnDefinition Width="1*"/>
+            </Grid.ColumnDefinitions>
+            <Grid.RowDefinitions>
+                <RowDefinition Height="1*"/>
+                <RowDefinition Height="1*"/>
+                <RowDefinition Height="1*"/>
+            </Grid.RowDefinitions>
+        
+            <Button Name="TopLBtn" Grid.Column="0" Grid.Row="0"
+                    Style="{StaticResource OptionPanel_NestingButton}"
+                    Command="{Binding TopLeftCommand}">
+                <Image Source="/Resources/NestingTab/TopLeft.png" Stretch="Uniform"/>
+            </Button>
+            
+            <Button Name="TopRBtn" Grid.Column="2" Grid.Row="0"
+                    Style="{StaticResource OptionPanel_NestingButton}"
+                    Command="{Binding TopRightCommand}">
+                <Image Source="/Resources/NestingTab/TopRight.png" Stretch="Uniform"/>
+            </Button>
+            
+            <Button Name="ResetBtn" Grid.Column="1" Grid.Row="1"
+                    Content="Reset"
+                    Style="{StaticResource OptionPanel_NestingButton}"
+                    Command="{Binding ResetCommand}">
+            </Button>
+            
+            <Button Name="BottomLBtn" Grid.Column="0" Grid.Row="2"
+                    Style="{StaticResource OptionPanel_NestingButton}"
+                    Command="{Binding BottomLeftCommand}">
+                <Image Source="/Resources/NestingTab/BottomLeft.png" Stretch="Uniform"/>
+            </Button>
+        
+            <Button Name="BottomRBtn" Grid.Column="2" Grid.Row="2"
+                    Style="{StaticResource OptionPanel_NestingButton}"
+                    Command="{Binding BottomRightCommand}">
+                <Image Source="/Resources/NestingTab/BottomRight.png" Stretch="Uniform"/>
+            </Button>
+        
+        </Grid>
+
+        <Border Margin="0,0,0,5" Style="{StaticResource Border}">
+
+            <StackPanel>
+
+                <UniformGrid Columns="3" Margin="0,0,0,5">
+
+                    <Button Visibility="Hidden"
+                           Margin="0,0,2.5,0" Padding="0"/>
+                    <Button Content="{Binding PauseMsg}"
+                           Style="{StaticResource OptionPanel_TextWrapButton}"
+                           Command="{Binding PauseCommand}"
+                           IsEnabled="{Binding PauseBtnIsEnable}"
+                           Margin="2.5,2.5,2.5,0"/>
+                    <Button Visibility="Hidden"
+                           Margin="2.5,0,0,0"/>
+
+                </UniformGrid>
+            </StackPanel>
+        </Border>
+    </StackPanel>
+</UserControl>

OptionPanel/MachiningTab/FinalMoveRawModeV.xaml.vb

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

OptionPanel/MachiningTab/FinalMoveRawModeVM.vb

@@ -0,0 +1,186 @@
+Imports EgtUILib
+Imports EgtWPFLib5
+Public Class FinalMoveRawModeVM
+
+#Region "FIELDS and PROPERTIES"
+
+   Public ReadOnly Property PauseMsg As String
+      Get
+         Return "Pause"
+      End Get
+   End Property
+
+   Private m_PauseBtnIsEnable As Boolean = True
+   Public Property PauseBtnIsEnable As Boolean
+      Get
+         Return m_PauseBtnIsEnable
+      End Get
+      Set(value As Boolean)
+         m_PauseBtnIsEnable = value
+      End Set
+   End Property
+
+#End Region    ' FIELDS and PROPERTIES
+
+#Region "CONSTRUCTOR"
+
+   Private m_nAuxTabId As Integer = GDB_ID.NULL
+   Public ReadOnly Property nAuxTabId As Integer
+      Get
+         Return m_nAuxTabId
+      End Get
+   End Property
+   Sub New()
+      ' Creo riferimento a questa classe in OmagOFFICEMap
+      OmagOFFICEMap.SetRefFinalMoveRawModeVM(Me)
+   End Sub
+
+#End Region    ' CONSTRUCTOR
+
+#Region "METHODS"
+   ' inizializzo i dati della tavola ausiliaria all'interno della fase corrente
+   Public Function SetAuxTabInCurrDisposition() As Boolean
+      Dim bOk As Boolean = False
+      ' OmagOFFICEMap.refMoveRawModeVM.InitMoveRaw()
+      m_nAuxTabId = EgtGetTableId(AUX_TAB)
+      ' Visualizzo tavolo ausiliario
+      Dim bOldEnMod As Boolean = EgtGetEnableModified()
+      If bOldEnMod Then EgtDisableModified()
+      EgtSetStatus(m_nAuxTabId, GDB_ST.ON_)
+      If bOldEnMod Then EgtEnableModified()
+      ' Area tavolo ausiliario
+      Dim b3AuxTab As New BBox3d
+      EgtGetBBoxGlob(EgtGetFirstNameInGroup(m_nAuxTabId, "A1"), GDB_BB.STANDARD, b3AuxTab)
+      ' Area tavolo principale
+      Dim b3Tab As New BBox3d
+      EgtGetTableArea(1, b3Tab)
+      ' Imposto offset su tavolo principale per includere anche il secondario
+      Dim dOffsXP As Double = Math.Max(b3AuxTab.Max().x - b3Tab.Max().x, 0)
+      Dim dOffsYP As Double = Math.Max(b3AuxTab.Max().y - b3Tab.Max().y, 0)
+      Dim dOffsXM As Double = Math.Max(b3Tab.Min().x - b3AuxTab.Min().x, 0)
+      Dim dOffsYM As Double = Math.Max(b3Tab.Min().y - b3AuxTab.Min().y, 0)
+      bOk = EgtSetTableAreaOffset(dOffsXP, dOffsYP, dOffsXM, dOffsYM)
+      EgtZoom(ZM.ALL)
+      Return bOk
+   End Function
+
+#End Region    ' METHODS
+
+   ' Definizione comandi
+   Private m_cmdTopLeft As ICommand
+   Private m_cmdTopRight As ICommand
+   Private m_cmdBottomLeft As ICommand
+   Private m_cmdBottomRight As ICommand
+   Private m_cmdReset As ICommand
+   Private m_cmdPause As ICommand
+
+   Public Function Init() As Boolean
+      Return SetAuxTabInCurrDisposition()
+   End Function
+
+#Region "TopLeft"
+
+   Public ReadOnly Property TopLeftCommand As ICommand
+      Get
+         If m_cmdTopLeft Is Nothing Then
+            m_cmdTopLeft = New Command(AddressOf TopLeft)
+         End If
+         Return m_cmdTopLeft
+      End Get
+   End Property
+
+   Public Sub TopLeft(ByVal param As Object)
+      OmagOFFICEMap.refMoveRawModeVM.MoveOnRef("REF4", MCH_CR.TL)
+   End Sub
+
+#End Region ' TopLeft
+
+#Region "TopRight"
+
+   Public ReadOnly Property TopRightCommand As ICommand
+      Get
+         If m_cmdTopRight Is Nothing Then
+            m_cmdTopRight = New Command(AddressOf TopRight)
+         End If
+         Return m_cmdTopRight
+      End Get
+   End Property
+
+   Public Sub TopRight(ByVal param As Object)
+      OmagOFFICEMap.refMoveRawModeVM.MoveOnRef("REF3", MCH_CR.TR)
+      '' salvo il file per verifica che siano stati salvati i dati di movimentazione del pezzo
+      'EgtSaveFile("c:\EgtData\OmagOFFICE\Temp\FINALRAWMOVE_02.nge", NGE.TEXT)
+   End Sub
+
+#End Region ' TopRight
+
+#Region "BottomLeft"
+
+   Public ReadOnly Property BottomLeftCommand As ICommand
+      Get
+         If m_cmdBottomLeft Is Nothing Then
+            m_cmdBottomLeft = New Command(AddressOf BottomLeft)
+         End If
+         Return m_cmdBottomLeft
+      End Get
+   End Property
+
+   Public Sub BottomLeft(ByVal param As Object)
+      OmagOFFICEMap.refMoveRawModeVM.MoveOnRef("REF1", MCH_CR.BL)
+   End Sub
+
+#End Region ' Bottomleft
+
+#Region "BottomRight"
+
+   Public ReadOnly Property BottomRightCommand As ICommand
+      Get
+         If m_cmdBottomRight Is Nothing Then
+            m_cmdBottomRight = New Command(AddressOf BottomRight)
+         End If
+         Return m_cmdBottomRight
+      End Get
+   End Property
+
+   Public Sub BottomRight(ByVal param As Object)
+      OmagOFFICEMap.refMoveRawModeVM.MoveOnRef("REF2", MCH_CR.BR)
+   End Sub
+
+#End Region ' BottomRight
+
+#Region "Reset"
+
+   Public ReadOnly Property ResetCommand As ICommand
+      Get
+         If m_cmdReset Is Nothing Then
+            m_cmdReset = New Command(AddressOf Reset)
+         End If
+         Return m_cmdReset
+      End Get
+   End Property
+
+   Public Sub Reset(ByVal param As Object)
+      OmagOFFICEMap.refMoveRawModeVM.ResetFinaleMove()
+   End Sub
+
+#End Region ' Reset
+
+#Region "Pause"
+
+   Public ReadOnly Property PauseCommand As ICommand
+      Get
+         If m_cmdPause Is Nothing Then
+            m_cmdPause = New Command(AddressOf Pause)
+         End If
+         Return m_cmdPause
+      End Get
+   End Property
+
+   Public Sub Pause(ByVal param As Object)
+      ' inserire il libreria questa nuova funzionalità per l'inserimento di una nuova fase
+      OmagOFFICEMap.refMoveRawModeVM.InsertPause()
+   End Sub
+
+#End Region    ' Pause
+
+End Class

OptionPanel/MachiningTab/MachiningTabV.xaml

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

OptionPanel/MachiningTab/MachiningTabVM.vb

@@ -6,6 +6,50 @@ Public Class MachiningTabVM
 
 #Region "FIELDS & PROPERTIES"
 
+   ' Fase corrente
+   Private m_nCurrPhase As Integer = 0
+   Public Property nCurrPhase As Integer
+      Get
+         Return m_nCurrPhase
+      End Get
+      Set(value As Integer)
+         m_nCurrPhase = value
+      End Set
+   End Property
+
+   ' Disposizione corrente
+   Private m_nCurrDisposition As Integer = GDB_ID.NULL
+   Public Property nCurrDisposition As Integer
+      Get
+         Return m_nCurrDisposition
+      End Get
+      Set(value As Integer)
+         m_nCurrDisposition = value
+      End Set
+   End Property
+
+   ' Premuto Prev
+   Private m_bPrev As Boolean = False
+   Public Property bPrev As Boolean
+      Get
+         Return m_bPrev
+      End Get
+      Set(value As Boolean)
+         m_bPrev = value
+      End Set
+   End Property
+
+   ' Pemuto Next
+   Private m_bToNext As Boolean = False
+   Public Property bToNext As Boolean
+      Get
+         Return m_bToNext
+      End Get
+      Set(value As Boolean)
+         m_bToNext = value
+      End Set
+   End Property
+
    Enum MachiningModeOpt As Integer
       SPLIT
       MOVERAWPART
@@ -30,6 +74,13 @@ Public Class MachiningTabVM
       End Get
    End Property
 
+   Private m_bEnableOnAuxTab As Boolean = False
+   Public ReadOnly Property bEnableOnAuxTab As Boolean
+      Get
+         Return m_bEnableOnAuxTab
+      End Get
+   End Property
+
    ' Flag di sola visualizzazione/modifica
    Private m_bIsShow As Boolean = False
    Public Property IsShow As Boolean
@@ -43,12 +94,23 @@ Public Class MachiningTabVM
 
    Private m_SplitModeV As SplitModeV
    Private m_MoveRawModeV As MoveRawModeV
+   Private m_FinalMoveRawModeV As FinalMoveRawModeV
+
    Public ReadOnly Property MachiningModeControl As ContentControl
       Get
+         '' nascondo eventuale tavola di scarico
+         'EgtDisableModified()
+         'EgtSetStatus(OmagOFFICEMap.refFinalMoveRawModeVM.nAuxTabId, GDB_ST.OFF)
+         'EgtEnableModified()
+
          If m_MachiningMode = MachiningModeOpt.SPLIT Then
             Return m_SplitModeV
          Else
-            Return m_MoveRawModeV
+            If OmagOFFICEMap.refSplitModeVM.bOnAuxTab Then
+               Return m_FinalMoveRawModeV
+            Else
+               Return m_MoveRawModeV
+            End If
          End If
       End Get
    End Property
@@ -97,7 +159,7 @@ Public Class MachiningTabVM
       End Set
    End Property
 
-   Private m_AutoVisibility As Visibility
+   Private m_AutoVisibility As Visibility = Visibility.Visible
    Public Property AutoVisibility As Visibility
       Get
          Return m_AutoVisibility
@@ -143,6 +205,9 @@ Public Class MachiningTabVM
       ' Creo pagina per modo MoveRaw
       m_MoveRawModeV = New MoveRawModeV
       m_MoveRawModeV.DataContext = New MoveRawModeVM
+      ' Creo la pagina per il modo FinalMoveRaw
+      m_FinalMoveRawModeV = New FinalMoveRawModeV
+      m_FinalMoveRawModeV.DataContext = New FinalMoveRawModeVM
    End Sub
 
 #End Region    ' CONSTRUCTOR
@@ -165,6 +230,10 @@ Public Class MachiningTabVM
          ' Lama troppo grande per utilizzo ventosa
          OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(MSG_SPLITPAGEUC + 11), MSG_TYPE.WARNING)
       End If
+      ' Verifico se abilitato spostamento finale pezzi e se macchina lo consente
+      m_bEnableOnAuxTab = Not m_bByHand AndAlso
+                          OmagOFFICEMap.refMainWindowVM.MainWindowM.GetKeyOption(KEY_OPT.MOVE_PARTS) AndAlso
+                          EgtGetTableId(AUX_TAB) <> GDB_ID.NULL
       ' Carico eventuale manipolatore pezzi
       EgtDisableModified()
       LoadVacuumCups()
@@ -173,7 +242,7 @@ Public Class MachiningTabVM
       If EstCalc.GetOrderMachiningFlag() Then
          ' Imposto flag di visualizzazione
          m_bIsShow = True
-      ' altrimenti riparto da capo
+         ' altrimenti riparto da capo
       Else
          ' Cancello tutto
          EraseMachinings(GDB_ID.NULL)
@@ -182,6 +251,9 @@ Public Class MachiningTabVM
          ' Imposto flag di modifica
          m_bIsShow = False
       End If
+      ' imposto la prima disposizione
+      EgtSetCurrPhase(1)
+      nCurrPhase = 1
       ' Inizializzo pagina Split
       OmagOFFICEMap.refSplitModeVM.InitSplitRaw()
       ' Aggiorno possibilità di uscire
@@ -189,7 +261,37 @@ Public Class MachiningTabVM
       Return True
    End Function
 
+   ' verifica se la disposizione indicata è uno scarico sulla tavola ausiliaria
+   Public Function IsDispUnloadOnAuxTab(nCurrDispId As Integer) As Integer
+      ' verifico se la fase precedente è uno scarico su tavola ausiliaria
+      Dim bVal As Integer = 0
+      EgtGetInfo(nCurrDispId, "Pat", bVal)
+      Return bVal
+   End Function
+
+   ' recupero la prima disposizione disponibile tra l'elenco delle operazioni presenti
+   Public Function GetNextDisposition(nCurrDisposId As Integer) As Integer
+      Dim nDispId As Integer = nCurrDisposId
+      While nDispId <> GDB_ID.NULL
+         If EgtGetOperationType(nDispId) = MCH_OY.DISP Then
+            Return nDispId
+         End If
+         nDispId = EgtGetNextOperation(nDispId)
+      End While
+      Return GDB_ID.NULL
+   End Function
+
    Friend Function ExitMachining() As Boolean
+      ' salvo movimenti di deposito
+      If MachiningMode = MachiningModeOpt.MOVERAWPART And OmagOFFICEMap.refSplitModeVM.bOnAuxTab Then
+         ' Nascondo eventuale tavola di scarico
+         EgtDisableModified()
+         EgtSetStatus(OmagOFFICEMap.refFinalMoveRawModeVM.nAuxTabId, GDB_ST.OFF)
+         EgtEnableModified()
+         OmagOFFICEMap.refMoveRawModeVM.ExitMoveRaw()
+         OmagOFFICEMap.refSplitModeVM.InitSplitRaw()
+      End If
+
       ' Cancello eventuale manipolatore pezzi
       EgtDisableModified()
       RemoveVacuumCups()
@@ -202,10 +304,13 @@ Public Class MachiningTabVM
    End Function
 
    Private Sub ManageExit()
-      Dim bEnab As Boolean = (m_MachiningMode = MachiningModeOpt.SPLIT)
+      ' gestione abilitazione dei pulsanti TAB: "Grezzo"RAW,"Disponi"NEST,"Lavora"(Attuale tab attivo),"Simula"SIMUL
+      Dim bEnab As Boolean = (m_MachiningMode = MachiningModeOpt.SPLIT) Or OmagOFFICEMap.refSplitModeVM.bOnAuxTab
       OmagOFFICEMap.refOptionPanelVM.RawTabIsEnabled = bEnab
       OmagOFFICEMap.refOptionPanelVM.NestTabIsEnabled = bEnab
       OmagOFFICEMap.refOptionPanelVM.SimulTabIsEnabled = bEnab
+      bPrev = False
+      bToNext = False
    End Sub
 
 #End Region    ' METHODS
@@ -227,6 +332,7 @@ Public Class MachiningTabVM
       Dim bOk As Boolean = True
       ' Dichiaro solo visualizzazione
       m_bIsShow = True
+      m_bPrev = True
       If m_MachiningMode = MachiningModeOpt.SPLIT Then
          OmagOFFICEMap.refSplitModeVM.ExitSplitRaw(False)
       Else
@@ -235,6 +341,69 @@ Public Class MachiningTabVM
       End If
       ' se trovata interferenza tra grezzi (dopo movimentazione) esco
       If Not bOk Then Return
+
+      ' recupero l'ID della disposizione corrente dalla fase
+      m_nCurrDisposition = EgtGetPhaseDisposition(m_nCurrPhase)
+      ' se non esiste significa che è stata eliminata, quindi recupero la fase precedente
+      If m_nCurrDisposition = GDB_ID.NULL Then
+         m_nCurrPhase = m_nCurrPhase - 1
+         m_nCurrDisposition = EgtGetPhaseDisposition(m_nCurrPhase)
+         If IsDispUnloadOnAuxTab(m_nCurrDisposition) <> 0 Then
+            EgtSetCurrPhase(m_nCurrPhase)
+            m_bPrev = False
+            m_bIsShow = True
+            OmagOFFICEMap.refMoveRawModeVM.InitMoveRaw()
+            EgtDraw()
+            Return
+         End If
+      Else
+         ' Passo alla pagina delle spezzature solo se non esiste prima una fased di deposito sulla tavola di scarico
+         Dim nPrevDispId As Integer = EgtGetPrevOperation(m_nCurrDisposition)
+         ' verifico se la fasa precedente è di tipo scarico
+         If IsDispUnloadOnAuxTab(nPrevDispId) <> 0 Then
+            EgtSetCurrPhase(m_nCurrPhase - 1)
+            m_nCurrDisposition = nPrevDispId
+            m_nCurrPhase -= 1
+            m_bPrev = False
+            m_bIsShow = True
+            OmagOFFICEMap.refMoveRawModeVM.InitMoveRaw()
+            EgtDraw()
+            Return
+         End If
+      End If
+
+      '' Passo alla pagina delle spezzature solo se non esiste prima una fased di deposito sulla tavola di scarico
+      'Dim nPrevDispId As Integer = EgtGetPrevOperation(m_nCurrDisposition)
+      '' verifico se la fasa precedente è di tipo scarico
+      'If IsDispUnloadOnAuxTab(nPrevDispId) <> 0 Then
+      '   EgtSetCurrPhase(m_nCurrPhase - 1)
+      '   m_nCurrDisposition = nPrevDispId
+      '   m_nCurrPhase -= 1
+      '   m_bPrev = False
+      '   m_bIsShow = True
+      '   EgtDraw()
+      '   Return
+      'End If
+
+      ' Nascondo eventuale tavola ausiliaria
+      If OmagOFFICEMap.refSplitModeVM.bOnAuxTab Then
+         EgtDisableModified()
+         EgtSetStatus(OmagOFFICEMap.refFinalMoveRawModeVM.nAuxTabId, GDB_ST.OFF)
+         EgtEnableModified()
+         EgtZoom(ZM.ALL, False)
+         If Not m_bPrev Then
+            ' Cancello eventuale manipolatore pezzi
+            EgtDisableModified()
+            RemoveVacuumCups()
+            EgtEnableModified()
+            ' ritorno a fase 1
+            EgtSetCurrPhase(1)
+            OmagOFFICEMap.refMachiningTabVM.nCurrPhase = 1
+            ' Ripristino visualizzazione preview lavorazioni
+            ShowAllPhasesMachiningPreview()
+         End If
+      End If
+
       ' Torno alla fase precedente
       EgtSetCurrPhase(EgtGetCurrPhase() - 1)
       ' Si va sempre in Split
@@ -260,15 +429,63 @@ Public Class MachiningTabVM
 
    Public Sub NextCmd(ByVal param As Object)
       Dim bOk As Boolean = True
+
+      ' se sono nella pagina split allora devo passare alla pagina MoveRawPart
       If m_MachiningMode = MachiningModeOpt.SPLIT Then
+         ' esco dalla pagina split
          OmagOFFICEMap.refSplitModeVM.ExitSplitRaw(False)
+         ' inizializzo la pagina dei movimenti e assegno la nuova fase
+         bOk = OmagOFFICEMap.refMoveRawModeVM.InitMoveRaw()
+
+         Dim EnableNextBtn As Boolean = True
+         ' in modalità di sola visualizzazione
+         If m_bIsShow Then
+            ' recupero la fase corrente
+            Dim CurrDisposition As Integer = EgtGetPhaseDisposition(m_nCurrPhase)
+            ' recupero l'operazione successiva
+            Dim NextDisposition As Integer = GetNextDisposition(CurrDisposition)
+            ' verifico che esista una 
+            If NextDisposition <> GDB_ID.NULL Then
+               ' abilito il flag di tavola ausiliari se attiva
+               OmagOFFICEMap.refSplitModeVM.bOnAuxTab = IsDispUnloadOnAuxTab(NextDisposition) <> 0
+               EnableNextBtn = True
+            End If
+         End If
+
+         ' verifico se è abilitata la tavola ausiliaria
+         If OmagOFFICEMap.refSplitModeVM.bOnAuxTab Then
+            ' se sono all'ultima fase inizializzo i comandi per il parcheggio dei pezzi sulla tavola ausiliaria
+            OmagOFFICEMap.refFinalMoveRawModeVM.Init()
+            If m_bIsShow Then
+               EnableNextBtn = True
+            Else
+               EnableNextBtn = False
+            End If
+         End If
+
+         ' disabilito il pulsante per procedere (sono abilitati i TAB)
+         NextIsEnabled = EnableNextBtn
+         ' notifivo la modifica del ContentControl
          MachiningMode = MachiningModeOpt.MOVERAWPART
          AutoVisibility = Visibility.Hidden
-         bOk = OmagOFFICEMap.refMoveRawModeVM.InitMoveRaw()
       Else
+
          ' se verificata una interferenza allora esco
          bOk = OmagOFFICEMap.refMoveRawModeVM.ExitMoveRaw()
          If Not bOk Then Return
+
+         ' se la disposizione corrente è sulla tavola ausiliaria allora lo sarà anche quella successiva
+         If IsDispUnloadOnAuxTab(m_nCurrDisposition) <> 0 Then
+            EgtSetCurrPhase(m_nCurrPhase + 1)
+            m_nCurrDisposition = EgtGetNextOperation(m_nCurrDisposition)
+            m_nCurrPhase += 1
+            m_bToNext = False
+            m_bIsShow = True
+            EgtDraw()
+            ' abilitazione dei bottoni per la modifica...
+            Return
+         End If
+
          MachiningMode = MachiningModeOpt.SPLIT
          AutoVisibility = Visibility.Visible
          OmagOFFICEMap.refSplitModeVM.InitSplitRaw()
@@ -334,12 +551,6 @@ Public Class MachiningTabVM
       End If
    End Sub
 
-   Friend Sub OnMouseDownScene_DoubleClick(sender As Object, e As Windows.Forms.MouseEventArgs)
-      If m_MachiningMode = MachiningModeOpt.SPLIT Then
-         OmagOFFICEMap.refSplitModeVM.OnMouseDownScene_DoubleClick(sender, e)
-      End If
-   End Sub
-
 #End Region    ' EVENTS
 
 End Class

OptionPanel/MachiningTab/ModifStartEndCutWindowV.xaml

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

OptionPanel/MachiningTab/ModifStartEndWjWindowV.xaml

@@ -6,79 +6,94 @@
    ShowInTaskbar="False"
    Title="{Binding Title}"
    Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"
-   SizeToContent="Height" Width="270"
+   Height="400" Width="400"
    WindowStartupLocation="CenterOwner">
 
-    <StackPanel Margin="5,5,5,0">
+        <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>
 
+        <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}"/>
 
-        <UniformGrid Columns="2" Margin="0,0,0,5">
+        <TextBlock Grid.Column="1" Grid.Row="2" Margin="0,5,0,0"
-            <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 Margin="0,0,0,5"
+        <EgtWPFLib5:EgtTextBox Grid.Column="2" Grid.Row="2" Margin="10,5,10,0"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sValue, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"/>
-        </UniformGrid>
 
-        <UniformGrid Columns="2" Margin="0,0,0,5">
+        <TextBlock Name="LeadInTxbl" Grid.Column="1" Grid.Row="3" Margin="0,5,0,0"
-            <TextBlock Name="LeadInTxbl" Margin="0,5,0,0"
+            Style="{StaticResource OptionTextBlock}" Text="{Binding LeadInMsg}" Visibility="{Binding LeadInVisibility}"/>
-                       Style="{StaticResource OptionTextBlock}" Text="{Binding LeadInMsg}" Visibility="{Binding LeadInVisibility}"/>
+        <ComboBox Name="LeadInCmBx" Grid.Column="2" Grid.Row="3" Margin="10,5,10,0"
-            <ComboBox Name="LeadInCmBx" Margin="0,0,0,5"
+                  ItemsSource="{Binding LeadInTypeList, Mode=OneWay}"
-                      ItemsSource="{Binding LeadInTypeList, Mode=OneWay}"
+                  SelectedIndex="{Binding SelectedLeadInType,Mode=TwoWay}"
-                      SelectedIndex="{Binding SelectedLeadInType,Mode=TwoWay}"
+                  Style="{DynamicResource MachiningsComboBox}" Visibility="{Binding LeadInVisibility}"/>
-                      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>
 
-        <UniformGrid Columns="2" Margin="0,0,0,5">
+        <TextBlock Name="LeadOutTxbl" Grid.Column="1" Grid.Row="3"
-            <TextBlock Name="TangDistTxbl"  Margin="0,5,0,0"
+            Style="{StaticResource OptionTextBlock}" Text="{Binding LeadOutMsg}" Visibility="{Binding LeadOutVisibility}"/>
-                       Style="{StaticResource OptionTextBlock}" Text="{Binding TangDistMsg}"/>
+        <ComboBox Name="LeadOutCmBx" Grid.Column="2" Grid.Row="3" Margin="10,5,10,0"
-            <EgtWPFLib5:EgtTextBox Name="LiTangDistTxBx" Margin="0,0,0,5"
+                  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"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sLiTangDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
                         Visibility="{Binding LeadInVisibility}"/>
-            <EgtWPFLib5:EgtTextBox Name="LoTangDistTxBx" Margin="0,0,0,5"
-                        Style="{StaticResource OptionTextBox}" Text="{Binding sLoTangDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
-                        Visibility="{Binding LeadOutVisibility}"/>
-        </UniformGrid>
 
-        <UniformGrid Columns="2" Margin="0,0,0,5">
+        <TextBlock Name="PerpDistTxbl" Grid.Column="1" Grid.Row="5" Margin="0,5,0,0"
-            <TextBlock Name="PerpDistTxbl" Margin="0,5,0,0"
+            Style="{StaticResource OptionTextBlock}" Text="{Binding PerpDistMsg}"/>
-                       Style="{StaticResource OptionTextBlock}" Text="{Binding PerpDistMsg}"/>
+        <EgtWPFLib5:EgtTextBox Name="LiPerpDistTxBx" Grid.Column="2" Grid.Row="5" Margin="10,5,10,0"
-            <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"
+
+        <EgtWPFLib5:EgtTextBox Name="LoTangDistTxBx" Grid.Column="2" Grid.Row="4" Margin="10,5,10,0"
+                        Style="{StaticResource OptionTextBox}" Text="{Binding sLoTangDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                        Visibility="{Binding LeadOutVisibility}"/>
+
+        <EgtWPFLib5:EgtTextBox Name="LoPerpDistTxBx" Grid.Column="2" Grid.Row="5" Margin="10,5,10,0"
                         Style="{StaticResource OptionTextBox}" Text="{Binding sLoPerpDist, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
                         Visibility="{Binding LeadOutVisibility}"/>
-        </UniformGrid>
 
-        <UniformGrid Name="ButtonsGrid" Columns="2" Margin="0,0,0,5">
+        <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>
 
             <Button Name="OkBtn" Content="{Binding OkMsg}" Grid.Column="1"
-                    Style="{DynamicResource CompoWindow_Button}">
+                    Style="{DynamicResource ToolBar_TextButton}">
             </Button>
             <Button Content="{Binding ExitMsg}" Grid.Column="3"
                     IsCancel="True"
-                    Style="{DynamicResource CompoWindow_Button}">
+                    Style="{DynamicResource ToolBar_TextButton}">
             </Button>
-        </UniformGrid>
 
-    </StackPanel>
+            </Grid>
 
-    <!--<GroupBox Header="{Binding DirectInsertHdr}"
+        </Grid>
+
+        <!--<GroupBox Header="{Binding DirectInsertHdr}"
                 Grid.Row="2" Margin="0,0,5,5">
             <UniformGrid Rows="2">
                 <Grid>

OptionPanel/MachiningTab/ModifyQualityV.xaml

@@ -1,32 +0,0 @@
-<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

@@ -1,6 +0,0 @@
-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

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

OptionPanel/MachiningTab/MoveRawModeVM.vb

@@ -8,6 +8,8 @@ Public Class MoveRawModeVM
 
    ' Fase corrente
    Private m_nCurrPhase As Integer = 0
+
+   Private m_bToNext As Boolean = False
    ' Gestione movimento manuale perpendicolare
    Private m_vtDir As New Vector3d                          ' direzione di movimento
    Private m_ptMid As New Point3d                           ' punto medio del taglio
@@ -109,15 +111,6 @@ Public Class MoveRawModeVM
 #Region "METHODS"
 
    Friend Function InitMoveRaw() As Boolean
-      '' verifico che il pezzo sia depositabile
-      'If VerifyCollisionWithOtherRawPart(m_CurrRawOnVacuum) Then
-      '   ' mantengo la selezione del pezzo
-      '   EgtSetStatus(m_CurrRawOnVacuum, GDB_ST.SEL)
-      '   OmagOFFICEMap.refStatusBarVM.SetOutputMessage("Collisione pezzi", 3, MSG_TYPE.ERROR_)
-      '   EgtDraw()
-      '   ' non cambio pagina
-      '   Return False
-      'End If
       ' resetto l'inidice del pezzo da mnovimentare
       m_CurrRawOnVacuum = GDB_ID.NULL
       ' Deseleziono tutto
@@ -127,15 +120,20 @@ Public Class MoveRawModeVM
       OmagOFFICEMap.refSplitModeVM.GetEnabledCuts(Cuts)
       ' Fase precedente
       Dim nPrevPhase As Integer = EgtGetCurrPhase()
+      ' se in definizione di spostamento creo una nuova fase
       If Not OmagOFFICEMap.refMachiningTabVM.IsShow Then
          ' Creo nuova fase, eseguo spezzatura grezzi e vi sposto le lavorazioni
          Dim vNewRaws As New List(Of Integer)
+         ' genero una nuova fase
          SplitRawParts(nPrevPhase, Cuts, vNewRaws)
       Else
+         ' altrimenti passo alla fase successiva
          EgtSetCurrPhase(nPrevPhase + 1)
          HideAllMachinings()
       End If
+      ' salvo la fase corrente del progetto
       m_nCurrPhase = EgtGetCurrPhase()
+      OmagOFFICEMap.refMachiningTabVM.nCurrPhase = m_nCurrPhase
       ' Aggiorno visualizzazione
       EgtDraw()
       ' Carico i parametri di movimento
@@ -184,8 +182,8 @@ Public Class MoveRawModeVM
          ' Pulisco lista info per grezzi
          m_RawMoveDataList.Clear()
          m_RawMoveDataList.Capacity() = 10
-         ' Se solo visualizzazione carico i movimenti già fatti nella fase
+         ' Se solo visualizzazione carico i movimenti già fatti nella fase (ho eliminato il Not davanti a IsShow
-         If Not OmagOFFICEMap.refMachiningTabVM.IsShow Then
+         If OmagOFFICEMap.refMachiningTabVM.IsShow Or EgtGetPhaseCount() = m_nCurrPhase Then
             Dim nDispId As Integer = EgtGetPhaseDisposition(m_nCurrPhase)
             GetMoveInfoInDisposition(nDispId, m_RawMoveDataList)
          End If
@@ -216,6 +214,15 @@ Public Class MoveRawModeVM
          ' non cambio pagina
          Return False
       End If
+
+      ' recupero disposizione fase corrente
+      Dim nDispId As Integer = EgtGetPhaseDisposition(m_nCurrPhase)
+      ' se la fase corrente è vuota allora esco senza salvare
+      If EgtIsOperationEmpty(nDispId) And OmagOFFICEMap.refSplitModeVM.bOnAuxTab And m_RawMoveDataList.Count = 0 Then
+         EgtErase(nDispId)
+         Return True
+      End If
+
       ' resetto l'inidice del pezzo da mnovimentare
       m_CurrRawOnVacuum = GDB_ID.NULL
       ' Deseleziono tutto
@@ -228,8 +235,6 @@ Public Class MoveRawModeVM
          EgtEnableModified()
          ' se non solo visualizzazione
          If Not OmagOFFICEMap.refMachiningTabVM.IsShow Then
-            ' recupero disposizione fase corrente
-            Dim nDispId As Integer = EgtGetPhaseDisposition(m_nCurrPhase)
             ' aggiungo al gruppo disposizione dei sottogruppi con i dati di movimento dei grezzi spostati
             SaveMoveInfoInDisposition(nDispId, m_RawMoveDataList)
             ' imposto presenza operazioni manuali
@@ -238,6 +243,48 @@ Public Class MoveRawModeVM
             SpecialApplyDisposition(nDispId, True)
          End If
       End If
+
+      ' se la fase precedente è una disposizione allora restituisco false
+      Dim nPrevDispId As Integer = EgtGetPrevOperation(OmagOFFICEMap.refMachiningTabVM.nCurrDisposition)
+      ' verifico se la fasa precedente è di tipo scarico
+      If OmagOFFICEMap.refMachiningTabVM.IsDispUnloadOnAuxTab(nPrevDispId) <> 0 And OmagOFFICEMap.refMachiningTabVM.bPrev Then
+         EgtSetCurrPhase(OmagOFFICEMap.refMachiningTabVM.nCurrPhase - 1)
+         OmagOFFICEMap.refMachiningTabVM.nCurrDisposition = nPrevDispId
+         OmagOFFICEMap.refMachiningTabVM.nCurrPhase -= 1
+         OmagOFFICEMap.refMachiningTabVM.bPrev = False
+         OmagOFFICEMap.refMachiningTabVM.IsShow = True
+         InitMoveRaw()
+         EgtDraw()
+         Return False
+      End If
+
+      ' Nascondo eventuale tavola ausiliaria
+      If OmagOFFICEMap.refSplitModeVM.bOnAuxTab Then
+         EgtDisableModified()
+         EgtSetStatus(OmagOFFICEMap.refFinalMoveRawModeVM.nAuxTabId, GDB_ST.OFF)
+         EgtEnableModified()
+         EgtZoom(ZM.ALL, False)
+         ' se sto uscendo dalla pagina (non ho selezionato il comando per tornare indietro) allora ripristino la prima fase
+         If Not OmagOFFICEMap.refMachiningTabVM.bPrev Then
+            ' Cancello eventuale manipolatore pezzi
+            EgtDisableModified()
+            RemoveVacuumCups()
+            EgtEnableModified()
+            ' ritorno a fase 1
+            EgtSetCurrPhase(1)
+            OmagOFFICEMap.refMachiningTabVM.nCurrPhase = 1
+            ' Ripristino visualizzazione preview lavorazioni
+            ShowAllPhasesMachiningPreview()
+         End If
+      End If
+
+      ' Se torno indietro
+      If OmagOFFICEMap.refMachiningTabVM.bPrev Then
+         EgtSetCurrPhase(m_nCurrPhase - 1)
+         OmagOFFICEMap.refMachiningTabVM.bPrev = False
+         OmagOFFICEMap.refMachiningTabVM.IsShow = True
+      End If
+
       Return True
    End Function
 
@@ -273,7 +320,7 @@ Public Class MoveRawModeVM
    End Sub
 
    ' verifica che la posizione di rialascio sia corretta, altrimenti coreggo il vettore di posizione
-   Private Function VerifyReleasdPositionIsValid(ByRef vtMove As Vector3d) As Boolean
+   Friend Function VerifyReleasdPositionIsValid(ByRef vtMove As Vector3d) As Boolean
       Dim bOk As Boolean = True
       ' determino il punto finale dello spostamento
       Dim ptEndPointLift As Point3d = VacuumCups.ptStartPointLift
@@ -338,6 +385,7 @@ Public Class MoveRawModeVM
       VacuumCups.ptStartPointLift = ptEndPointLift
       Return bOk
    End Function
+
    ' verifica che la posizione di rialascio sia corretta, altrimenti coreggo l'angolo di posizione
    Private Function VerifyReleasdAngleIsValid(ByRef dAngDeg As Double, ByVal ptCenter As Point3d) As Boolean
       Dim bOk As Boolean = True
@@ -407,6 +455,65 @@ Public Class MoveRawModeVM
       Return False
    End Function
 
+   Public Sub InsertPause()
+      ' verifico che ci sia almeno un elemto selezionato (dati di aggancio pezzo)
+      If m_RawMoveDataList.Count = 0 Then Return
+      ' verifico che sia stato inseito almeno uno spostamento, altrimenti lo rimuovo
+      Dim Index As Integer = 0
+      For Index = m_RawMoveDataList.Count - 1 To 0 Step -1
+         If Math.Abs(m_RawMoveDataList(Index).m_vtRawMove.x) < EPS_SMALL AndAlso Math.Abs(m_RawMoveDataList(Index).m_vtRawMove.y) < EPS_SMALL Then
+            m_RawMoveDataList.RemoveAt(Index)
+         End If
+      Next
+      ' verifico che la lista non sia vuota
+      If m_RawMoveDataList.Count = 0 Then Return
+
+      ' recupero disposizione fase corrente
+      Dim nDispId As Integer = EgtGetPhaseDisposition(OmagOFFICEMap.refMachiningTabVM.nCurrPhase)
+      ' imposto la pausa nella disposizione corrente
+      SetPause(nDispId)
+      ' aggiungo al gruppo disposizione dei sottogruppi con i dati di movimento dei grezzi spostati
+      SaveMoveInfoInDisposition(nDispId, m_RawMoveDataList)
+      ' imposto eventuale movimento pezzi su tavola ausiliaria
+      SaveMovePartsOnAuxTable(nDispId, OmagOFFICEMap.refSplitModeVM.bOnAuxTab)
+      '' Eseguo calcolo speciale dei movimenti: per tavola multicut
+      'SpecialApplyDisposition(nDispId, True, Not m_SplitPage.m_bOnAuxTab)
+
+      ' Creo nuova fase
+      Dim nNewPhase As Integer = EgtAddPhase()
+
+      ' Eseguo eventuali spezzature dei grezzi e vi sposto i pezzi (i grezzi devono essere sempre copiati per Registrazione con rotazione)
+      Dim nRawId As Integer = EgtGetFirstRawPart()
+      While nRawId <> GDB_ID.NULL
+         ' se il grezzo è presente nella fase precedente e non è quello selezionato allora procedo a creare una copia nella nuova fase
+         If EgtVerifyRawPartPhase(nRawId, nNewPhase - 1) Then
+            Dim bKeepRawPart As Boolean = True
+            For Each RawOnAuxTabData As RawMoveData In m_RawMoveDataList
+               If nRawId = RawOnAuxTabData.m_nId Then
+                  bKeepRawPart = False
+                  Exit For
+               End If
+            Next
+            If bKeepRawPart Then EgtKeepRawPart(nRawId, nNewPhase - 1)
+         End If
+         ' passo al successivo grezzo
+         nRawId = EgtGetNextRawPart(nRawId)
+      End While
+
+      Dim nCurrDisposition As Integer = EgtGetPhaseDisposition(nNewPhase)
+      ' salvo la disposizione corrente
+      OmagOFFICEMap.refMachiningTabVM.nCurrDisposition = nCurrDisposition
+      ' EgtSetStatus(nRawIdSlected, GDB_ST.OFF)
+      EgtSetStatus(GetVacuumId(), GDB_ST.OFF)
+      EgtSetCurrPhase(nNewPhase)
+      OmagOFFICEMap.refFinalMoveRawModeVM.SetAuxTabInCurrDisposition()
+      ' ripulisco la lista degli spostamenti
+      m_RawMoveDataList.Clear()
+      ' aggiorno la fase corrente
+      m_nCurrPhase = EgtGetCurrPhase()
+      OmagOFFICEMap.refMachiningTabVM.nCurrPhase = m_nCurrPhase
+   End Sub
+
 #End Region    ' METHODS
 
 #Region "COMMANDS"
@@ -717,6 +824,202 @@ Public Class MoveRawModeVM
 
 #End Region ' RemovePartCommand
 
+#Region "MoveOnRef"
+   ' comandi per parcheggio in su tavola di scarico
+   Public Sub MoveOnRef(sRef As String, nCorn As Integer)
+      ' Recupero il primo grezzo selezionato
+      Dim nRawId As Integer = EgtGetFirstSelectedObj()
+      If nRawId = GDB_ID.NULL Then Return
+      ' Recupero la posizione e il tipo corner del riferimento TL (4)
+      Dim nRefId As Integer = EgtGetFirstNameInGroup(EgtGetFirstNameInGroup(OmagOFFICEMap.refFinalMoveRawModeVM.nAuxTabId, "SOLID"), sRef)
+      If nRefId = GDB_ID.NULL Then Return
+      Dim ptRef As Point3d
+      If Not EgtGetInfo(nRefId, "Pos", ptRef) Then Return
+      Dim sCorn As String = ""
+      EgtGetInfo(nRefId, "COR", sCorn)
+      Select Case sCorn
+         Case "TL"
+            nCorn = MCH_CR.TL
+         Case "TR"
+            nCorn = MCH_CR.TR
+         Case "BL"
+            nCorn = MCH_CR.BL
+         Case "BR"
+            nCorn = MCH_CR.BR
+      End Select
+      ' Recupero il centro del grezzo
+      Dim ptRawCen As Point3d
+      EgtGetRawPartCenter(nRawId, ptRawCen)
+      ' Sposto il grezzo in battuta sul corner
+      Dim dAngRaw As Double = 0
+
+      Dim AngRotList As New List(Of Double)
+
+      ' ricavo l'angolo di posizionamento del grezzo/pezzo sulla tavola
+      If Not DispositionRawOnTable(nRawId, dAngRaw, AngRotList) Then Return
+      Dim bb3dRaw As New BBox3d
+      EgtGetRawPartBBox(nRawId, bb3dRaw)
+      Dim ForceToRotate As Boolean = bb3dRaw.DimX < bb3dRaw.DimY
+
+      ' ricavo l'angolo di posizionamento del grezzo/pezzo sulla tavola 
+      If Not DispositionRawOnTable(nRawId, dAngRaw, AngRotList) Then Return
+
+      ' provo a verificare di poter depositare il pezzo (senza applicare delle rotazioni)
+      If Not EgtMoveToCornerRawPart(nRawId, ptRef, nCorn) Or ForceToRotate Then
+         ' se sono impostati degli step di rotazione
+         If AngRotList.Count > 0 Then
+            Dim bOkRotate As Boolean = False
+            ' allora provo a ruotare il pezzo nel verso di rotazione della ventosa
+            For Each AngStep As Double In AngRotList
+               If EgtRotateRawPart(nRawId, Vector3d.Z_AX(), -AngStep) Then
+                  If Not EgtMoveToCornerRawPart(nRawId, ptRef, nCorn) Then
+                     ' riposiziono il pezzo come era prima
+                     EgtRotateRawPart(nRawId, Vector3d.Z_AX(), AngStep)
+                  Else
+                     bOkRotate = True
+                     ' salvo l'angolo di deposito utilizzato 
+                     dAngRaw = -AngStep
+                     Exit For
+                  End If
+               End If
+            Next
+            If Not bOkRotate Then Return
+         Else
+            If EgtRotateRawPart(nRawId, Vector3d.Z_AX(), -dAngRaw) Then
+               If Not EgtMoveToCornerRawPart(nRawId, ptRef, nCorn) Then
+                  ' riposiziono il pezzo come era prima
+                  EgtRotateRawPart(nRawId, Vector3d.Z_AX(), dAngRaw)
+                  Return
+               End If
+            Else
+               Return
+            End If
+         End If
+      Else
+         ' significa che già il primo posizionamento è andato bene, quindi non devo impostare nessuna rotazione
+         dAngRaw = 0
+      End If
+
+      ' Verifico non interferisca con altri grezzi
+      Dim bRawOk As Boolean = True
+      Dim b3Raw As New BBox3d
+      EgtGetRawPartBBox(nRawId, b3Raw)
+      Dim nOtherRaw As Integer = EgtGetFirstRawPart()
+      While nOtherRaw <> GDB_ID.NULL
+         If nOtherRaw <> nRawId AndAlso EgtVerifyRawPartCurrPhase(nOtherRaw) Then
+            Dim b3OtherRaw As New BBox3d
+            EgtGetRawPartBBox(nOtherRaw, b3OtherRaw)
+            If b3Raw.OverlapsXY(b3OtherRaw) Then
+               bRawOk = False
+               Exit While
+            End If
+         End If
+         nOtherRaw = EgtGetNextRawPart(nOtherRaw)
+      End While
+      ' Determino il movimento effettuato
+      Dim ptNewRawCen As Point3d
+      EgtGetRawPartCenter(nRawId, ptNewRawCen)
+      ' Se tutto bene, aggiorno lista movimenti
+      If bRawOk Then
+         AddRawMoveData(nRawId, ptNewRawCen - ptRawCen, m_RawMoveDataList)
+         If dAngRaw <> 0 Then AddRawMoveData(nRawId, -dAngRaw, m_RawMoveDataList)
+         ' altrimenti annullo il movimento
+      Else
+         EgtMoveRawPart(nRawId, ptRawCen - ptNewRawCen)
+         EgtRotateRawPart(nRawId, Vector3d.Z_AX(), dAngRaw)
+         ' Posizione scelta già occupata
+         OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(MSG_MOVERAWPAGEUC + 3), 3, MSG_TYPE.WARNING)
+      End If
+      ' Disabilito pezzo e nascondo le ventose
+      EgtSetStatus(nRawId, GDB_ST.ON_)
+      EgtSetStatus(GetVacuumId(), GDB_ST.OFF)
+      EgtDraw()
+   End Sub
+
+   Private Function DispositionRawOnTable(nRawId As Integer, ByRef dMyAngH As Double, ByRef AngVacList As List(Of Double)) As Boolean
+      Dim nPartId As Integer
+      If EgtVerifyRawPartCurrPhase(nRawId) Then
+         nPartId = EgtGetFirstPartInRawPart(nRawId)
+         Dim nTempPart As Integer = nPartId
+         While nTempPart <> GDB_ID.NULL
+            nTempPart = EgtGetNextPartInRawPart(nPartId)
+            ' significa che il grezzo contiene più di un pezzo
+            If nTempPart <> GDB_ID.NULL Then Return False
+         End While
+      End If
+
+      ' Verifico sia veramente un pezzo
+      If EgtGetRawPartFromPart(nPartId) = GDB_ID.NULL Then Return False
+      ' Recupero la regione del pezzo
+      Dim nGrpRegId As Integer = EgtGetFirstNameInGroup(nPartId, "Region")
+      Dim nRegId As Integer = EgtGetFirstInGroup(nGrpRegId)
+      While nRegId <> GDB_ID.NULL
+         If EgtGetType(nRegId) = GDB_TY.SRF_FRGN Then Exit While
+         nRegId = EgtGetNext(nRegId)
+      End While
+      If nRegId = GDB_ID.NULL Then Return False
+
+      ' recupero il contorno del pezzo
+      Dim nIdCurve As Integer = GetRegionOutLoop(nRegId, nGrpRegId)
+      If nIdCurve = GDB_ID.NULL Then Return False
+      ' recupero il versore 
+      Dim frFrame As New Frame3d
+      ' recupero le dimensioni del minimo rettangolo
+      Dim dLengthX As Double = 0
+      Dim dLengthY As Double = 0
+      EgtCurveMinAreaRectangleXY(nIdCurve, GDB_ID.ROOT, frFrame, dLengthX, dLengthY)
+      ' recupero la direzione del lato più lungo (versore X)
+      Dim vtDir As Vector3d = frFrame.VersX()
+
+      ' recupero le coordinate sferiche
+      Dim dMyLen, dMyAngV As Double
+      vtDir.ToSpherical(dMyLen, dMyAngV, dMyAngH)
+      ' mi riconduco sempre agli angoli 
+      If dMyAngH >= 180 Then
+         dMyAngH = dMyAngH - 180
+      End If
+      If Math.Abs(dMyAngH - 180) < EPS_ANG_SMALL Then
+         dMyAngH = 0
+      End If
+
+      ' Recupero l'asse rotante della testa ventosa
+      Dim nRotAxId As Integer = EgtGetParent(EgtGetHeadId(VACUUM_HEAD))
+      ' Verifico se contiene info con STEPS
+      Dim sSteps As String = ""
+      If Not EgtGetInfo(nRotAxId, KEY_ROTVAC_STEPS, sSteps) Then Return True
+      ' Leggo gli step previsti
+      Dim vStep() As String = sSteps.Split(",".ToCharArray)
+      For Each sStep As String In vStep
+         Dim dStep As Double = 0
+         If StringToDouble(sStep, dStep) Then
+            AngVacList.Add(dStep)
+         End If
+      Next
+
+      Return True
+   End Function
+
+   Public Sub ResetFinaleMove()
+      ' Recupero il primo grezzo selezionato
+      Dim nRawId As Integer = EgtGetFirstSelectedObj()
+      If nRawId = GDB_ID.NULL Then Return
+      ' Lo riporto nella posizione originale
+      Dim nInd As Integer = FindRawMoveData(nRawId, m_RawMoveDataList)
+      If nInd = -1 Then Return
+      Dim vtMove As Vector3d = -m_RawMoveDataList(nInd).m_vtRawMove
+      Dim dAngRaw As Double = -m_RawMoveDataList(nInd).m_dRawAngRotDeg
+      EgtMoveRawPart(nRawId, vtMove)
+      EgtRotateRawPart(nRawId, Vector3d.Z_AX(), dAngRaw)
+      AddRawMoveData(nRawId, vtMove, m_RawMoveDataList)
+      RemoveRawMoveData(nRawId, m_RawMoveDataList)
+      ' Disabilito pezzo e nascondo le ventose
+      EgtSetStatus(nRawId, GDB_ST.ON_)
+      EgtSetStatus(GetVacuumId(), GDB_ST.OFF)
+      EgtDraw()
+   End Sub
+
+#End Region    ' MoveOnRef
+
 #End Region    ' COMMANDS
 
 #Region "EVENTS"
@@ -749,7 +1052,7 @@ Public Class MoveRawModeVM
                If VerifyCollisionWithOtherRawPart(nId) Then
                   ' mantengo la selezione del pezzo
                   EgtSetStatus(nId, GDB_ST.SEL)
-                  OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(91231), 3, MSG_TYPE.ERROR_)      ' Collisione pezzi
+                  OmagOFFICEMap.refStatusBarVM.SetOutputMessage("Collisione pezzi", 3, MSG_TYPE.ERROR_)
                Else
                   ' Se con ventose, le nascondo
                   If Not OmagOFFICEMap.refMachiningTabVM.ByHand Then EgtSetStatus(GetVacuumId(), GDB_ST.OFF)
@@ -761,7 +1064,7 @@ Public Class MoveRawModeVM
                If VerifyCollisionWithOtherRawPart(m_CurrRawOnVacuum) Then
                   ' mantengo la selezione del pezzo
                   EgtSetStatus(m_CurrRawOnVacuum, GDB_ST.SEL)
-                  OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(91231), 3, MSG_TYPE.ERROR_)     ' Collisione pezzi
+                  OmagOFFICEMap.refStatusBarVM.SetOutputMessage("Collisione pezzi", 3, MSG_TYPE.ERROR_)
                   EgtDraw()
                   ' esco dal ciclo, prima devo depositare correttamente il pezzo
                   Exit While
@@ -819,7 +1122,7 @@ Public Class MoveRawModeVM
       If VerifyCollisionWithOtherRawPart(m_CurrRawOnVacuum) Then
          ' mantengo la selezione del pezzo
          EgtSetStatus(m_CurrRawOnVacuum, GDB_ST.SEL)
-         OmagOFFICEMap.refStatusBarVM.SetOutputMessage(EgtMsg(91231), 3, MSG_TYPE.ERROR_)    ' Collisione pezzi
+         OmagOFFICEMap.refStatusBarVM.SetOutputMessage("Collisione pezzi", 3, MSG_TYPE.ERROR_)
          EgtDraw()
       End If
 

OptionPanel/MachiningTab/SplitModeV.xaml

@@ -1,628 +1,219 @@
 <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">
 
-    <UserControl.InputBindings>
+   <StackPanel IsEnabled="{Binding SplitModeIsEnabled}">
-        <KeyBinding Key="Escape" Command="{Binding SplitCutCommand}" />
-    </UserControl.InputBindings>
 
-    <StackPanel IsEnabled="{Binding SplitModeIsEnabled}">
+      <ListBox ItemsSource="{Binding ItemList}"
-
+               DisplayMemberPath="Name"
-        <Border Margin="0,0,0,5" Style="{StaticResource BorderSplit}" Padding="0">
-            <ListBox ItemsSource="{Binding ItemList}"
-               Background="{StaticResource Omag_Gray}"      
                SelectionMode="Extended"
-               BorderThickness="0"
+               Height="250" Margin="0,0,0,5">
-               Height="200" Margin="0,0,0,0">
+          <ListBox.ItemContainerStyle>
-                <ListBox.ItemTemplate>
+              <Style TargetType="ListBoxItem">
-                    <DataTemplate>
+                  <Style.Triggers>
-                        <StackPanel Orientation="Horizontal" VerticalAlignment="Center">
+                      <DataTrigger Binding="{Binding bIsActive}" Value="False">
-                            <Image Margin="1" Height="20" Width="20"
+                          <Setter Property="Foreground" Value="{StaticResource Omag_Gray}"/>
-                                   Source="{Binding SourceImg}">
+                      </DataTrigger>
-                            </Image>
+                  </Style.Triggers>
-                            <TextBlock Margin="1" Text="{Binding Name}"/>
+                  <Setter Property="IsSelected" Value="{Binding IsSelected, Mode=TwoWay}" />
-                            <StackPanel.InputBindings>
+              </Style>
-                                <MouseBinding MouseAction="LeftDoubleClick" 
+          </ListBox.ItemContainerStyle>
-                                   Command="{Binding Path=DataContext.OnOffCommand,
+      </ListBox>
-                                                     RelativeSource={RelativeSource AncestorType=UserControl, Mode=FindAncestor }}"/>
-                            </StackPanel.InputBindings>
-                        </StackPanel>
-                    </DataTemplate>
-                </ListBox.ItemTemplate>
-                <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}" />
-                        <Setter Property="HorizontalContentAlignment" Value="Stretch"/>
-                    </Style>
-                </ListBox.ItemContainerStyle>
-            </ListBox>
-        </Border>
 
-        <StackPanel HorizontalAlignment="Center" Orientation="Horizontal" Margin="0,0,0,2.5">
+      <Grid Margin="0,0,0,5">
+         <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="0.5*"/>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="0.5*"/>
+         </Grid.ColumnDefinitions>
 
-            <Button
+         <Button Grid.Column="1"
                  IsEnabled="{Binding bEnabledCommandMove}"
                  Style="{StaticResource OptionPanel_Button}"
-                 Command="{Binding MoveUpCommand}"
+                 Command="{Binding MoveUpCommand}">
-                    Margin="0,0,0.5,0">
+            <Image Source="/Resources/MachiningTab/UpArrow.png"/>
-                <Image Source="/Resources/NestingTab/UpArrow.png"/>
+         </Button>
-            </Button>
+         <Button Grid.Column="2"
-            <Button
                  IsEnabled="{Binding bEnabledCommandMove}"
                  Style="{StaticResource OptionPanel_Button}"
-                 Command="{Binding MoveDownCommand}"
+                 Command="{Binding MoveDownCommand}">
-                    Margin="0.5,0,0,0">
+            <Image Source="/Resources/MachiningTab/DownArrow.png"/>
-                <Image Source="/Resources/NestingTab/DownArrow.png"/>
+         </Button>
-            </Button>
-            <ToggleButton ToolTip="{Binding LayNbArrTgBtnMsg}"
-                  Style="{StaticResource Split_ToggleButton_Img}"
-                  IsChecked="{Binding LayNbArrTgBtn_IsChecked}"
-                  Height="20" Width="20"
-                      Margin="10,0,1,0">
-                <Image Source="{Binding LayNbArrTgBtnImg}"/>
-            </ToggleButton>
-        </StackPanel>
 
-        <Border Style="{StaticResource Border}" Margin="0,1,0,5">
+      </Grid>
-            <Expander Name="myExpander1" Background="Transparent"               
-                  Foreground="{DynamicResource Omag_White}"
-                  HorizontalAlignment="Stretch" 
-                  Header="{Binding EnableCutMsg}"
-                  ExpandDirection="Down" IsExpanded="{Binding bOnOffCut_IsExpanded}">
-                <StackPanel HorizontalAlignment="Center" Orientation="Horizontal" Margin="2,2.5,2,0">
 
-                    <!--<Button Content="{Binding OnOffMsg}"
+      <Border Margin="0,0,0,5" Style="{StaticResource Border}">
+         
+         <UniformGrid Columns="3">
+
+            <Button Content="{Binding OnOffMsg}"
                     Style="{StaticResource OptionPanel_TextWrapButton}"
                     Command="{Binding OnOffCommand}"
-                    Margin="0,0,2.5,0"/>-->
+                    Margin="0,0,2.5,0"/>
-                    <StackPanel Margin="1,0,0,0">
+            <Button Content="{Binding AllOnMsg}"
-                        <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"/>-->
+                    Margin="2.5,0,2.5,0"/>
-                    <StackPanel Margin="1,0,0,0">
+            <Button Content="{Binding AllOffMsg}"
-                        <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>
 
-                </StackPanel>
+         </UniformGrid>
 
-            </Expander>
+      </Border>
-        </Border>
 
-        <Border Style="{StaticResource Border}" Margin="0,1,0,5">
+      <Border Margin="0,0,0,5" Style="{StaticResource Border}">
-            <Expander Name="myExpander2" Background="Transparent"               
+         
-                  Foreground="{DynamicResource Omag_White}"
+         <StackPanel>
-                  HorizontalAlignment="Stretch" 
+            
-                  Header="{Binding SplitCutMsg}"
+            <UniformGrid Columns="3" Margin="0,0,0,5">
-                  ExpandDirection="Down" IsExpanded="{Binding bSpLitCut_IsExpanded}">
+                <Grid>
-
+                   <Button Content="{Binding CutMsg}"
-                <StackPanel Margin="0,0,0,-2.5">
-
-                    <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"/>-->
+                           Margin="0,0,2.5,0"/>
-                            <StackPanel Visibility="{Binding CutBtnVisibility}" Margin="1,0,0,0">
+                   <ToggleButton Grid.Row="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"/>-->
+                           Margin="0,0,2.5,0" Padding="0"/>
-                            <StackPanel Visibility="{Binding BridgeBtnVisibility}" Margin="1,0,0,0">
+                </Grid>
-                                <ToggleButton ToolTip="{Binding BridgeMsg}"
+                
-                                    Style="{StaticResource Split_ToggleButton_Img}"
+               <Button Content="{Binding CutStartMsg}"
-                                    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"/>-->
+                       Margin="2.5,0,2.5,0"/>
-                            <StackPanel Visibility="{Binding CutStartBtnVisibility}" Margin="1,0,0,0">
+               <Grid>
-                                <Button ToolTip="{Binding CutStartMsg}"
+                  <Button Content="{Binding CutEndMsg}"
-                       Style="{StaticResource Split_Button_Img}"
+                          Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Command="{Binding CutStartCommand}"
+                          Command="{Binding CutEndCommand}"
-                       HorizontalAlignment="Center"
+                          Visibility="{Binding CutEndBtnVisibility}"
-                       VerticalAlignment="Center"            
+                          Margin="2.5,0,0,0"/>
-                       Margin="0,0,0,0">
+                  <ToggleButton Grid.Row="0"
-                                    <StackPanel>
+                         Content="{Binding BridgeDeleteMsg}"      
-                                        <Image Source="/Resources/NewIcons/Inizio-allunga-o-accorcia.png"
+                         Style="{StaticResource OptionPanel_ToggleWrapButton}"
-                            Height="40" Margin="0,2,0,0" 
+                         IsChecked="{Binding BridgeDeleteBtn_IsChecked}"
-                            HorizontalAlignment="Center" VerticalAlignment="Center"/>
+                         Visibility="{Binding BridgeDeleteBtnVisibility}"
-                                    </StackPanel>
+                         Margin="2.5,0,0,0" Padding="0"/>
-                                </Button>
+               </Grid>
-                            </StackPanel>
+            </UniformGrid>
 
-                            <!--<Button Content="{Binding QualityMsg}"
+            <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"
                        Style="{StaticResource OptionPanel_TextWrapButton}"
-                       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 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>
-
-                            <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>
-
-                        </Grid>
-                    </StackPanel>
-
-
-
-                    <StackPanel HorizontalAlignment="Center" Orientation="Horizontal" Margin="0,2.5,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 Visibility="{Binding AllExtendBtnVisibility}" Grid.Column="2" Margin="1,0,0,0">
-                            <Button ToolTip="{Binding AllExtendMsg}" 
-                       Style="{StaticResource Split_Button_Img}"
                        Command="{Binding AllExtendCommand}"
-                       HorizontalAlignment="Center"
+                       Visibility="{Binding AllExtendBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="0,0,2.5,0"/>
-                       Margin="0,0,0,0">
+               <Button Content="{Binding AllReduceMsg}" Grid.Column="2"
-                                <StackPanel>
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                                    <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"
+                       Visibility="{Binding AllReduceBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="2.5,0,0,0"/>
-                       Margin="0,0,0,0">
-                                <StackPanel>
-                                    <Image Source="/Resources/NewIcons/Tutti-accorcia.png"
-                            Style="{StaticResource ImgButton}"/>
-                                </StackPanel>
-                            </Button>
-                        </StackPanel>
 
-                    </StackPanel>
+            </Grid>
 
-                    <!--<StackPanel HorizontalAlignment="Center" Orientation="Horizontal" Margin="0,2.5,0,1">
+         </StackPanel>
-                    <StackPanel Visibility="{Binding AllExtendBtnVisibility}" Grid.Column="1" Margin="1,0,0,0">
+         
-                        <ToggleButton ToolTip="{Binding AllExtendMsg}" 
+      </Border>
-                       Style="{StaticResource Split_ToggleButton_Img}"
-                       IsChecked="{Binding CreateCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"   
-                       Width="40" Height="40"               
-                       Margin="1,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Crea-taglio.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
 
-                    <StackPanel Visibility="{Binding AllExtendBtnVisibility}" Grid.Column="1" Margin="1,0,0,0">
+      <Border Margin="0,0,0,5" Style="{StaticResource Border}">
-                        <ToggleButton ToolTip="{Binding AllExtendMsg}" 
+         
-                       Style="{StaticResource Split_ToggleButton_Img}"
+         <StackPanel>
-                       IsChecked="{Binding RemoveCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"       
-                       Width="40" Height="40"               
-                       Margin="0,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Rimuovi-taglio.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
 
-                    <StackPanel Visibility="{Binding AllExtendBtnVisibility}" Grid.Column="1" Margin="1,0,0,0">
+            <UniformGrid Columns="3" Margin="0,0,0,5">
-                        <ToggleButton ToolTip="{Binding AllExtendMsg}" 
-                       Style="{StaticResource Split_ToggleButton_Img}"
-                       IsChecked="{Binding CreateParallelCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"   
-                       Width="40" Height="40"               
-                       Margin="1,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Crea-taglio-parallelo.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
-                    <StackPanel Visibility="{Binding AllExtendBtnVisibility}" Grid.Column="1" Margin="1,0,0,0">
-                        <ToggleButton ToolTip="{Binding AllExtendMsg}" 
-                       Style="{StaticResource Split_ToggleButton_Img}"
-                       IsChecked="{Binding CreateParallelCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"  
-                       Width="40" Height="40"               
-                       Margin="1,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Modifica-taglio.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
-                </StackPanel>-->
 
-                </StackPanel>
+               <Button Content="{Binding OutCenStartMsg}"
-
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
-            </Expander>
-        </Border>
-
-        <Border Style="{StaticResource Border}" Margin="0,1,0,5">
-            <Expander Name="myExpander3" Background="Transparent"               
-                  Foreground="{DynamicResource Omag_White}"
-                  HorizontalAlignment="Stretch" 
-                  Header="{Binding DirectSplitCutMsg}"
-                  ExpandDirection="Down" IsExpanded="{Binding bDirectSpLitCut_IsExpanded}">
-
-                <StackPanel HorizontalAlignment="Center" Orientation="Horizontal" Margin="0,2.5,0,1">
-                    <StackPanel Grid.Column="1" Margin="1,0,0,0">
-                        <ToggleButton ToolTip="Crea" 
-                       Style="{StaticResource Split_ToggleButton_Img}"
-                       IsChecked="{Binding CreateCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"   
-                       Width="40" Height="40"               
-                       Margin="0,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Linea.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
-
-                    <StackPanel Grid.Column="1" Margin="1,0,0,0">
-                        <ToggleButton ToolTip="Elimina" 
-                       Style="{StaticResource Split_ToggleButton_Img}"
-                       IsChecked="{Binding RemoveCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"       
-                       Width="40" Height="40"               
-                       Margin="0,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Linea-Elimina.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
-
-                    <StackPanel Grid.Column="1" Margin="1,0,0,0">
-                        <ToggleButton ToolTip="Copia" 
-                       Style="{StaticResource Split_ToggleButton_Img}"
-                       IsChecked="{Binding CreateParallelCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"   
-                       Width="40" Height="40"               
-                       Margin="0,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Linea-Copia.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
-                    <StackPanel Grid.Column="1" Margin="1,0,0,0">
-                        <ToggleButton ToolTip="Muovi" 
-                       Style="{StaticResource Split_ToggleButton_Img}"
-                       IsChecked="{Binding ModifyCut_IsChecked}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"  
-                       Width="40" Height="40"               
-                       Margin="0,0,0,0">
-                            <StackPanel>
-                                <Image Source="/Resources/NewIcons/Linea-Muovi.png"
-                            Style="{StaticResource ImgButton}"/>
-                            </StackPanel>
-                        </ToggleButton>
-                    </StackPanel>
-                </StackPanel>
-
-            </Expander>
-        </Border>
-
-        <Border Style="{StaticResource Border}" Margin="0,1,0,0">
-            <Expander Name="myExpander4" Background="Transparent"               
-                  Foreground="{DynamicResource Omag_White}"
-                  HorizontalAlignment="Stretch" 
-                  Header="{Binding ManageStartEndCutMsg}" 
-                  ExpandDirection="Down" IsExpanded="{Binding bModifyCut_IsExpanded}">
-
-                <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"
+                       Visibility="{Binding OutCenStartBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="0,0,2.5,0" Padding="0"/>
-                       Margin="0,0,0,0">
+               <Button Content="{Binding AllOutStartMsg}"
-                                <StackPanel>
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                                    <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"
+                       Visibility="{Binding AllOutStartBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="2.5,0,2.5,0"/>
-                       Margin="0,0,0,0">
+               <Button Content="{Binding AllCenStartMsg}"
-                                <StackPanel>
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                                    <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"
+                       Visibility="{Binding AllCenStartBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="2.5,0,0,0"/>
-                       Margin="0,0,0,0">
+               
-                                <StackPanel>
+            </UniformGrid>
-                                    <Image Source="/Resources/NewIcons/Inizio-tutti-centro.png"
-                            Style="{StaticResource ImgButton}"/>
-                                </StackPanel>
-                            </Button>
-                        </StackPanel>
 
-                        <StackPanel Margin="1,0,0,0">
+            <UniformGrid Columns="3" Margin="0,0,0,5">
-                            <Button ToolTip="{Binding ModifStartMsg}"
+              
-                       Style="{StaticResource Split_Button_Img}"
+               <Button Content="{Binding OutCenEndMsg}"
-                       Command="{Binding ModifStartCommand}"
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       HorizontalAlignment="Center"
-                       VerticalAlignment="Center"            
-                       Margin="0,0,0,0">
-                                <StackPanel>
-                                    <Image Source="/Resources/NewIcons/Modifica-Inizio.png"
-                            Style="{StaticResource ImgButton}"/>
-                                </StackPanel>
-                            </Button>
-
-                        </StackPanel>
-
-                    </UniformGrid>
-
-                    <UniformGrid Columns="4" Margin="0,0,0,1">
-                        <StackPanel Margin="1,0,0,0" Visibility="{Binding OutCenEndBtnVisibility}">
-                            <Button ToolTip="{Binding OutCenEndMsg}"
-                       Style="{StaticResource Split_Button_Img}"
                        Command="{Binding OutCenEndCommand}"
-                       HorizontalAlignment="Center"
+                       Visibility="{Binding OutCenEndBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="0,0,2.5,0" Padding="0"/>
-                       Margin="0,0,0,0">
-                                <StackPanel>
-                                    <Image Source="/Resources/NewIcons/Fine-Centro-Fuori.png"
-                            Style="{StaticResource ImgButton}"/>
-                                </StackPanel>
-                            </Button>
-                        </StackPanel>
 
-                        <StackPanel Visibility="{Binding AllOutEndBtnVisibility}" Margin="1,0,0,0">
+               <Button Content="{Binding AllOutEndMsg}"
-                            <Button ToolTip="{Binding AllOutEndMsg}"
+                   Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Style="{StaticResource Split_Button_Img}"
+                   Command="{Binding AllOutEndCommand}"
-                       Command="{Binding AllOutEndCommand}"
+                   Visibility="{Binding AllOutEndBtnVisibility}"
-                       HorizontalAlignment="Center"
+                   Margin="2.5,0,2.5,0"/>
-                       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 Content="{Binding AllCenEndMsg}"
-                            <Button ToolTip="{Binding AllCenEndMsg}"
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       Style="{StaticResource Split_Button_Img}"
                        Command="{Binding AllCenEndCommand}"
-                       HorizontalAlignment="Center"
+                       Visibility="{Binding AllCenEndBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="2.5,0,0,0"/>
-                       Margin="0,0,0,0">
-                                <StackPanel>
-                                    <Image Source="/Resources/NewIcons/Fine-tutti-centro.png"
-                            Style="{StaticResource ImgButton}"/>
-                                </StackPanel>
-                            </Button>
-                        </StackPanel>
 
+            </UniformGrid>
 
-                        <StackPanel Margin="1,0,0,0">
+            <UniformGrid Columns="3" Margin="0,0,0,5">
-                            <Button ToolTip="{Binding ModifEndMsg}"
+
-                       Style="{StaticResource Split_Button_Img}"
+               <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}"
-                       HorizontalAlignment="Center"
+                       Margin="2.5,0,2.5,0"/>
-                       VerticalAlignment="Center"            
-                       Margin="0,0,0,0">
-                                <StackPanel>
-                                    <Image Source="/Resources/NewIcons/Modifica-Fine.png"
-                            Style="{StaticResource ImgButton}"/>
-                                </StackPanel>
-                            </Button>
-                        </StackPanel>
 
-                    </UniformGrid>
+               <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 Columns="4" Margin="0,0,0,1">
+            </UniformGrid>
 
-                        <!--Bottone invisibile per permetter il corretto allineamento-->
+            <UniformGrid Columns="3" Margin="0,0,0,5">
-                        <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="0,0,1,0"/>
+                       Margin="2.5,0,2.5,0"/>
-
+                    <!--Inverti direzione di taglio-->
-                        <StackPanel Margin="1,0,0,0">
+                    <Button Content="{Binding InvertMsg}" Grid.Column="0"
-                            <Button ToolTip="{Binding PauseMsg}"
+                       Style="{StaticResource OptionPanel_TextWrapButton}"
-                       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"
+                            Visibility="{Binding InvertBtnVisibility}"
-                       VerticalAlignment="Center"            
+                       Margin="2.5,0,2.5,0"/>
-                       Margin="0,0,0,0">
-                                <StackPanel>
-                                    <Image Source="/Resources/NewIcons/Inverti.png"
-                                 Style="{StaticResource ImgButton}"/>
-                                </StackPanel>
-                            </Button>
-                        </StackPanel>
 
-                    </UniformGrid>
+            </UniformGrid>
 
-                </StackPanel>
+            </StackPanel>
 
-            </Expander>
+      </Border>
-        </Border>
+
-    </StackPanel>
+   </StackPanel>
 
 </UserControl>

OptionPanel/NestingTab/ChangeTableV.xaml

@@ -1,63 +0,0 @@
-<EgtWPFLib5:EgtCustomWindow x:Class="ChangeTableV"
-                            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"
-                            Style="{DynamicResource {x:Type EgtWPFLib5:EgtCustomWindow}}"                    
-                            WindowStyle="None" ResizeMode="NoResize" TitleBarHeight="30" IsResizable="False"
-                            IsMinimizable="False" WindowStartupLocation="CenterScreen"
-                            CloseCommand="{Binding CloseCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}"                   
-                            Title="{Binding sTitle}" Height="150" Width="320">
-   <Grid>
-      <Grid.RowDefinitions>
-         <RowDefinition Height="2*"/>
-         <RowDefinition Height="1*"/>
-      </Grid.RowDefinitions>
-      <ItemsControl ItemsSource="{Binding CurrTableList}">
-         <!--Definisco l'organizzazione dei comandi-->
-         <ItemsControl.ItemsPanel>
-            <ItemsPanelTemplate>
-               <StackPanel Orientation="Horizontal" 
-                           HorizontalAlignment="Center" 
-                           VerticalAlignment="Center"/>
-            </ItemsPanelTemplate>
-         </ItemsControl.ItemsPanel>
-         <!--Definisco il contenuto del comando-->
-         <ItemsControl.ItemTemplate>
-            <DataTemplate>
-               <RadioButton GroupName="TabGrp" 
-                            IsChecked="{Binding IsActive}"
-                            Width="60" Height="60"
-                            Style="{DynamicResource ChangeTable_ToggleButton}">
-                  <Grid>
-                     <!--Nome della tavole: Tab #-->
-                     <TextBlock Text="{Binding sName}" 
-                                HorizontalAlignment="Center"
-                                Background="Transparent">
-                        <TextBlock.Style>
-                           <Style TargetType="{x:Type TextBlock}">
-                              <Setter Property="Foreground" Value="{StaticResource Omag_LightGray}"/>
-                              <Style.Triggers>
-                                 <DataTrigger Binding="{Binding IsChecked, RelativeSource={RelativeSource AncestorType=RadioButton}}" Value="True">
-                                    <Setter Property="Foreground" Value="{StaticResource Omag_White}"/>
-                                 </DataTrigger>
-                              </Style.Triggers>
-                           </Style>
-                        </TextBlock.Style>
-                     </TextBlock>
-                     <!--Rappresentazione di una tavola di lavoro-->
-                     <Image Source="{Binding ImgTab}" Margin="0,20,0,0"/>
-                  </Grid>
-
-               </RadioButton>
-            </DataTemplate>
-         </ItemsControl.ItemTemplate>
-      </ItemsControl>
-      <UniformGrid Grid.Row="1" Columns="2">
-         <Button Content="Ok" Margin="5" Command="{Binding OkCommand}"
-                 Style="{StaticResource OptionPanel_TextButton}"/>
-         <Button Content="Cancel" Margin="5" Command="{Binding CancelCommand}"
-                 Style="{StaticResource OptionPanel_TextButton}"/>
-      </UniformGrid>
-   </Grid>
-</EgtWPFLib5:EgtCustomWindow>

OptionPanel/NestingTab/ChangeTableV.xaml.vb

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

OptionPanel/NestingTab/ChangeTableVM.vb

@@ -1,143 +0,0 @@
-Public Class ChangeTableVM
-   Inherits VMBase
-   Private m_refChanTableV As ChangeTableV
-
-   Public Enum EnumDialogResult
-      OK
-      CANCEL
-   End Enum
-
-   Private m_MyDialogResult As EnumDialogResult
-   Public ReadOnly Property MyDialogResult As EnumDialogResult
-      Get
-         Return m_MyDialogResult
-      End Get
-   End Property
-
-   Private m_sTitle As String = "Seleziona tavola di lavoro"
-   Public ReadOnly Property sTitle As String
-      Get
-         Return m_sTitle
-      End Get
-   End Property
-
-   Private m_nSelectedTable As Integer = 0
-   Public ReadOnly Property nSelectedTable As Integer
-      Get
-         Return m_nSelectedTable
-      End Get
-   End Property
-
-   Private m_cmdOk As ICommand
-   Private m_cmdCancel As ICommand
-
-   Sub New(refV As ChangeTableV)
-      m_refChanTableV = refV
-      ' Procedo alla creazione della lista delle tavole disponibili
-      Initialized()
-   End Sub
-
-   Private m_CurrTableList As New List(Of TableToChange)
-   Public ReadOnly Property CurrTableList As List(Of TableToChange)
-      Get
-         Return m_CurrTableList
-      End Get
-   End Property
-
-   Private Sub Initialized()
-      ' recuepero l'inidce della tavola corrente
-      Dim nIndeXCurrTab As Integer = GetCurrentTable()
-      ' creo la lista delle tavole disponibili (attivo il bottone della tavola attualmente in uso)
-      For nInd As Integer = 0 To GetTableCount() - 1
-         m_CurrTableList.Add(New TableToChange("Tab", (nInd + 1), ((nInd + 1) = nIndeXCurrTab)))
-      Next
-   End Sub
-
-   Public ReadOnly Property OkCommand() As ICommand
-      Get
-         If m_cmdOk Is Nothing Then
-            m_cmdOk = New Command(AddressOf Ok)
-         End If
-         Return m_cmdOk
-      End Get
-   End Property
-
-   Public ReadOnly Property CancelCommand() As ICommand
-      Get
-         If m_cmdCancel Is Nothing Then
-            m_cmdCancel = New Command(AddressOf Cancel)
-         End If
-         Return m_cmdCancel
-      End Get
-   End Property
-
-   Private Sub Ok()
-      ' recupero l'indice della tavola impostata
-      For Each ItemTab As TableToChange In CurrTableList
-         If ItemTab.IsActive Then
-            m_nSelectedTable = ItemTab.nIndex
-            Exit For
-         End If
-      Next
-      m_MyDialogResult = EnumDialogResult.OK
-      ' procedo alla chiusura della finetra
-      m_refChanTableV.Close()
-   End Sub
-
-   Private Sub Cancel()
-      m_MyDialogResult = EnumDialogResult.CANCEL
-      ' procedo alla chiusura della finetra
-      m_refChanTableV.Close()
-   End Sub
-
-End Class
-
-Public Class TableToChange
-   Inherits VMBase
-
-   Private Property m_sName As String = "Tab"
-   Public ReadOnly Property sName As String
-      Get
-         Return m_sName
-      End Get
-   End Property
-
-   Private m_sImgTab As String = "\Resources\NewIcons\table.png"
-   Public ReadOnly Property ImgTab As String
-      Get
-         Return If(m_bIsActive, "\Resources\NewIcons\table.png", "\Resources\NewIcons\tableS.png")
-      End Get
-   End Property
-
-   Private Property m_nIndex As Integer = 3
-   Public ReadOnly Property nIndex As Integer
-      Get
-         Return m_nIndex
-      End Get
-   End Property
-
-   Private m_bIsActive As Boolean = False
-   Public Property IsActive As Boolean
-      Get
-         Return m_bIsActive
-      End Get
-      Set(value As Boolean)
-         m_bIsActive = value
-         If m_bIsActive Then
-            m_sImgTab = "\Resources\NewIcons\table.png"
-         Else
-            m_sImgTab = "\Resources\NewIcons\tableS.png"
-         End If
-         NotifyPropertyChanged(NameOf(IsActive))
-         NotifyPropertyChanged(NameOf(ImgTab))
-      End Set
-   End Property
-
-   Public Sub New(Name As String, Ind As Integer, IsCurrent As Boolean)
-      m_sName = Name & " " & Ind.ToString
-      m_nIndex = Ind
-      m_bIsActive = IsCurrent
-      NotifyPropertyChanged("IsActive")
-   End Sub
-
-End Class

OptionPanel/NestingTab/MultiSelectionVM.vb

@@ -1,4 +1,5 @@
 Imports EgtUILib
+Imports EgtWPFLib5
 
 Public Class MultiSelectionVM
    Inherits VMBase
@@ -7,24 +8,24 @@ Public Class MultiSelectionVM
 
    Public ReadOnly Property TitleMsg As String
       Get
-         Return EgtMsg(91681)    ' Multiple selection
+         Return "Multiple selection"
       End Get
    End Property
    Public ReadOnly Property SelectionMsg As String
       Get
-         Return EgtMsg(91682)    ' Number of Parts
+         Return "Number of Parts"
       End Get
    End Property
 
    Public ReadOnly Property OkMsg As String
       Get
-         Return EgtMsg(91651)    ' Ok
+         Return "Ok"
       End Get
    End Property
 
    Public ReadOnly Property CancelMsg As String
       Get
-         Return EgtMsg(91652)    ' Cancel
+         Return "Cancel"
       End Get
    End Property
 

OptionPanel/NestingTab/NestingTabV.xaml

@@ -4,336 +4,203 @@
    xmlns:EgtWPFLib5 ="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
    Margin="5,5,5,0">
 
-
+      <Grid HorizontalAlignment="Center"
-    <GroupBox Header="{Binding DrawingMsg}" 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 DrawImport_NestingButton}"
-              Command="{Binding ImportDxfCommand}">
-                <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>
-
-        </Grid>
-    </GroupBox>
-
-    <Border Margin="0,5,0,5" Style="{StaticResource Border}">
-
-        <Grid HorizontalAlignment="Center"
          VerticalAlignment="Center"
-         Margin="0,0,0,0">
+         Margin="0,0,0,5">
-            <Grid.ColumnDefinitions>
+      <Grid.ColumnDefinitions>
-                <ColumnDefinition Width="Auto"/>
+         <ColumnDefinition Width="Auto"/>
-                <ColumnDefinition Width="5"/>
+         <ColumnDefinition Width="5"/>
-                <ColumnDefinition Width="Auto"/>
+         <ColumnDefinition Width="Auto"/>
-                <ColumnDefinition Width="5"/>
+         <ColumnDefinition Width="5"/>
-                <ColumnDefinition Width="Auto"/>
+         <ColumnDefinition Width="Auto"/>
-            </Grid.ColumnDefinitions>
+      </Grid.ColumnDefinitions>
-            <Grid.RowDefinitions>
+      <Button Grid.Column="0" Grid.Row="0"
-                <RowDefinition Height="Auto"/>
+              Style="{StaticResource OptionPanel_NestingButton}"
-                <RowDefinition Height="5"/>
+              Command="{Binding DrawCommand}">
-                <RowDefinition Height="Auto"/>
+         <Image Source="/Resources/NestingTab/Draw.png" Stretch="Uniform"/>
-                <RowDefinition Height="5"/>
+      </Button>
-                <RowDefinition Height="Auto"/>
+      <Button Grid.Column="2" Grid.Row="0"
-                <RowDefinition Height="5"/>
+              Style="{StaticResource OptionPanel_NestingButton}"
-                <RowDefinition Height="Auto"/>
+              Command="{Binding ImportDxfCommand}">
-            </Grid.RowDefinitions>
+         <Image Source="/Resources/NestingTab/ImportDxf.png" Stretch="Uniform"/>
+      </Button>
+      <ToggleButton Grid.Column="4" Grid.Row="0"                
+              Style="{StaticResource OptionPanel_NestingToggleButton}"
+              IsChecked="{Binding CsvImport_IsChecked}">
+         <Image Source="/Resources/NestingTab/ImportCsv.png" Stretch="Uniform"/>
+      </ToggleButton>
 
-            <!--<TextBlock Name="PositioningLbl" Grid.ColumnSpan="3" VerticalAlignment="Center"
+   </Grid>
+
+   <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>
+
+      <!--<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"/>
+         <Image Source="/Resources/NestingTab/PartRotOn.png" Stretch="Uniform"/>
-            </Button>
+      </Button>
-            <Button Grid.Column="2" Grid.Row="0"
+      <Button Grid.Column="2" Grid.Row="0"
             Style="{StaticResource OptionPanel_NestingButton}"
             Command="{Binding UpCommand}">
-                <Image Source="/Resources/NestingTab/UpArrow.png" 
+         <Image Source="/Resources/NestingTab/UpArrow.png" Stretch="Uniform"/>
-                       Width="40"/>
+      </Button>
-            </Button>
+      <Button Grid.Column="4" Grid.Row="0"
-            <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"/>
+         <Image Source="/Resources/NestingTab/PartRotOff.png" Stretch="Uniform"/>
-            </Button>
+      </Button>
-            <Button Grid.Column="0" Grid.Row="2"
+      <Button Grid.Column="0" Grid.Row="2"
               Style="{StaticResource OptionPanel_NestingButton}"
               Command="{Binding LeftCommand}">
-                <Image Source="/Resources/NestingTab/LeftArrow.png"
+         <Image Source="/Resources/NestingTab/LeftArrow.png"/>
-                       Width="40"/>
+      </Button>
-            </Button>
+      <ToggleButton Grid.Column="2" Grid.Row="2"
-            <ToggleButton Grid.Column="2" Grid.Row="2"
                     Style="{StaticResource OptionPanel_NestingToggleButton}"
                     IsChecked="{Binding MaxMoveIsChecked}">
-                <Image Source="/Resources/NestingTab/MaxMove.png"/>
+         <Image Source="/Resources/NestingTab/MaxMove.png"/>
-            </ToggleButton>
+      </ToggleButton>
-            <Button Grid.Column="4" Grid.Row="2"
+      <Button Grid.Column="4" Grid.Row="2"
               Style="{StaticResource OptionPanel_NestingButton}"
               Command="{Binding RightCommand}">
-                <Image Source="/Resources/NestingTab/RightArrow.png"
+         <Image Source="/Resources/NestingTab/RightArrow.png"/>
-                       Width="40"/>
+      </Button>
-            </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"
+         <Image Source="/Resources/NestingTab/DownArrow.png"/>
-                       Width="40"/>
+      </Button>
-            </Button>
 
-            <Grid Grid.Column="4" Grid.Row="4" HorizontalAlignment="Center" VerticalAlignment="Center">
+      <Grid Grid.Column="4" Grid.Row="4" HorizontalAlignment="Center" VerticalAlignment="Center">
-                <Grid.ColumnDefinitions>
+         <Grid.ColumnDefinitions>
-                    <ColumnDefinition Width="Auto"/>
+            <ColumnDefinition Width="Auto"/>
-                    <ColumnDefinition Width="Auto"/>
+            <ColumnDefinition Width="Auto"/>
-                </Grid.ColumnDefinitions>
+         </Grid.ColumnDefinitions>
 
-                <EgtWPFLib5:EgtTextBox Text="{Binding RotationAngle}" Width="40"
+         <EgtWPFLib5:EgtTextBox Text="{Binding RotationAngle}" Width="50"
                                 VerticalAlignment="Center"
-                                HorizontalContentAlignment="Left"/>
+                                HorizontalContentAlignment="Right"/>
-                <TextBlock Grid.Column="1" Margin="2,0,0,0"
+         <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>
+      </Button>
-            <ToggleButton Grid.Column="2" Grid.Row="6"
+      <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>
+      </ToggleButton>
-            <Button Grid.Column="4" Grid.Row="6"
+      <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>
 
-    <Border Style="{StaticResource Border}" Margin="0,1,0,5">
+    <UniformGrid Grid.Column="0" Columns="2" Margin="0,0,0,5">
-        <Expander Name="myExpander1" Background="Transparent"               
+        <Button Content="{Binding InsertPartMsg}"
-                  Foreground="{DynamicResource Omag_White}"
-                  HorizontalAlignment="Stretch" 
-                  Header="{Binding ManagePartsMsg}"
-                  ExpandDirection="Down" IsExpanded="{Binding bManageParts_IsExpanded}">
-
-            <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"/>-->
+                Margin="2.5,0,0,0"/>
-                <StackPanel>
+        <!--<ToggleButton Content="{Binding StartCurvWJMsg}" Grid.Column="2"
-                    <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>
-        </Expander>
-    </Border>
 
-    <Border Style="{StaticResource Border}" Margin="0,1,0,5">
+    <UniformGrid Grid.Column="0" Columns="{Binding CountColumn}"  Margin="0,0,0,5">
-        <Expander Name="myExpander2" Background="Transparent"               
+        <Button Content="{Binding RemovePartMsg}"
-                  Foreground="{DynamicResource Omag_White}"
+                Style="{StaticResource OptionPanel_TextButton}"
-                  HorizontalAlignment="Stretch" 
+                Command="{Binding RemovePartCommand}"
-                  Header="{Binding SelectionPartMsg}"
+                Margin="0,0,2.5,0"/>
-                  ExpandDirection="Down" IsExpanded="{Binding bSelectionParts_IsExpanded}">
+        <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>
 
-            <UniformGrid Grid.Column="0" Columns="{Binding CountColumn}"  Margin="0,2.5,0,0">
+    <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>
 
-                <StackPanel>
+   <Button Content="{Binding ResetMsg}"
-                    <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>
-        </Expander>
-    </Border>
-
-    <Border Style="{StaticResource Border}" Margin="0,1,0,5" Visibility="{Binding WJ_Cmd_Visibility}">
-        <Expander Name="myExpander3" Background="Transparent"               
-                  Foreground="{DynamicResource Omag_White}"
-                  HorizontalAlignment="Stretch" 
-                  Header="{Binding ManageWJMsg}"
-                  ExpandDirection="Down" IsExpanded="{Binding bManageWJ_IsExpanded}">
-            <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>
-        </Expander>
-    </Border>
-
-
-    <Button Content="{Binding ResetMsg}"
            Style="{StaticResource OptionPanel_TextButton}"
            Command="{Binding ResetCommand}"
-           Margin="0,5,0,5"/>
+           Margin="0,0,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/OptionPanelV.xaml

@@ -1,78 +1,39 @@
-<UserControl x:Class="OptionPanelV"
+<EgtFloating:EgtFloatingPanel 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="190">
+   Width="268"
+   IsTopDockable="False" IsBottomDockable="False" IsLeftDockable="True"
+   IsRightDockable="False" Style="{StaticResource Option_EgtFloatingPanel}">
 
-   <Grid>
+   <TabControl Name="Tabs" SelectedIndex="{Binding SelItem}">
-      <Grid.RowDefinitions>
+      <TabItem Header="{Binding RawPartTabMsg}" IsEnabled="{Binding RawTabIsEnabled}"
-         <RowDefinition Height="Auto"/>
+               Background="{Binding RawPart_Background}">
-         <RowDefinition Height="1*"/>
+         <TabItem.Content>
-      </Grid.RowDefinitions>
+            <OmagOFFICE:RawPartTabV DataContext="{StaticResource RawPartTabVM}"/>
-      <TabControl Name="Tabs" SelectedIndex="{Binding SelItem}" Background="Transparent"
+         </TabItem.Content>
-                Padding="0,0,0,0"
+      </TabItem>
-                Margin="5,0.5,5,0"
+      <TabItem Header="{Binding NestingTabMsg}" IsEnabled="{Binding NestTabIsEnabled}"> 
-                Style="{StaticResource TabControlOptinPanel}">
+         <TabItem.Content>
-         <TabItem IsEnabled="{Binding RawTabIsEnabled}"    
+            <OmagOFFICE:NestingTabV DataContext="{StaticResource NestingTabVM}"/>
-                 Margin="0,0,0,0"
+         </TabItem.Content>
-                 Style="{StaticResource TabItemOptinPanel}">
+      <TabItem.Style>
-            <TabItem.Header>
+         <Style TargetType="{x:Type TabItem}" BasedOn="{StaticResource {x:Type TabItem}}">
-               <StackPanel Orientation="Horizontal" Width="35" Height="35">
+            <EventSetter Event="PreviewMouseDown" Handler="NestingTab_Click"/>
-                  <Image Source="/Resources/NewIcons/icone-tagli-5.png" 
+         </Style>
-                         Stretch="UniformToFill"
+      </TabItem.Style>
-                         ToolTip="{Binding RawPartTabMsg}"/>
+      </TabItem>
-               </StackPanel>
+      <TabItem Header="{Binding MachiningTabMsg}" IsEnabled="{Binding MachTabIsEnabled}">
-            </TabItem.Header>
+         <TabItem.Content>
-            <TabItem.Content>
+            <OmagOFFICE:MachiningTabV DataContext="{StaticResource MachiningTabVM}"/>
-               <OmagOFFICE:RawPartTabV DataContext="{StaticResource RawPartTabVM}"/>
+         </TabItem.Content>
-            </TabItem.Content>
+      </TabItem>
-         </TabItem>
+      <TabItem Header="{Binding SimulTabMsg}" IsEnabled="{Binding SimulTabIsEnabled}">
-         <TabItem  IsEnabled="{Binding NestTabIsEnabled}"
+         <TabItem.Content>
-                 Margin="0,0,0,0"
+            <OmagOFFICE:SimulTabV DataContext="{StaticResource SimulTabVM}"/>
-                 Style="{StaticResource TabItemOptinPanel}">
+         </TabItem.Content>
-            <TabItem.Header>
+      </TabItem>
-               <StackPanel Orientation="Horizontal" Width="35" Height="35">
+   </TabControl>
-                        <Image ToolTip="{Binding NestingTabMsg}" Source="/Resources/NewIcons/Nest.png" Stretch="Uniform" />
+   
-               </StackPanel>
+</EgtFloating:EgtFloatingPanel>
-            </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  IsEnabled="{Binding MachTabIsEnabled}"
-                 Margin="0,0,0,0"
-                 Style="{StaticResource TabItemOptinPanel}">
-            <TabItem.Header>
-               <StackPanel Orientation="Horizontal" Width="35" Height="35">
-                        <Image ToolTip="{Binding MachiningTabMsg}" Source="/Resources/NewIcons/Split.png" Stretch="Uniform" />
-               </StackPanel>
-            </TabItem.Header>
-            <TabItem.Content>
-               <OmagOFFICE:MachiningTabV DataContext="{StaticResource MachiningTabVM}"/>
-            </TabItem.Content>
-         </TabItem>
-         <TabItem  IsEnabled="{Binding SimulTabIsEnabled}"
-                 Margin="0,0,0,0"
-                 Style="{StaticResource TabItemOptinPanel}">
-            <TabItem.Header>
-               <StackPanel Orientation="Horizontal" Width="35" Height="35">
-                        <Image ToolTip="{Binding SimulTabMsg}" Source="/Resources/NewIcons/Simula.png" Stretch="Uniform" />
-               </StackPanel>
-            </TabItem.Header>
-            <TabItem.Content>
-               <OmagOFFICE:SimulTabV DataContext="{StaticResource SimulTabVM}"/>
-            </TabItem.Content>
-         </TabItem>
-      </TabControl>
-       <!--Se click + Key Shift sopra Label apertura dellì file Log-->
-      <Label Grid.Row="1"
-             Background="Transparent" 
-             MouseLeftButtonDown="Label_MouseLeftButtonDown"/>
-   </Grid>
-</UserControl>

OptionPanel/OptionPanelV.xaml.vb

@@ -1,7 +1,4 @@
-Imports System.IO
+Public Class OptionPanelV
-Imports EgtUILib
-
-Public Class OptionPanelV
 
    Private m_OptionPanelVM As OptionPanelVM
 
@@ -27,35 +24,6 @@ Public Class OptionPanelV
       If Not OmagOFFICEMap.refOptionPanelVM.NestTabIsEnabled Then e.Handled = True
    End Sub
 
-   Private Sub Label_MouseLeftButtonDown(sender As Object, e As MouseButtonEventArgs)
-      If Not (Keyboard.Modifiers And ModifierKeys.Shift) > 0 Then Return
-      Dim sTmpDir As String = String.Empty
-      If Not EgtInterface.EgtGetTempDir(sTmpDir) Then Return
-      ' Genero file CNC (lancio anche se errore in precedenza)
-      Dim sLog1 As String = sTmpDir & "\OmagOFFICELog1.txt"
-      Dim sLog2 As String = sTmpDir & "\OmagOFFICELog2.txt"
-      Dim sLog As String = ""
-
-      If File.Exists(sLog1) AndAlso File.Exists(sLog2) Then
-         If File.GetLastAccessTimeUtc(sLog1) > File.GetLastAccessTimeUtc(sLog2) Then
-            sLog = sLog1
-         Else
-            sLog = sLog2
-         End If
-      ElseIf File.Exists(sLog1) AndAlso Not File.Exists(sLog2) Then
-         sLog = sLog1
-      ElseIf File.Exists(sLog2) AndAlso Not File.Exists(sLog1) Then
-         sLog = sLog2
-      End If
-
-      Try
-         Process.Start("Notepad.exe", sLog)
-      Catch ex As Exception
-         ex.ToString()
-      End Try
-      'End If
-   End Sub
-
 #End Region    ' EVENTS
 
 End Class

OptionPanel/RawPartTab/OmagPhotoV.xaml

@@ -5,15 +5,16 @@
         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"
         ResizeMode="NoResize" ShowInTaskbar="False">
-    <DockPanel>
+    <EgtPHOTOLib:ProjectSlabV DataContext="{StaticResource ProjectSlabVM}"/>
-      
+    <!--<DockPanel>
-        <!--Progetto corrente-->
+        <Grid>
-        <EgtPHOTOLib:ProjectSlabV DataContext="{StaticResource ProjectSlabVM}"/>
+            <ContentControl Content="{Binding OmagPhotoContent}"/>
+           
+        </Grid>
+    </DockPanel>-->
 
-    </DockPanel>
 </EgtWPFLib5:EgtCustomWindow>

OptionPanel/RawPartTab/OmagPhotoV.xaml.vb

@@ -2,11 +2,13 @@
 
    'Private m_OmagPhotoVM As OmagPhotoVM
 
-   'Public Sub New(Owner As Window)
+   'Sub New(Owner As Window, OmagPhotoVM As OmagPhotoVM)
    '   MyBase.New(Owner)
-   '   'This call Is required by the designer.
+   '   ' This call is required by the designer.
    '   InitializeComponent()
-
+   '   Me.DataContext = OmagPhotoVM
+   '   ' Assegno al riferimento locale al VM il VM preso dal DataContext
+   '   m_OmagPhotoVM = OmagPhotoVM
    'End Sub
 
 End Class

OptionPanel/RawPartTab/RawPartTabV.xaml

@@ -5,217 +5,176 @@
    xmlns:EgtPHOTOLib="clr-namespace:EgtPHOTOLib;assembly=EgtPHOTOLib"          
    Margin="5,5,5,0">
 
-    <StackPanel>
+   <Border Style="{StaticResource DefaultBorder}"
-        <GroupBox Header="Photo" Style="{StaticResource GroupBoxRow}">
+           Padding="5,5,5,0">
-            <Grid  HorizontalAlignment="Center"
+      <StackPanel>
-         VerticalAlignment="Center" Margin="0,2.5,0,0">
+         <Grid>
-                <Grid.ColumnDefinitions>
+            <Grid.ColumnDefinitions>
-                    <ColumnDefinition Width="Auto"/>
+               <ColumnDefinition Width="1*"/>
-                    <ColumnDefinition Width="5"/>
+               <ColumnDefinition Width="1*"/>
-                    <ColumnDefinition Width="Auto"/>
+               <ColumnDefinition Width="1*"/>
-                    <ColumnDefinition Width="5"/>
+            </Grid.ColumnDefinitions>
-                    <ColumnDefinition Width="Auto"/>
+            <Button Style="{StaticResource OptionPanel_Button}"
-                </Grid.ColumnDefinitions>
+                    Grid.Column="0"
-                <Button Style="{StaticResource OptionPanelRaw_Button}"
-                    Grid.Column="0" Grid.Row="0"
                     Visibility="{Binding SlabIdVisibility}"
                     IsEnabled="{Binding SlabIdIsEnabled}"
                     Command="{Binding SlabIdCommand}"
-                    Margin="0,0,0,0" >
+                    Width="30" Height="30"
-                    <Image Source="/Resources/RawPartTab/SlabId.png" Stretch="Uniform"/>
+                    Margin="0,0,0,5" >
-                </Button>
+               <Image Source="/Resources/RawPartTab/SlabId.png" Stretch="Uniform"/>
-                <Button Style="{StaticResource OptionPanelRaw_Button}"
+            </Button>
-                    Grid.Column="2" Grid.Row="0"                       
+            <Button Style="{StaticResource OptionPanel_Button}"
+                    Grid.Column="1"
                     Command="{Binding PhotoCommand}"
-                    ToolTip="{Binding PhotoToolTip }"
+                    Margin="0,0,0,5" >
-                    Margin="0,0,0,0" >
+               <Image Source="/Resources/RawPartTab/Photo.png" Stretch="Uniform"/>
-                    <Image Source="/Resources/RawPartTab/Photo.png" Stretch="Uniform"/>
+            </Button>
-                </Button>
+            <ToggleButton Style="{StaticResource OptionPanel_ToggleButton}"
-                <ToggleButton Style="{StaticResource OptionPanelRaw_ToggleButton}"
+                    Grid.Column="2"
-                    Grid.Column="4" Grid.Row="0"
                     IsChecked="{Binding PhotoWithMouse}"
-                    ToolTip="{Binding MovePhotoToolTip }"          
+                    Width="30"
-                    Margin="0,0,0,0" >
+                    Margin="0,0,0,5" >
-                    <Image Source="/Resources/RawPartTab/MovePhoto.png" Stretch="Uniform" Width="40"/>
+               <Image Source="/Resources/RawPartTab/Mouse.png" Stretch="Uniform"/>
-                </ToggleButton>
+            </ToggleButton>
-            </Grid>
+         </Grid>
-        </GroupBox>
 
-        <GroupBox Header="Offset photo" Style="{StaticResource GroupBoxRow}">
+         <UniformGrid Columns="2" Rows="3" Margin="0,0,0,0">
-            <UniformGrid Columns="2" Rows="3" Margin="0,0,0,0">
 
-                <TextBlock Text="{Binding OffsetXMsg}" Style="{StaticResource RawTextBlock}"/>
+            <TextBlock Text="{Binding OffsetXMsg}"/>
-                <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetX}"
+            <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetX}"
-                                   BorderThickness="0"
+                                   Margin="13,0,0,5"
-                                   Margin="0,0,0,5"
                                    TextAlignment="Right"/>
-                <TextBlock Text="{Binding OffsetYMsg}" Style="{StaticResource RawTextBlock}"/>
+            <TextBlock Text="{Binding OffsetYMsg}"/>
-                <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetY}" 
+            <EgtWpfLib5:EgtTextBox Text="{Binding PhotoOffsetY}" 
-                                   Margin="0,0,0,5"
+                                   Margin="13,0,0,5"
                                    TextAlignment="Right"/>
-                <TextBlock Text="{Binding PhotoRotMsg}" Style="{StaticResource RawTextBlock}"/>
+            <TextBlock Text="{Binding PhotoRotMsg}"/>
-                <EgtWpfLib5:EgtTextBox Text="{Binding PhotoRot}"
+            <EgtWpfLib5:EgtTextBox Text="{Binding PhotoRot}"
-                                      Margin="0,0,0,5"
+                                      Margin="13,0,0,5"
                                       TextAlignment="Right"/>
-            </UniformGrid>
+         </UniformGrid>
-        </GroupBox>
+      </StackPanel>
-    </StackPanel>
+   </Border>
 
-    <!-- Definizione della Grid per il materiale -->
+   <!-- Definizione della Grid per il materiale -->
-    <GroupBox Header="{Binding MaterialMsg}" Style="{StaticResource GroupBoxRow}">
+    <GroupBox Header="{Binding MaterialMsg}" Margin="0,0,0,5">
         <StackPanel>
             <Grid>
                 <Grid.RowDefinitions>
                     <RowDefinition Height="1*"/>
                     <RowDefinition Height="1*"/>
                 </Grid.RowDefinitions>
-                <ComboBox ItemsSource="{Binding MaterialList}"
+            <ComboBox ItemsSource="{Binding MaterialList}"
-                      Style="{DynamicResource Raw_ComboBox}"
+                DisplayMemberPath="sName"
-                      DisplayMemberPath="sName"
+                SelectedItem="{Binding SelMaterial}"/>
-                      SelectedItem="{Binding SelMaterial}">
+            <TextBlock Grid.Row="1"  Text="{Binding MaterialFromDB}"
-                    <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>
 
-    <Button Content="{Binding CurrMachMsg}"
+   <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}"
            Command="{Binding CurrMachCommand}"
            Background="{Binding CurrMach_Background}"
            Style="{StaticResource OptionPanel_TextButton}"
-           Margin="0,5,0,0"/>
+           Margin="0,0,0,5"/>
 
-    <GroupBox Header="Definizion grezzo" Style="{StaticResource GroupBoxRow}">
+   <UniformGrid Columns="2" Margin="0,0,0,5">
-        <StackPanel>
 
-            <UniformGrid Columns="2" Margin="0,0,0,5">
+      <RadioButton Content="{Binding OutlineMsg}"
-
-                <RadioButton Content="{Binding OutlineMsg}"
                    Style="{StaticResource OptionPanel_ToggleButton}"
                    IsChecked="{Binding OutlineIsChecked}"
-                   Margin="0,0,1,0">
+                   Margin="0,0,2.5,0">
-                </RadioButton>
+      </RadioButton>
-                <RadioButton Content="{Binding DamagedAreaMsg}"
+      <RadioButton Content="{Binding DamagedAreaMsg}"
                    Style="{StaticResource OptionPanel_ToggleButton}"
                    IsChecked="{Binding DAIsChecked}"
-                   Margin="1,0,0,0">
+                   Margin="2.5,0,0,0">
-                </RadioButton>
+      </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"/>
 
-                    </Style>
+   <!-- Definizione della Grid per definizione grezzo -->
-                </ComboBox.ItemContainerStyle>
+   <UniformGrid Columns="2" Rows="5" Margin="0,0,0,0">
-            </ComboBox>
 
-            <!-- Definizione della Grid per definizione grezzo -->
+      <TextBlock Text="{Binding LengthMsg}"/>
-            <UniformGrid Columns="2" Rows="6" Margin="0,0,0,0">
+      <EgtWpfLib5:EgtTextBox Text="{Binding Length}"
-
+                             Margin="13,0,0,5"
-                <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}" Style="{StaticResource RawTextBlock}"/>
+      <TextBlock Text="{Binding WidthMsg}"/>
-                <EgtWpfLib5:EgtTextBox Text="{Binding Width}"
+      <EgtWpfLib5:EgtTextBox Text="{Binding Width}"
-                             Margin="0,0,0,5"
+                             Margin="13,0,0,5"
                              IsEnabled="{Binding WidthIsEnabled}" TextAlignment="Right"/>
-                <TextBlock Text="{Binding HeightMsg}" Style="{StaticResource RawTextBlock}"/>
+      <TextBlock Text="{Binding OffsetXMsg}"/>
-                <EgtWpfLib5:EgtTextBox Text="{Binding Height}"
+      <EgtWpfLib5:EgtTextBox Text="{Binding OffsetX}"
-                             Margin="0,0,0,5"
+                             Margin="13,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}" Style="{StaticResource RawTextBlock}"/>
+      <TextBlock Text="{Binding OffsetYMsg}"/>
-                <EgtWpfLib5:EgtTextBox Text="{Binding OffsetY}" 
+      <EgtWpfLib5:EgtTextBox Text="{Binding OffsetY}" 
-                             Margin="0,0,0,5"
+                             Margin="13,0,0,5"
                              IsEnabled="{Binding OffsetYIsEnabled}" TextAlignment="Right"/>
-                <TextBlock Text="{Binding KerfMsg}" Style="{StaticResource RawTextBlock}"/>
+      <TextBlock Text="{Binding KerfMsg}"/>
-                <EgtWpfLib5:EgtTextBox Text="{Binding Kerf, UpdateSourceTrigger=PropertyChanged}"
+      <EgtWpfLib5:EgtTextBox Text="{Binding Kerf, UpdateSourceTrigger=PropertyChanged}"
-                             Margin="0,0,0,5"
+                             Margin="13,0,0,5"
                              IsEnabled="{Binding KerfIsEnabled}" TextAlignment="Right"/>
 
-            </UniformGrid>
+   </UniformGrid>
 
-        </StackPanel>
+   <!-- Definizione della Grid per Punti -->
-    </GroupBox>
+   <GroupBox Header="{Binding PointsMsg}" Margin="0,0,0,5"
-    <!-- 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 -->
+   <!-- Definizione della Grid per Zona rovinata -->
-    <GroupBox Header="{Binding DamagedAreaMsg}" Style="{StaticResource GroupBoxRow}"
+   <GroupBox Header="{Binding DamagedAreaMsg}" Margin="0,0,0,5"
              Visibility="{Binding DAVisibility}">
 
-        <Grid>
+      <Grid>
-            <Grid.ColumnDefinitions>
+         <Grid.ColumnDefinitions>
-                <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
-                <ColumnDefinition Width="1*"/>
+            <ColumnDefinition Width="1*"/>
-            </Grid.ColumnDefinitions>
+         </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>
 
-        </Grid>
+   </GroupBox>
-
-    </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}"
@@ -224,5 +183,5 @@
            Margin="0,0,0,5"/>
 
    <!--<EgtPHOTOLib:ProjectSlabV DataContext="{StaticResource ProjectSlabVM}"/>-->
-
+   
 </StackPanel>

OptionPanel/RawPartTab/RawPartTabV.xaml.vb

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

OptionPanel/RawPartTab/RawPartTabVM.vb

@@ -42,17 +42,6 @@ Public Class RawPartTabVM
    ' Layer per crocette temporanee
    Private m_nTempLay As Integer = GDB_ID.NULL
 
-   ' Layer per crocette dei punti REG
-   Friend 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
@@ -354,11 +343,9 @@ 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
@@ -754,73 +741,6 @@ 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
@@ -904,7 +824,7 @@ Public Class RawPartTabVM
       End Set
    End Property
 
-   Private m_CurrMach_Background As Brush = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
+   Private m_CurrMach_Background As Brush = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
    Public Property CurrMach_Background As Brush
       Get
          Return m_CurrMach_Background
@@ -1023,12 +943,6 @@ Public Class RawPartTabVM
       End Get
    End Property
 
-   Public ReadOnly Property ModMsg As String
-      Get
-         Return EgtMsg(91668)
-      End Get
-   End Property
-
    Public ReadOnly Property NewMsg As String
       Get
          Return EgtMsg(MSG_RAWPARTPAGEUC + 11)
@@ -1053,12 +967,6 @@ Public Class RawPartTabVM
       End Get
    End Property
 
-   Public ReadOnly Property PointsRegMsg As String
-      Get
-         Return EgtMsg(91669)
-      End Get
-   End Property
-
 #End Region    ' Messages
 
 #Region "ToolTip"
@@ -1069,12 +977,6 @@ Public Class RawPartTabVM
       End Get
    End Property
 
-   Public ReadOnly Property MovePhotoToolTip As String
-      Get
-         Return EgtMsg(MSG_RAWPARTTAB + 3)
-      End Get
-   End Property
-
 #End Region    ' ToolTip
 
    ' Definizione comandi
@@ -1091,12 +993,9 @@ Public Class RawPartTabVM
       ' Creo riferimento a questa classe in OmagOFFICEMap
       OmagOFFICEMap.SetRefRawPartTabVM(Me)
       If OmagOFFICEMap.refMainWindowVM.MainWindowM.m_SlabDB Then
-         ' Me.OmagPhoto = New OmagPhotoV(Application.Current.MainWindow())
+         'Me.OmagPhoto = New OmagPhotoV(Application.Current.MainWindow(), New OmagPhotoVM)
          Me.OmagPhoto = New OmagPhotoV
-         If Not PhotoMap.ContinueApplication Then
+         If Not PhotoMap.ContinueApplication Then End
-            EgtOutLog("Key protection denied to acces to DB photo, set configuration to image directory")
-            End
-         End If
       End If
       ' Aggiungo voci alla lista di tipi di definizione grezzo
       m_TypeList.Add(EgtMsg(MSG_RAWPARTPAGEUC + 1))
@@ -1110,8 +1009,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)
+      Dim bSlabId As Boolean = ( GetMainPrivateProfileInt( S_RAWPART, K_SLABID, 0) <> 0)
-      SlabIdVisibility = If(bSlabId, Windows.Visibility.Visible, Windows.Visibility.Hidden)
+      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)
@@ -1193,26 +1092,10 @@ 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
@@ -1294,8 +1177,6 @@ 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
@@ -1429,7 +1310,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
@@ -1493,6 +1374,7 @@ 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)
@@ -1531,7 +1413,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
@@ -1552,7 +1434,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()
@@ -1586,7 +1468,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
@@ -1694,10 +1576,6 @@ 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
@@ -1953,110 +1831,6 @@ 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
-
-   Friend Sub MoveAllSpotRegistration(vtMove As Vector3d, Optional bOnlyOfficeSpot As Boolean = True)
-      Dim nId As Integer = EgtGetFirstInGroup(OmagOFFICEMap.refRawPartTabVM.m_nRegGroupId)
-      While nId <> GDB_ID.NULL
-         Dim sName As String = String.Empty
-         EgtGetName(nId, sName)
-         If Not sName.Contains("CUT") Or Not bOnlyOfficeSpot Then
-            EgtMove(nId, vtMove)
-         End If
-         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
@@ -2107,7 +1881,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("#1C1D22"), SolidColorBrush)
+         CurrMach_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
       Else
          OmagOFFICEMap.refOptionPanelVM.NestTabIsEnabled = False
          OmagOFFICEMap.refOptionPanelVM.MachTabIsEnabled = False
@@ -2118,7 +1892,7 @@ Public Class RawPartTabVM
       If Not ValidateCurrMachToolIsInSetUp() Then
          OmagOFFICEMap.refMachinePanelVM.SetUp_Background = Brushes.Red
       Else
-         OmagOFFICEMap.refMachinePanelVM.SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#1C1D22"), SolidColorBrush)
+         OmagOFFICEMap.refMachinePanelVM.SetUp_Background = DirectCast(New BrushConverter().ConvertFrom("#FFDDDDDD"), SolidColorBrush)
       End If
       If String.IsNullOrWhiteSpace(CurrentMachine.sCurrSawing) And String.IsNullOrWhiteSpace(CurrentMachine.sCurrWaterJetting) Then
          CurrMach_Background = Brushes.Red
@@ -2171,32 +1945,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_BLOCK, sBlockName)
-      EgtGetInfo(nRawId, INFO_RAW_SLABNBR, sSlabNbr)
+      EgtGetInfo( nRawId, INFO_RAW_SLABNBR, sSlabNbr)
-      DlgSlabIdVM.SetData(sBlockName, 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_BLOCK, sBlockName)
-         EgtSetInfo(nRawId, INFO_RAW_SLABNBR, sSlabNbr)
+         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
@@ -2262,13 +2036,6 @@ Public Class RawPartTabVM
          PhotoMap.refSearchPanelVM.InitSearchPanel()
          ' inizializzo la ricerca a tutti le lastre di tipo "AVAILABLE" (=1)
          PhotoMap.refSearchPanelVM.State = 1
-
-         ' Resetto la data corrente per la prima ricerca 
-         PhotoMap.refSearchPanelVM.StartAddedDate = Nothing
-         PhotoMap.refSearchPanelVM.NotifyPropertyChanged("StartAddedDate")
-         PhotoMap.refSearchPanelVM.EndAddedDate = Nothing
-         PhotoMap.refSearchPanelVM.NotifyPropertyChanged("EndAddedDate")
-
          PhotoMap.refSearchPanelVM.Search()
          ' inserisco in elenco solo i materiali della macchina corrente
          AddHandler PhotoMap.refOptionPanelVM.SlabIsSelectedOFFICE, AddressOf OmagOFFICEMap.refRawPartTabVM.ClosePhotoWnd
@@ -2278,9 +2045,10 @@ Public Class RawPartTabVM
          m_RefreshTimer.Interval = TimeSpan.FromMilliseconds(2000)
          m_RefreshTimer.Start()
 
-         ' apro la finestra per accedere al DB delle lastre (Devo crea una nuova istanza perchè la chiusura elimina la stessa)
+         ' apro la finestra per accedere al DB delle lastre
          Me.OmagPhoto = New OmagPhotoV
-         Me.OmagPhoto.ShowDialog()
+         OmagPhoto.ShowDialog()
+
          m_RefreshTimer.Stop()
 
          EgtSetCurrentContext(EgtPHOTOLib.MainData.PreviousContext)
@@ -2318,17 +2086,6 @@ Public Class RawPartTabVM
          ' aggiungo la nuova lastra
          OmagOFFICEMap.refMachGroupPanelVM.SlabNameListCurr.Add(sSlabNameDB)
          EgtPHOTOLib.PhotoMap.refOptionPanelVM.SetAssignedSlab(sSlabNameDB)
-
-         ' Provo ad assegnare il nome della macchinata
-         Dim sName As String = LocalSlab.Id
-         EgtGetMachGroupNewName(sName)
-         If sName <> LocalSlab.Id Then
-            EgtOutLog("Nome lastra (Id lastra) già presente nell'elenco delle macchinate correnti!")
-         Else
-            OmagOFFICEMap.refMachGroupPanelVM.SelectedMachGroup.SetName(LocalSlab.Id)
-            EgtChangeMachGroupName(EgtGetCurrMachGroup, LocalSlab.Id)
-         End If
-
       Else
          ' Apro dialogo per scelta immagine
          Dim PhotoDlg As New Microsoft.Win32.OpenFileDialog()
@@ -2384,7 +2141,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
@@ -2470,52 +2227,6 @@ 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
@@ -2666,8 +2377,6 @@ 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,32 +3,31 @@
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Margin="5,5,5,0">
 
-    <GroupBox Header="{Binding MachViewMsg}" Style="{StaticResource GroupBoxRow}">
+   <GroupBox Header="{Binding MachViewMsg}" Margin="0,0,0,5">
       <UniformGrid Columns="3">
          
          <Button Command="{Binding ToolModeCommand}"
-                 Style="{StaticResource Simul_Button_Img}">
+                 Style="{StaticResource OptionPanel_NestingButton}">
             <Image Source="/Resources/SimulTab/ToolMode.png" Stretch="Uniform"/>
          </Button>
-            <Button Command="{Binding HeadModeCommand}"
+         <Button Command="{Binding HeadModeCommand}"
-                 Style="{StaticResource Simul_Button_Img}">
+                 Style="{StaticResource OptionPanel_NestingButton}">
             <Image Source="/Resources/SimulTab/HeadMode.png" Stretch="Uniform"/>
          </Button>
          <Button Command="{Binding MachModeCommand}"
-                 Style="{StaticResource Simul_Button_Img}">
+                 Style="{StaticResource OptionPanel_NestingButton}">
             <Image Source="/Resources/SimulTab/MachMode.png" Stretch="Uniform"/>
          </Button>
          
       </UniformGrid>     
    </GroupBox>
 
-    <Border Style="{StaticResource Border}" Margin="0,5,0,0">
+    <GroupBox BorderThickness="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 Simul_Button_Img}"
+                        Style="{StaticResource OptionPanel_NestingButton}"
                         ToolTip="{Binding OneStepToolTip}" Margin="0,0,2.5,0">
                    <Image Source="/Resources/SimulTab/PlayStep.png"
                           HorizontalAlignment="Center" VerticalAlignment="Center"
@@ -36,14 +35,14 @@
                 </Button>
              
                 <Button Command="{Binding PlayPauseCommand}" Grid.Column="1" Grid.Row="3"
-                        Style="{StaticResource Simul_Button_Img}"
+                        Style="{StaticResource OptionPanel_NestingButton}"
                         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 Simul_Button_Img}"
+                        Style="{StaticResource OptionPanel_NestingButton}"
                         ToolTip="{Binding StopHomeToolTip}" Margin="2.5,0,0,0">
                 <Image Source="/Resources/SimulTab/Stop.png"
                        HorizontalAlignment="Center" VerticalAlignment="Center"
@@ -51,41 +50,35 @@
                 </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" 
+             		VerticalAlignment="Center" TextAlignment="Right" Margin="0,5,5,5" />
-                           Style="{StaticResource SimulTextBlock}"/>
+             
-
+             </Grid>
-            </Grid>
+             
-
+             <ItemsControl ItemsSource="{Binding MachineAxisList}" Margin="0,0,0,5">
-            <ItemsControl ItemsSource="{Binding MachineAxisList}" Margin="0,0,0,5">
                 <ItemsControl.ItemTemplate>
                    <DataTemplate>
                       <Grid Margin="0,0,0,5">
@@ -96,12 +89,11 @@
              
                          <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}"
-                                  Style="{StaticResource AxisTextBox}">
+                                  TextAlignment="Right">
                             <TextBox.InputBindings>
                                <KeyBinding Key="Enter" Command="{Binding ManualAxisModifyCommand}"/>
                             </TextBox.InputBindings>
@@ -112,9 +104,10 @@
                 </ItemsControl.ItemTemplate>
              </ItemsControl>
         </StackPanel>
-    </Border>
+    </GroupBox>
 
-    <GroupBox Header="{Binding EstimationMsg}" Style="{StaticResource GroupBoxRow}"
+    <GroupBox Header="{Binding EstimationMsg}"
+              IsEnabled="{Binding Estimation_IsEnabled}"
               DataContext="{Binding MyEstim}">
 
       <StackPanel Margin="2,2,2,0">
@@ -123,7 +116,8 @@
 
             <TextBlock Text="{Binding TimeMsg}"/>
             <TextBox Text="{Binding Time, Mode=OneWay}"
-                        Style="{StaticResource EstimateTextBox}"/>
+                        IsReadOnly="True"
+                        TextAlignment="Right"/>
 
          </UniformGrid>
 
@@ -131,25 +125,28 @@
 
             <TextBlock Text="{Binding CutLenMsg}"/>
             <TextBox Text="{Binding CutLen, Mode=OneWay}"
-                        Style="{StaticResource EstimateTextBox}"/>
+                        IsReadOnly="True"
+                        TextAlignment="Right"/>
 
          </UniformGrid>
          <UniformGrid Columns="2" Margin="0,0,0,5">
 
             <TextBlock Text="{Binding NetAreaMsg}"/>
             <TextBox Text="{Binding NetArea, Mode=OneWay}"
-                        Style="{StaticResource EstimateTextBox}"/>
+                        IsReadOnly="True"
+                        TextAlignment="Right"/>
 
          </UniformGrid>
          <UniformGrid Columns="2" Margin="0,0,0,5">
 
             <TextBlock Text="{Binding UsageMsg}"/>
             <TextBox Text="{Binding Usage, Mode=OneWay}"
-                     Style="{StaticResource EstimateTextBox}"/>
+                        IsReadOnly="True"
+                        TextAlignment="Right"/>
 
          </UniformGrid>
 
-            <Button Content="{Binding DetailsMsg}" Style="{StaticResource SimulPanel_TextButton}"
+         <Button Content="{Binding DetailsMsg}" Height="30"
                     Command="{Binding Details_Command}"
                     Margin="0,0,0,2"/>
 

OptionPanel/SimulTab/SimulTabVM.vb

@@ -17,13 +17,7 @@ Public Class SimulTabVM
 
    Public ReadOnly Property MachViewMsg As String
       Get
-         Return EgtMsg(91667)
+         Return "Vista macchina"
-      End Get
-   End Property
-
-   Public ReadOnly Property EstimationMsg As String
-      Get
-         Return EgtMsg(91668)
       End Get
    End Property
 
@@ -143,10 +137,10 @@ Public Class SimulTabVM
          MyEstim.Estimation_IsEnabled = False
       End If
       ' Impostazioni box stime
-      MyEstim.NotifyPropertyChanged("Time")
+      NotifyPropertyChanged("Time")
-      MyEstim.NotifyPropertyChanged("CutLen")
+      NotifyPropertyChanged("CutLen")
-      MyEstim.NotifyPropertyChanged("NetArea")
+      NotifyPropertyChanged("NetArea")
-      MyEstim.NotifyPropertyChanged("Usage")
+      NotifyPropertyChanged("Usage")
       ' Nascondo eventuali pezzi in parcheggio
       HideParkedParts()
       ' Nascondo eventuale contorno da foto

OptionWindow/OptionWindowV.xaml

@@ -21,11 +21,9 @@
         </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"/>
@@ -33,25 +31,20 @@
       </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>
@@ -70,8 +63,7 @@
       </GroupBox>
 
         <GroupBox Header="{Binding TextColorMsg}"
-                  Style="{StaticResource GroupBoxOptionWnd}"
+                Grid.Column="1" Grid.Row="1" Margin="0,0,5,5">
-                  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>
@@ -79,7 +71,6 @@
 
        <!--SideAngle from color-->
         <GroupBox Name="ColorToSideAngGpBx" Header="{Binding ColorToSideAngMsg}"
-                  Style="{StaticResource GroupBoxOptionWnd}"
                   Grid.Column="0" Grid.Row="3" Margin="0,0,5,5" >
 
             <Grid>
@@ -155,7 +146,6 @@
 
        <!--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,66 +1,35 @@
-<DockPanel x:Class="ProjectV"
+<EgtFloating:EgtFloatingManager 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"
+   xmlns:OmagOFFICE="clr-namespace:OmagOFFICE">
-   Background="{StaticResource Omag_DarkGray}">
+      
-
+   <EgtFloating:EgtFloatingTray x:Name="LEFTTRAY" DockPanel.Dock="Left">
-    <DockPanel x:Name="LEFTTRAY" DockPanel.Dock="Left" Background="Transparent">
+      <OmagOFFICE:OptionPanelV DataContext="{StaticResource OptionPanelVM}"
-        <OmagOFFICE:OptionPanelV DataContext="{StaticResource OptionPanelVM}"
                                Height="{Binding MaxHeight,ElementName=LEFTTRAY}"/>
-    </DockPanel>
+   </EgtFloating:EgtFloatingTray>
-
+   
-    <DockPanel x:Name="TOPTRAY" DockPanel.Dock="Top" Background="Transparent">
+   <EgtFloating:EgtFloatingTray x:Name="TOPTRAY" DockPanel.Dock="Top">
-        <!--<StackPanel Orientation="Horizontal" HorizontalAlignment="Right" Width="{Binding}">-->
+      <OmagOFFICE:ShowPanelV DataContext="{StaticResource ShowPanelVM}"/>
-        <!--<DockPanel>
+      <OmagOFFICE:ViewPanelV DataContext="{StaticResource ViewPanelVM}"/>
-            <OmagOFFICE:MachinePanelV DataContext="{StaticResource MachinePanelVM}" DockPanel.Dock="Left"/>
+      <OmagOFFICE:InstrumentPanelV DataContext="{StaticResource InstrumentPanelVM}"/>
-            <OmagOFFICE:VeinMatchPanelV DataContext="{StaticResource VeinMatchPanelVM}" />
+      <OmagOFFICE:VeinMatchPanelV DataContext="{StaticResource VeinMatchPanelVM}"/>
-            <OmagOFFICE:PrintPanelV DataContext="{StaticResource PrintPanelVM}" />
+      <OmagOFFICE:MachinePanelV DataContext="{StaticResource MachinePanelVM}"/>
-            <OmagOFFICE:ShowPanelV DataContext="{StaticResource ShowPanelVM}" DockPanel.Dock="Right"/>
+   </EgtFloating:EgtFloatingTray>
-            <OmagOFFICE:ViewPanelV DataContext="{StaticResource ViewPanelVM}" DockPanel.Dock="Right"/>
+   
-            <OmagOFFICE:InstrumentPanelV DataContext="{StaticResource InstrumentPanelVM}" DockPanel.Dock="Right"/>
+   <EgtFloating:EgtFloatingTray x:Name="BOTTOMTRAY" DockPanel.Dock="Bottom">
-        </DockPanel>-->
+      <EgtWPFLib5:EgtMachGroupPanelV DataContext="{StaticResource MachGroupPanelVM}"
-        <Grid>
+                                     Background="{StaticResource Omag_Gray}"
-            <Grid.ColumnDefinitions>
+                                     BorderBrush="{StaticResource Omag_Gray}"
-                <ColumnDefinition Width="7*"/>
-                <ColumnDefinition Width="1*"/>
-                <ColumnDefinition Width="1*"/>
-                <ColumnDefinition Width="19.75*"/>
-                <ColumnDefinition Width="7*"/>
-                <ColumnDefinition Width="3*"/>
-                <ColumnDefinition Width="1*"/>
-                <ColumnDefinition Width="0.25*"/>
-            </Grid.ColumnDefinitions>
-            <OmagOFFICE:MachinePanelV Grid.Column="0" DataContext="{StaticResource MachinePanelVM}"/>
-            <OmagOFFICE:VeinMatchPanelV Grid.Column="1" DataContext="{StaticResource VeinMatchPanelVM}"/>
-            <OmagOFFICE:PrintPanelV Grid.Column="2" DataContext="{StaticResource PrintPanelVM}"/>
-            <OmagOFFICE:ShowPanelV Grid.Column="5" DataContext="{StaticResource ShowPanelVM}"/>
-            <OmagOFFICE:ViewPanelV Grid.Column="4" DataContext="{StaticResource ViewPanelVM}"/>
-            <OmagOFFICE:InstrumentPanelV  Grid.Column="6" DataContext="{StaticResource InstrumentPanelVM}"/>
-        </Grid>
-        <!--<OmagOFFICE:MachinePanelV DataContext="{StaticResource MachinePanelVM}"/>
-            <OmagOFFICE:VeinMatchPanelV DataContext="{StaticResource VeinMatchPanelVM}"/>
-        <OmagOFFICE:PrintPanelV DataContext="{StaticResource PrintPanelVM}"/>
-            <OmagOFFICE:ShowPanelV DataContext="{StaticResource ShowPanelVM}"/>
-            <OmagOFFICE:ViewPanelV DataContext="{StaticResource ViewPanelVM}"/>
-            <OmagOFFICE:InstrumentPanelV DataContext="{StaticResource InstrumentPanelVM}"/>-->
-        <!--</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="false" IsLeftDockable="False"
+                                     IsTopDockable="False" IsBottomDockable="True" IsLeftDockable="False"
-                                     IsRightDockable="False"/>-->
+                                     IsRightDockable="False"/>
-        </StackPanel>
+   </EgtFloating:EgtFloatingTray>
-    </DockPanel>
+   
-
+   <!--Scena restituita sotto forma di WindowsFormsHost-->
-    <OmagOFFICE:SceneHostV />
+   <OmagOFFICE:SceneHostV/>
-
+      
-</DockPanel>
+</EgtFloating:EgtFloatingManager>

Project/ProjectV.xaml.vb

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