Merge remote-tracking branch 'origin/master' into feature/Note_Utensile

2024-07-30 10:21:32 +02:00 · 2024-07-23 10:06:55 +02:00
71 changed files with 975 additions and 3115 deletions
@@ -69,7 +69,6 @@ Module ConstIni
   Public Const K_SHOWGFRAME As String = "ShowGFrame"
   Public Const K_LINEWIDTH As String = "LineWidth"
   Public Const K_MARK As String = "Mark"
-   Public Const K_MARK2 As String = "Mark2"
   Public Const K_SELSURF As String = "SelSurf"
   Public Const K_SHOWMODE As String = "ShowMode"
   Public Const K_CURVEDIR As String = "CurveDir"
@@ -184,7 +183,6 @@ Module ConstIni
   Public Const K_SELGEOMSURFFINISHING As String = "SelGeomSurfFinishing"
   Public Const K_SELGEOMSURFROUGHING As String = "SelGeomSurfRoughing"
   Public Const K_SELGEOMFIVEAXMILLING As String = "SelGeomFiveAxMilling"
-   Public Const K_SELVMILLQUALITY As String = "VMillQuality"
   Public Const K_MACHININGGROUP As String = "MachiningGroup"
   Public Const K_SHOWONLYTABLE As String = "ShowOnlyTable"
   Public Const K_MOVETHROUGHDISPS As String = "MoveThroughDisps"
@@ -9,157 +9,90 @@

   <StackPanel Background="Transparent" MaxHeight="{Binding MaxHeight,RelativeSource={RelativeSource AncestorType={x:Type EgtFloating:EgtFloatingPanel}}}">
      <Expander Name="Draw2D" Style="{StaticResource ExpanderStyle}" Grid.Row="0"
-                IsExpanded="{Binding Draw2DIsExpanded}">
+         IsExpanded="{Binding Draw2DIsExpanded}">
         <Expander.Header>
            <TextBlock Text="{Binding Draw2DMsg}"/>
         </Expander.Header>
         <UniformGrid Columns="3">
-            <Button x:Name="PuntoBtn" ToolTip="Punto" Style="{StaticResource DrawPanelButton}"
-                    Command="{Binding PointBaseCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/Point+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Vettore" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding PointVectorCommand}">
-                        <Image Source="/Resources/DrawPanel/Point.png" Stretch="Uniform"/>
-                     </Button>
-                     <Button ToolTip="Riferimento" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding PointReferenceCommand}">
-                        <Image Source="/Resources/DrawPanel/Point.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding PointToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding PointCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/Point.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Linea 2 Punti" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding Line2PBaseCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/Line2P+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Linea 2 Punti con Continuazione" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding Line2PContinuationCommand}">
-                        <Image Source="/Resources/DrawPanel/Line2P.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding Line2PToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding Line2PCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/Line2P.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Linea Punto Direzione Lunghezza" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding LinePDLBaseCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/LinePDL+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Linea Punto Vettore Direzione Lunghezza" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding LinePDLVectorCommand}">
-                        <Image Source="/Resources/DrawPanel/Line2P.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding LinePDLToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding LinePDLCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/LinePDL.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ArcCSEToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ArcCSECommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ArcCSECommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/ArcCSE.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding Arc3PToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding Arc3PCommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding Arc3PCommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/Arc3P.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Arco " Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ArcPDPCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/ArcPDP+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Linea Punto Vettore Direzione Lunghezza" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding LinePDLVectorCommand}">
-                        <Image Source="/Resources/DrawPanel/ArcPDP.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding ArcPDPToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ArcPDPCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/ArcPDP.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding CirclePDToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding CircleCPCommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding CircleCPCommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/CircleCP.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding Circle3PToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding Circle3PCommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding Circle3PCommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/Circle3P.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding CircleCDToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding CircleCDCommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding CircleCDCommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/CircleCD.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding Rectangle2PToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding Rectangle2PCommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding Rectangle2PCommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/Rectangle2P.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding PolygonToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding PolygonCommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding PolygonCommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/Polygon.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding PolygonSideToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding PolygonSideCommand}" IsEnabled="{Binding bLayerOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding PolygonSideCommand}" IsEnabled="{Binding bLayerOk}">
               <Image Source="/Resources/DrawPanel/PolygonSide.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Quota Lineare" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding LinearDimensionBaseCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/LinearDimension+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Quota Allineata" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding AlignedDimensionCommand}">
-                        <Image Source="/Resources/DrawPanel/LinearDimension.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding LinearDimensionToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding LinearDimensionCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/LinearDimension.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Quota Angolare" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding AngularDimensionBaseCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/AngularDimension +.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Quota Angolare Avanzata" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding AlignedDimensionPlusCommand}">
-                        <Image Source="/Resources/DrawPanel/AngularDimension.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding AngularDimensionToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding AngularDimensionCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/AngularDimension.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Quota Diametrale" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding DiamDimensionCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/DiametralDimension+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Quota Radiale" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding RadDimensionCommand}">
-                        <Image Source="/Resources/DrawPanel/DiametralDimension.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding DiamRadDimensionToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding DiamRadDimensionCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/DiametralDimension.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Testo" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding TextBaseCommand}" IsEnabled="{Binding bLayerOk}">
-               <Image Source="/Resources/DrawPanel/Text+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Testo Avanzato" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding TextPlusCommand}">
-                        <Image Source="/Resources/DrawPanel/TextA.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding TextToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding TextCommand}" IsEnabled="{Binding bLayerOk}">
+               <Image Source="/Resources/DrawPanel/Text.png" Stretch="Uniform"/>
            </Button>
         </UniformGrid>
      </Expander>
@@ -169,135 +102,95 @@
            <TextBlock Text="{Binding Draw3DMsg}"/>
         </Expander.Header>
         <UniformGrid Columns="3">
-            <Button ToolTip="Piano Contornato" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding FloorCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
-               <Image Source="/Resources/DrawPanel/Plane+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Regione Piana" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding RegionCommand}">
-                        <Image Source="/Resources/DrawPanel/Plane.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding PlaneToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding PlaneCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
+               <Image Source="/Resources/DrawPanel/Plane.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ExtrudeToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ExtrudeCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ExtrudeCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
               <Image Source="/Resources/DrawPanel/Extrude.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding RevolveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding RevolveCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding RevolveCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
               <Image Source="/Resources/DrawPanel/Revolve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ScrewToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ScrewCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ScrewCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
               <Image Source="/Resources/DrawPanel/Screw.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding SweptToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding SweptCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding SweptCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
               <Image Source="/Resources/DrawPanel/Swept.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding RuledToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding RuledCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding RuledCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
               <Image Source="/Resources/DrawPanel/Ruled.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding SolidAddSurfToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding SolidAddSurfCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding SolidAddSurfCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/SolidAddSurf.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Sottrai Superfici e Regioni Piane" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding SubtractSurfacesCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/SolidSubtractSurf+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Taglia Superficie con Superficie Inversa" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding CutSurfacesCommand}">
-                        <Image Source="/Resources/DrawPanel/SolidSubtractSurf.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding SolidSubtractSurfToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding SolidSubtractSurfCommand}" IsEnabled="{Binding bSelOk}">
+               <Image Source="/Resources/DrawPanel/SolidSubtractSurf.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Interseca Superfici e Regioni Piane" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding IntersectSurfCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/SolidIntersectSurf+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Taglia Superficie con Superficie" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding CutSurfCommand}">
-                        <Image Source="/Resources/DrawPanel/SolidIntersectSurf.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding SolidIntersectSurfToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding SolidIntersectSurfCommand}" IsEnabled="{Binding bSelOk}">
+               <Image Source="/Resources/DrawPanel/SolidIntersectSurf.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding IntersectSurfSurfToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding IntersectSurfSurfCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding IntersectSurfSurfCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/IntersectSurfSurf.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ExtractLoopsToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ExtractLoopsCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ExtractLoopsCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ExtractLoops.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ExtractFacetLoopsToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ExtractFacetLoopsCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ExtractFacetLoopsCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ExtractFacetLoops.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Esplodi Superfici e Regioni Piane" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ExplodeSurfaceCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/ExplodeSurf+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Esplodi Superfici Mesh in Triangoli" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding ExplodeSurfaceMeshCommand}">
-                        <Image Source="/Resources/DrawPanel/ExplodeSurf.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding ExplodeSurfToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ExplodeSurfCommand}" IsEnabled="{Binding bSelOk}">
+               <Image Source="/Resources/DrawPanel/ExplodeSurf.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ExtractSurfFacetToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ExtractSurfFacetCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ExtractSurfFacetCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ExtractSurfFacet.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding MergeSurfToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding MergeSurfCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding MergeSurfCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/MergeSurf.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding InvertSurfToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding InvertSurfCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding InvertSurfCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/InvertSurf.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ApproxSurfToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ApproxSurfCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ApproxSurfCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ApproxSurf.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Muovi Vertice di Superficie" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding MoveStmVertexCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/StmMoveVertex+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Muovi Faccia di Superficie" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding MoveStmFacetCommand}">
-                        <Image Source="/Resources/DrawPanel/StmMoveVertex.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding StmMoveVertexFacetToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding MoveStmVertexFacetCommand}" IsEnabled="{Binding bSelOk}">
+               <Image Source="/Resources/DrawPanel/StmMoveVertex.png" Stretch="Uniform"/>
            </Button>
         </UniformGrid>
      </Expander>
@@ -307,22 +200,14 @@
         </Expander.Header>
         <UniformGrid Columns="3">
            <Button ToolTip="{Binding DeleteToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding DeleteCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding DeleteCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Delete.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Cambia Layer" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ChangeLayerBaseCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/ChangeLayer+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Cambia Layer con Trasformazioni" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding ChangeLayerTrasfCommand}">
-                        <Image Source="/Resources/DrawPanel/ChangeLayer.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding ChangeLayerToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ChangeLayerCommand}" IsEnabled="{Binding bSelOk}">
+               <Image Source="/Resources/DrawPanel/ChangeLayer.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ChangeStatusToolTip}" Style="{StaticResource DrawPanelButton}"
               ToolTipService.ShowOnDisabled="True"
@@ -330,159 +215,108 @@
               <Image Source="/Resources/DrawPanel/ChangeStatus.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ChangeColorToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ChangeColorCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ChangeColorCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ChangeColor.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ChangeAlphaToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ChangeAlphaCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ChangeAlphaCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ChangeColorAlpha.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ResetColorToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ResetColorCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ResetColorCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/RemoveColor.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding InvertCurveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding InvertCurveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding InvertCurveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/InvertCurve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ChangeStartToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ChangeStartCurveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ChangeStartCurveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ChangeStart.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ThickCurveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True" 
-                    Command="{Binding SetCurveThCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True" 
+               Command="{Binding SetCurveThCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ThickCurve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ExtendCurveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ExtendCurveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ExtendCurveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ExtendCurve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding BreakCurveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding BreakCurveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding BreakCurveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/BreakCurve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding SplitCurveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding SplitCurveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding SplitCurveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/SplitCurve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ExplodeCurveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ExplodeCurveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ExplodeCurveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ExplodeCurve.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Unisci Curve" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding JoinCurveBasCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
-               <Image Source="/Resources/DrawPanel/JoinCurve+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Unisci Curve creando una Copia" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding JoinCurveCopyCommand}">
-                        <Image Source="/Resources/DrawPanel/JoinCurve.png" Stretch="Uniform"/>
-                     </Button>
-                     <Button ToolTip="Fondi Curve nella Composita" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding JoinCurveCompositeCommand}">
-                        <Image Source="/Resources/DrawPanel/JoinCurve.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding JoinCurveToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding JoinCurveCommand}" IsEnabled="{Binding bLayerOkAndSelOk}">
+               <Image Source="/Resources/DrawPanel/JoinCurve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding OffsetToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding OffsetCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding OffsetCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Offset.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding FilletToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding FilletCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding FilletCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Fillet.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ChamferToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ChamferCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ChamferCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Chamfer.png" Stretch="Uniform"/>
            </Button>
-            <Button ToolTip="Arco Capovolto" Style="{StaticResource DrawPanelButton}"
-                    Command="{Binding UpsideDownArchCommand}" ToolTipService.ShowOnDisabled="True" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/ArcFlip+.png" Stretch="Uniform"/>
-               <Button.ContextMenu >
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Arco Esplementare" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding ComplementaryArchCommand}">
-                        <Image Source="/Resources/DrawPanel/ArcFlip.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+            <Button ToolTip="{Binding ArcFlipToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ArcFlipCommand}" IsEnabled="{Binding bSelOk}">
+               <Image Source="/Resources/DrawPanel/ArcFlip.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ModifyCurveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ModifyCurveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ModifyCurveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ModifyCurve.png" Stretch="Uniform"/>
-            </Button>
-            <Button ToolTip="Aggiungi Punto" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding AddPointCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/AddPointCurve+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Trasforma in Arco" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding TrasformArcCommand}">
-                        <Image Source="/Resources/DrawPanel/AddPointCurve.png" Stretch="Uniform"/>
-                     </Button>
-                     <Button ToolTip="Chiudi Curva Composita" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding CloseCurveCommand}">
-                        <Image Source="/Resources/DrawPanel/AddPointCurve.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
-            </Button>
-            <Button ToolTip="Rimuovi Punto" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding RemoveCurveCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/RemovePointCurve+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Trasforma in Retta" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding TrasformRectCommand}">
-                        <Image Source="/Resources/DrawPanel/RemovePointCurve.png" Stretch="Uniform"/>
-                     </Button>
-                     <Button ToolTip="Apri Curva Composita" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding OpenCurveCommand}">
-                        <Image Source="/Resources/DrawPanel/RemovePointCurve.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
-            </Button>
-            <Button ToolTip="Approssima Curva" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ApproxCurveBaseCommand}" IsEnabled="{Binding bSelOk}">
-               <Image Source="/Resources/DrawPanel/ApproxCurve+.png" Stretch="Uniform"/>
-               <Button.ContextMenu>
-                  <ContextMenu Style="{StaticResource ContextMenu_Button}">
-                     <Button ToolTip="Approssima Curva con Linee" Style="{StaticResource DrawPanelButton}"
-                             Command="{Binding ApproxCurveLineCommand}">
-                        <Image Source="/Resources/DrawPanel/ApproxCurve.png" Stretch="Uniform"/>
-                     </Button>
-                  </ContextMenu>
-               </Button.ContextMenu>
+             </Button>
+             <Button ToolTip="{Binding AddPointCurveToolTip}" Style="{StaticResource DrawPanelButton}"
+                ToolTipService.ShowOnDisabled="True"
+                Command="{Binding AddPointCurveCommand}" IsEnabled="{Binding bSelOk}">
+                <Image Source="/Resources/DrawPanel/AddPointCurve.png" Stretch="Uniform"/>
+             </Button>
+             <Button ToolTip="{Binding RemovePointCurveToolTip}" Style="{StaticResource DrawPanelButton}"
+                ToolTipService.ShowOnDisabled="True"
+                Command="{Binding RemovePointCurveCommand}" IsEnabled="{Binding bSelOk}">
+                <Image Source="/Resources/DrawPanel/RemovePointCurve.png" Stretch="Uniform"/>
+             </Button>
+            <Button ToolTip="{Binding ApproxCurveToolTip}" Style="{StaticResource DrawPanelButton}"
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ApproxCurveCommand}" IsEnabled="{Binding bSelOk}">
+               <Image Source="/Resources/DrawPanel/ApproxCurve.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ModifyArcRadiusToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ModifyArcRadiusCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ModifyArcRadiusCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ModifyArcRadius.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ModifyTextToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ModifyTextCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ModifyTextCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/ModifyText.png" Stretch="Uniform"/>
            </Button>
         </UniformGrid>
@@ -493,8 +327,8 @@
         </Expander.Header>
         <UniformGrid Columns="3">
            <Button ToolTip="{Binding MoveToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding MoveCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding MoveCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Move.png" Stretch="Uniform"/>
            </Button>
            <Button Style="{StaticResource DrawPanelButton}"
@@ -502,33 +336,33 @@
            <Button Style="{StaticResource DrawPanelButton}"
                    Visibility="Hidden"/>
            <Button ToolTip="{Binding RotateToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding RotateCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding RotateCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Rotate.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding MirrorToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding MirrorCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding MirrorCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Mirror.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding ScaleToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding ScaleCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding ScaleCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Scale.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding Rotate3DToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding Rotate3DCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding Rotate3DCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Rotate3D.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding Mirror3DToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding Mirror3DCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding Mirror3DCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Mirror3D.png" Stretch="Uniform"/>
            </Button>
            <Button ToolTip="{Binding Scale3DToolTip}" Style="{StaticResource DrawPanelButton}"
-                    ToolTipService.ShowOnDisabled="True"
-                    Command="{Binding Scale3DCommand}" IsEnabled="{Binding bSelOk}">
+               ToolTipService.ShowOnDisabled="True"
+               Command="{Binding Scale3DCommand}" IsEnabled="{Binding bSelOk}">
               <Image Source="/Resources/DrawPanel/Scale3D.png" Stretch="Uniform"/>
            </Button>
         </UniformGrid>
@@ -1035,66 +1035,6 @@
  <ItemGroup>
    <Resource Include="Resources\DrawPanel\StmMoveVertex.png" />
  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\Point+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\Line2P+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\LinePDL+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\ArcPDP+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\Text+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\TextA.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\ArcFlip+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\LinearDimension+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\AngularDimension +.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\DiametralDimension+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\Plane+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\SolidSubtractSurf+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\SolidIntersectSurf+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\ExplodeSurf+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\StmMoveVertex+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\ChangeLayer+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\JoinCurve+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\AddPointCurve+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\RemovePointCurve+.png" />
-  </ItemGroup>
-  <ItemGroup>
-    <Resource Include="Resources\DrawPanel\ApproxCurve+.png" />
-  </ItemGroup>
  <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
  <PropertyGroup>
    <PostBuildEvent>IF "$(PlatformName)"=="x86" IF "$(ConfigurationName)" == "Release" copy $(TargetPath) c:\EgtProg\EgtCAM5\EgtCAM5R32.exe
@@ -3,6 +3,7 @@
      xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
      xmlns:local="clr-namespace:EgtCAM5"
      DockPanel.Dock="Left">
-
+   
   <local:DrawPanelV DataContext="{StaticResource DrawPanelViewModel}"/>
+   
 </Grid>
@@ -106,7 +106,7 @@ Public Class MyMachGroupPanelVM
      Else
         ' se ci sono gruppi di lavorazione
         If bMachGroup Then
-            nGroupId = EgtGetFirstMachGroup()
+            nGroupId = EgtGetLastMachGroup()
            Return If(EgtSetCurrMachGroup(nGroupId), 0, 1)
         ' se altrimenti ammessi gruppi di lavoro vuoti
         ElseIf bAllowEmpty Then
@@ -1,16 +1,15 @@
 <EgtWPFLib5:EgtCustomWindow x:Class="MainWindowV"
-                            xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
-                            xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-                            xmlns:interactivity="clr-namespace:System.Windows.Interactivity;assembly=System.Windows.Interactivity"
-                            xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
-                            xmlns:local="clr-namespace:EgtCAM5"
-                            Title="{Binding Title}" Icon="{Binding IconSource}"
-                            TitleBarBrush="{StaticResource EgaltechBlue1}" TitleBarHeight="32"
-                            BorderBrush="{StaticResource EgaltechBlue1}" BorderThickness="2"
-                            MinHeight="600" MinWidth="800" WindowStyle="None" ResizeMode="NoResize"
-                            AboutBoxCommand="{Binding AboutBoxCommand}"
-                            AllowDrop="True" Drop="MainWindow_Drop"
-                            SnapsToDevicePixels="True"
+   xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+   xmlns:interactivity="clr-namespace:System.Windows.Interactivity;assembly=System.Windows.Interactivity"
+   xmlns:EgtWPFLib5="clr-namespace:EgtWPFLib5;assembly=EgtWPFLib5"
+   xmlns:local="clr-namespace:EgtCAM5"
+   Title="{Binding Title}" Icon="{Binding IconSource}"
+   TitleBarBrush="{StaticResource EgaltechBlue1}" TitleBarHeight="32"
+   BorderBrush="{StaticResource EgaltechBlue1}" BorderThickness="2"
+   MinHeight="600" MinWidth="800" WindowStyle="None" ResizeMode="NoResize"
+   AboutBoxCommand="{Binding AboutBoxCommand}"
+   AllowDrop="True" Drop="MainWindow_Drop"
   CloseCommand="{Binding CloseApplicationCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}">
   <EgtWPFLib5:EgtCustomWindow.TitlePanel>
      <local:TopCommandBarV DataContext="{StaticResource TopCommandBarViewModel}"/>
@@ -16,7 +16,6 @@ Public Class MainWindowVM
   Private m_sDataRoot As String = String.Empty
   Private m_sConfigDir As String = String.Empty
   Private m_OnTerminateProcessCallback As New OnTerminateProcessCallback(AddressOf OnTerminateProcess)
-   Private m_IndexTab As Integer = 0

   ' EGALTECH ENVIRONMENT FIELDS WITH PROPERTY

@@ -386,8 +385,8 @@ Public Class MainWindowVM
         EgtSetLockId(sLockId)
      End If
      ' Recupero livello e opzioni della chiave
-      Dim bKey As Boolean = EgtGetKeyLevel(3279, 2611, 1, IniFile.m_nKeyLevel) And
-                            EgtGetKeyOptions(3279, 2611, 1, IniFile.m_nKeyOptions)
+      Dim bKey As Boolean = EgtGetKeyLevel(3279, 2607, 1, IniFile.m_nKeyLevel) And
+                            EgtGetKeyOptions(3279, 2607, 1, IniFile.m_nKeyOptions)
      ' Leggo e imposto livello utilizzatore
      IniFile.m_nUserLevel = Math.Min(IniFile.m_nKeyLevel, GetPrivateProfileInt(S_GENERAL, K_USERLEVEL, 1))
      ' Imposto abilitazione lavorazioni avanzate
@@ -598,11 +597,8 @@ Public Class MainWindowVM
         ' pulisco output
         Map.refStatusBarVM.NotifyStatusOutput("")
         Map.refInputExpanderVM.ResetInputBox()
-      ElseIf e.Key = Key.Left OrElse e.Key = Key.Right OrElse e.Key = Key.Up OrElse e.Key = Key.Down AndAlso
-             Map.refTopCommandBarVM.MachiningIsChecked AndAlso Map.refOperationParametersExpanderVM.OperationParameters.IsEnabled Then
+      ElseIf e.Key = Key.Left OrElse e.Key = Key.Right OrElse e.Key = Key.Up OrElse e.Key = Key.Down AndAlso Map.refTopCommandBarVM.MachiningIsChecked AndAlso Map.refOperationParametersExpanderVM.OperationParameters.IsEnabled Then
         Map.refMachiningParameterExpanderVM.FocusSlider()
-         Dim nStep As Integer = If(e.Key = Key.Right OrElse e.Key = Key.Up, 1, -1)
-         Map.refMachiningParameterExpanderVM.SetSliderValue(nStep)
         e.Handled = True
      End If
   End Sub
@@ -70,6 +70,6 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 

-<Assembly: AssemblyVersion("2.6.11.1")>
-<Assembly: AssemblyFileVersion("2.6.11.1")>
+<Assembly: AssemblyVersion("2.6.7.6")>
+<Assembly: AssemblyFileVersion("2.6.7.6")>

@@ -8,7 +8,7 @@
         <TextBlock Text="{Binding PropertiesMsg}"/>
      </Expander.Header>
      <UniformGrid>
-         <TextBox Text="{Binding InfoBox, Mode=OneWay}" MaxHeight="250" IsReadOnly="True"
+         <TextBox Text="{Binding InfoBox, Mode=OneWay}" MaxHeight="100" IsReadOnly="True"
                  HorizontalScrollBarVisibility="Auto" VerticalScrollBarVisibility="Auto"/>
      </UniformGrid>
   </Expander>
@@ -1,9 +1,9 @@
 <UserControl x:Class="ManageLayerExpanderV"
-             xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
-             xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-             xmlns:interactivity="clr-namespace:System.Windows.Interactivity;assembly=System.Windows.Interactivity"
-             xmlns:expression="clr-namespace:Microsoft.Expression.Interactivity.Core;assembly=Microsoft.Expression.Interactions"
-             xmlns:local="clr-namespace:EgtCAM5">
+   xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+   xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+   xmlns:interactivity="clr-namespace:System.Windows.Interactivity;assembly=System.Windows.Interactivity"
+   xmlns:expression="clr-namespace:Microsoft.Expression.Interactivity.Core;assembly=Microsoft.Expression.Interactions"
+   xmlns:local="clr-namespace:EgtCAM5">

   <Expander IsExpanded="True" Style="{StaticResource ExpanderStyle}">
      <Expander.Header>
@@ -21,10 +21,10 @@
            <Button Content="{Binding ColorMsg}" Command="{Binding LayerColorCommand}"  Height="30"/>
         </UniformGrid>
         
-         <TreeView Name="LayerTreeView" MinHeight="250" MaxHeight="400" 
-                   ItemsSource="{Binding Path=LayerList}"
-                   VirtualizingStackPanel.IsVirtualizing = "True"
-                   VirtualizingStackPanel.VirtualizationMode = "Recycling">
+         <TreeView Name="LayerTreeView" MinHeight="150" MaxHeight="250" 
+            ItemsSource="{Binding Path=LayerList}"
+            VirtualizingStackPanel.IsVirtualizing = "True"
+            VirtualizingStackPanel.VirtualizationMode = "Recycling">
            <interactivity:Interaction.Triggers>
               <interactivity:EventTrigger EventName="MouseDoubleClick">
                  <interactivity:InvokeCommandAction Command="{Binding TreeViewDoubleClickCommand}"/>
@@ -1,30 +1,15 @@
 <UserControl x:Class="DrawOptionPanelV"
             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" Width="250"
             xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5">

-   <!--<StackPanel Name="ciao" Background="Transparent" MaxHeight="{Binding MaxHeight,RelativeSource={RelativeSource AncestorType={x:Type EgtFloating:EgtFloatingPanel}}}">
-      --><!--ContentPresenter that contains the ManageLayerExpander--><!--
-      <ContentPresenter Content="{Binding ManageLayerExpander,Mode=OneWay}"/>
-      --><!--ContentPresenter that contains the InfoExpander--><!--
-      <ContentPresenter Content="{Binding InfoExpander}"/>
-      --><!--ContentPresenter that contains the InputExpander--><!--
-      <ContentPresenter Content="{Binding InputExpander}"/>
-   </StackPanel>-->
-   <Grid Name="ciao" Background="Transparent" MaxHeight="{Binding MaxHeight,RelativeSource={RelativeSource AncestorType={x:Type EgtFloating:EgtFloatingPanel}}}">
-      <Grid.RowDefinitions>
-         <RowDefinition Height="Auto"/>
-         <RowDefinition Height="Auto"/>
-         <RowDefinition Height="Auto"/>
-      </Grid.RowDefinitions>
+   <StackPanel Name="ciao" Background="Transparent" Margin="0,0,3.5001,0" MaxHeight="{Binding MaxHeight,RelativeSource={RelativeSource AncestorType={x:Type EgtFloating:EgtFloatingPanel}}}">
      <!--ContentPresenter that contains the ManageLayerExpander-->
      <ContentPresenter Content="{Binding ManageLayerExpander,Mode=OneWay}"/>
-      <GridSplitter Grid.Row="0" Height="5" Background="Transparent" HorizontalAlignment="Stretch" VerticalAlignment="Bottom"/>
      <!--ContentPresenter that contains the InfoExpander-->
-      <ContentPresenter Grid.Row="1" Content="{Binding InfoExpander}"/>
-      <GridSplitter Grid.Row="1" Height="5" Background="Transparent" HorizontalAlignment="Stretch" VerticalAlignment="Bottom"/>
+      <ContentPresenter Content="{Binding InfoExpander}"/>
      <!--ContentPresenter that contains the InputExpander-->
-      <ContentPresenter Grid.Row="2" Content="{Binding InputExpander}"/>
-   </Grid>
+      <ContentPresenter Content="{Binding InputExpander}"/>
+   </StackPanel>

 </UserControl>
@@ -177,17 +177,12 @@ Public Class EstimationsExpanderVM
      If Not bOk Then Return False
      ' Calcolo della stima
      If Not EgtEstimate(sEstFile, sInfo) Then
-         Dim nErr As Integer = EgtGetLastMachMgrErrorId()
-         If nErr = 1000 Then
-            MessageBox.Show(EgtMsg(5333), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
-         ElseIf nErr = 1001 Then
-            MessageBox.Show(EgtMsg(5334), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
-         ElseIf nErr <> 0 Then
+         If EgtGetLastMachMgrErrorId() <> 0 Then
            Dim sErr As String = EgtGetLastMachMgrErrorString()
            sErr = sErr.Replace("Cnc", "Est")
-            MessageBox.Show(sErr, EgtMsg(5305), MessageBoxButton.OK, MessageBoxImage.Exclamation)
+            MessageBox.Show(sErr, EgtMsg(MSG_SIMULATION + 5), MessageBoxButton.OK, MessageBoxImage.Exclamation)
         Else
-            MessageBox.Show(EgtMsg(5317), EgtMsg(5305), MessageBoxButton.OK, MessageBoxImage.Error)
+            MessageBox.Show(EgtMsg(MSG_SIMULATION + 17), EgtMsg(MSG_SIMULATION + 5), MessageBoxButton.OK, MessageBoxImage.Error)
         End If
         bOk = False
      End If
@@ -281,7 +281,6 @@ Public Class DispositionParameterExpanderVM
      End Select
      Map.refRawPartOptionVM.SetMoveWithFixture(False)
      Map.refFixtureParametersVM.UpdateFixtureTypeList()
-      DispositionUtility.InitHookData()
   End Sub

 #End Region    ' METHODS
@@ -5,6 +5,8 @@ Imports EgtUILib
 Public Class FixtureParametersVM
   Inherits ViewModelBase

+   Friend Const USED As String = "USED"
+
   Private m_FixtureTypeList As ObservableCollection(Of FixtureListItem)
   Public ReadOnly Property FixtureTypeList As ObservableCollection(Of FixtureListItem)
      Get
@@ -120,35 +122,27 @@ Public Class FixtureParametersVM
         OnPropertyChanged("FixtureErrorMsg")
         Return
      End If
-      ' dimensioni tavola
-      Dim vtTabDim As Vector3d = ptTableMax - ptTableMin
      ' calcolo il centro della tavola
-      Dim ptTableMid As Point3d = Point3d.ORIG() + 0.5 * vtTabDim
+      Dim ptTableMid As New Point3d((ptTableMax.x - ptTableMin.x) / 2, (ptTableMax.y - ptTableMin.y) / 2, (ptTableMax.z - ptTableMin.z) / 2)
      ' posiziono il nuovo sottopezzo al centro della tavola
-      Dim nAddedFixtureId As Integer = EgtAddFixture(SelectedFixture.Name, ptTableMid, 0, 20)
+      Dim nAddedFixtureId As Integer = EgtAddFixture(SelectedFixture.Name, ptTableMid, 0, 0)
      If nAddedFixtureId = GDB_ID.NULL Then
         m_FixtureErrorMsg = "Impossibile posizionare la ventosa sulla tavola"
         OnPropertyChanged("FixtureErrorMsg")
         Return
      End If
-      ' Se la ventosa ha punti di hook da ancorare
+      ' verifico se la ventosa ha punti di hook da ancorare
      If IsFixtureWithHook(nAddedFixtureId) Then
         If Not PositionFixtureOnNearestHook(nAddedFixtureId) Then
-            EgtMoveFixture( nAddedFixtureId, 0.2 * vtTabDim.y * Vector3d.Y_AX())
-            If Not PositionFixtureOnNearestHook(nAddedFixtureId) Then
-               EgtMoveFixture( nAddedFixtureId, 0.2 * vtTabDim.y * Vector3d.Y_AX())
-               If Not PositionFixtureOnNearestHook(nAddedFixtureId) Then
-                  ' non ci sono punti liberi, quindi rimuovo la ventosa e segnalo
-                  EgtRemoveFixture(nAddedFixtureId)
-                  MessageBox.Show("No free hook point!", "ERROR")
-                  Return
-               End If
-            End If
+            ' non ci sono punti liberi, quindi rimuovo la ventosa e segnalo
+            EgtRemoveFixture(nAddedFixtureId)
+            MessageBox.Show("No free hook point!", "ERROR")
+            Return
         End If
-      ' altrimenti ventosa con movimento continuo
      Else
-         ' verifico se è in una posizione valida
-         If Not DispositionUtility.VerifyFixturePosition(nAddedFixtureId, New Vector3d) Then
+         ' se non ha punti di ancoraggio
+      ' verifico se è in una posizione valida
+      If Not DispositionUtility.VerifyFixturePosition(nAddedFixtureId, New Vector3d) Then
            ' se non trovo una posizione valida, esco
            If Not SearchOkFixturePosition(nAddedFixtureId, ptTableMin, ptTableMax, ptTableMid) Then
               Return
@@ -163,76 +157,76 @@ Public Class FixtureParametersVM

   ' Funzione che cerca una posizione valida per la ventosa libera di muoversi
   Private Function SearchOkFixturePosition(nAddedFixtureId As Integer, ptTableMin As Point3d, ptTableMax As Point3d, ptTableMid As Point3d) As Boolean
-      ' creo un gruppo temporaneo
-      Dim nTempGroupId As Integer = EgtCreateGroup(GDB_ID.ROOT)
-      EgtSetLevel(nTempGroupId, GDB_LV.USER)
-      EgtSetMode(nTempGroupId, GDB_MD.STD)
-      ' calcolo ingombro sottopezzo aggiunto
-      Dim bboxAddedFixture As New BBox3d
-      EgtGetBBoxGlob(nAddedFixtureId, GDB_BB.STANDARD, bboxAddedFixture)
-      ' calcolo bbox tavolo
-      Dim bboxTableArea As New BBox3d(ptTableMin, ptTableMax)
-      bboxTableArea.Expand(-bboxAddedFixture.DimX / 2, -bboxAddedFixture.DimY / 2, 0)
-      ' creo superficie delle misure della tavola
-      Dim nTableFrId As Integer = EgtCreateSurfFrRectangle(nTempGroupId, bboxTableArea.Min, bboxTableArea.Max)
-      ' ciclo su tutti i pezzi di questa fase
-      Dim nFixtureId As Integer = EgtGetFirstFixture()
-      While nFixtureId <> GDB_ID.NULL
-         ' creo il bbox del sottopezzo
-         Dim bboxFixture As New BBox3d
-         EgtGetBBoxGlob(nFixtureId, GDB_BB.STANDARD, bboxFixture)
-         ' faccio offset del bbox del sottopezzo per includere metà del sottopezzo da aggiungere
-         bboxFixture.Expand(bboxAddedFixture.DimX / 2, bboxAddedFixture.DimY / 2, 0)
-         ' lo porto all'altezza della tavola
-         Dim ptMinFixtureFr As New Point3d(bboxFixture.Min)
-         Dim ptMaxFixtureFr As New Point3d(bboxFixture.Max)
-         ptMinFixtureFr.z = ptTableMin.z
-         ptMaxFixtureFr.z = ptTableMin.z
-         ' creo la regione occupata dal bbox del sottopezzo
-         Dim nFixtureFrId As Integer = EgtCreateSurfFrRectangle(nTempGroupId, ptMinFixtureFr, ptMaxFixtureFr)
-         ' sottraggo la regione del sottopezzo da quella della tavola
-         Dim x = EgtSurfFrSubtract(nTableFrId, nFixtureFrId)
-         nFixtureId = EgtGetNextFixture(nFixtureId)
-      End While
-      ' creo gruppo con i bordi della regione di tavola avanzata
-      Dim TableFrBorderGroupId As Integer = EgtCreateGroup(nTempGroupId)
-      Dim nTableFrBorderCount As Integer = 0
-      Dim nChunk As Integer = EgtSurfFrChunkCount(nTableFrId)
-      For Index = 0 To nChunk - 1
-         EgtExtractSurfFrChunkLoops(nTableFrId, Index, TableFrBorderGroupId, nTableFrBorderCount)
-      Next
-      ' verifico se c'è almeno un bordo
-      If nTableFrBorderCount = 0 Then
-         m_FixtureErrorMsg = "Impossibile posizionare la ventosa sulla tavola"
-         OnPropertyChanged("FixtureErrorMsg")
-      Return False
-      End If
-      ' converto il punto medio della tavola in coordinate globali
-      Dim PtTableRef As Point3d
-      EgtGetTableRef(1, PtTableRef)
-      Dim frTableRef As New Frame3d(PtTableRef)
-      ptTableMid.ToGlob(frTableRef)
-      ' ciclo sui bordi per trovare il punto più vicino
-      Dim dMinDist As Double = (bboxTableArea.Max - bboxTableArea.Min).SqLenXY
-      Dim ptMinAbs As Point3d
-      Dim BorderId As Integer = EgtGetFirstInGroup(TableFrBorderGroupId)
-      While BorderId <> GDB_ID.NULL
-         Dim dDist As Double = 0
-         Dim ptMinRel As Point3d
-         Dim nSide As Integer = 0
-         EgtPointCurveDistSide(ptTableMid, BorderId, Vector3d.Z_AX, GDB_ID.ROOT, dDist, ptMinRel, nSide)
-         If dDist < dMinDist Then
-            dMinDist = dDist
-            ptMinAbs = ptMinRel
+         ' creo un gruppo temporaneo
+         Dim nTempGroupId As Integer = EgtCreateGroup(GDB_ID.ROOT)
+         EgtSetLevel(nTempGroupId, GDB_LV.USER)
+         EgtSetMode(nTempGroupId, GDB_MD.STD)
+         ' calcolo ingombro sottopezzo aggiunto
+         Dim bboxAddedFixture As New BBox3d
+         EgtGetBBoxGlob(nAddedFixtureId, GDB_BB.STANDARD, bboxAddedFixture)
+         ' calcolo bbox tavolo
+         Dim bboxTableArea As New BBox3d(ptTableMin, ptTableMax)
+         bboxTableArea.Expand(-bboxAddedFixture.DimX / 2, -bboxAddedFixture.DimY / 2, 0)
+         ' creo superficie delle misure della tavola
+         Dim nTableFrId As Integer = EgtCreateSurfFrRectangle(nTempGroupId, bboxTableArea.Min, bboxTableArea.Max)
+         ' ciclo su tutti i pezzi di questa fase
+         Dim nFixtureId As Integer = EgtGetFirstFixture()
+         While nFixtureId <> GDB_ID.NULL
+            ' creo il bbox del sottopezzo
+            Dim bboxFixture As New BBox3d
+            EgtGetBBoxGlob(nFixtureId, GDB_BB.STANDARD, bboxFixture)
+            ' faccio offset del bbox del sottopezzo per includere metà del sottopezzo da aggiungere
+            bboxFixture.Expand(bboxAddedFixture.DimX / 2, bboxAddedFixture.DimY / 2, 0)
+            ' lo porto all'altezza della tavola
+            Dim ptMinFixtureFr As New Point3d(bboxFixture.Min)
+            Dim ptMaxFixtureFr As New Point3d(bboxFixture.Max)
+            ptMinFixtureFr.z = ptTableMin.z
+            ptMaxFixtureFr.z = ptTableMin.z
+            ' creo la regione occupata dal bbox del sottopezzo
+            Dim nFixtureFrId As Integer = EgtCreateSurfFrRectangle(nTempGroupId, ptMinFixtureFr, ptMaxFixtureFr)
+            ' sottraggo la regione del sottopezzo da quella della tavola
+            Dim x = EgtSurfFrSubtract(nTableFrId, nFixtureFrId)
+            nFixtureId = EgtGetNextFixture(nFixtureId)
+         End While
+         ' creo gruppo con i bordi della regione di tavola avanzata
+         Dim TableFrBorderGroupId As Integer = EgtCreateGroup(nTempGroupId)
+         Dim nTableFrBorderCount As Integer = 0
+         Dim nChunk As Integer = EgtSurfFrChunkCount(nTableFrId)
+         For Index = 0 To nChunk - 1
+            EgtExtractSurfFrChunkLoops(nTableFrId, Index, TableFrBorderGroupId, nTableFrBorderCount)
+         Next
+         ' verifico se c'è almeno un bordo
+         If nTableFrBorderCount = 0 Then
+            m_FixtureErrorMsg = "Impossibile posizionare la ventosa sulla tavola"
+            OnPropertyChanged("FixtureErrorMsg")
+         Return False
         End If
-         BorderId = EgtGetNext(BorderId)
-      End While
-      ' sposto il sottopezzo nel punto trovato
-      Dim vtFixtureMove As Vector3d = ptMinAbs - ptTableMid
-      vtFixtureMove.z = 0
-      EgtMoveFixture(nAddedFixtureId, vtFixtureMove)
-      ' cancello il gruppo temporaneo
-      EgtErase(nTempGroupId)
+         ' converto il punto medio della tavola in coordinate globali
+         Dim PtTableRef As Point3d
+         EgtGetTableRef(1, PtTableRef)
+         Dim frTableRef As New Frame3d(PtTableRef)
+         ptTableMid.ToGlob(frTableRef)
+         ' ciclo sui bordi per trovare il punto più vicino
+         Dim dMinDist As Double = (bboxTableArea.Max - bboxTableArea.Min).SqLenXY
+         Dim ptMinAbs As Point3d
+         Dim BorderId As Integer = EgtGetFirstInGroup(TableFrBorderGroupId)
+         While BorderId <> GDB_ID.NULL
+            Dim dDist As Double = 0
+            Dim ptMinRel As Point3d
+            Dim nSide As Integer = 0
+            EgtPointCurveDistSide(ptTableMid, BorderId, Vector3d.Z_AX, GDB_ID.ROOT, dDist, ptMinRel, nSide)
+            If dDist < dMinDist Then
+               dMinDist = dDist
+               ptMinAbs = ptMinRel
+            End If
+            BorderId = EgtGetNext(BorderId)
+         End While
+         ' sposto il sottopezzo nel punto trovato
+         Dim vtFixtureMove As Vector3d = ptMinAbs - ptTableMid
+         vtFixtureMove.z = 0
+         EgtMoveFixture(nAddedFixtureId, vtFixtureMove)
+         ' cancello il gruppo temporaneo
+         EgtErase(nTempGroupId)
      Return True
   End Function

@@ -245,7 +239,9 @@ Public Class FixtureParametersVM
      ' leggo tipo 
      Dim sType As String = ""
      EgtGetInfo(nFixtHookId, DispositionUtility.TYPE, sType)
-      If sType.Equals(DispositionUtility.POINT) Then
+      If sType.Equals(DispositionUtility.FREE) Then
+         Return False
+      ElseIf sType.Equals(DispositionUtility.POINT) Then
         Return True
      ElseIf sType.Equals(DispositionUtility.LINE) Then
         Return True
@@ -254,7 +250,7 @@ Public Class FixtureParametersVM
      End If
   End Function

-   ' Funzione che cerca un hook libero adatto alla ventosa e se trovato la posiziona
+   ' Funzione che aggancia la ventosa al più vicino hook libero
   Friend Shared Function PositionFixtureOnNearestHook(nFixtureId As Integer) As Boolean
      ' cerco punto hook sulla ventosa
      Dim nFixtSolidId As Integer = EgtGetFirstNameInGroup(nFixtureId, SOLID)
@@ -266,21 +262,26 @@ Public Class FixtureParametersVM
      Dim nFixtHookType As DispositionUtility.HOOKTYPE = DispositionUtility.HOOKTYPE.FREE
      Dim sType As String = ""
      EgtGetInfo(nFixtHookId, DispositionUtility.TYPE, sType)
-      If sType.Equals(DispositionUtility.POINT) Then
+      If sType.Equals(DispositionUtility.FREE) Then
+         nFixtHookType = DispositionUtility.HOOKTYPE.FREE
+         ' esco perchè non devo cercare alcun punto
+         Return True
+      ElseIf sType.Equals(DispositionUtility.POINT) Then
         nFixtHookType = DispositionUtility.HOOKTYPE.POINT
      ElseIf sType.Equals(DispositionUtility.LINE) Then
         nFixtHookType = DispositionUtility.HOOKTYPE.LINE
      Else
+         nFixtHookType = DispositionUtility.HOOKTYPE.FREE
         ' esco perchè non devo cercare alcun punto
         Return True
      End If
      Dim nFixtHookClass As Integer = 0
      EgtGetInfo(nFixtHookId, DispositionUtility.CLASS_, nFixtHookClass)
-      ' Recupero Id tavola corrente
+      ' cerco id tavola
      Dim sTableName As String = ""
      EgtGetTableName(sTableName)
      Dim nTableId As Integer = EgtGetTableId(sTableName)
-      ' *** Cerco hook su tavola ***
+      ' cerco hook su tavola macchina
      Dim nTableSolidId As Integer = EgtGetFirstNameInGroup(nTableId, SOLID)
      Dim nCurrHookId As Integer = EgtGetFirstNameInGroup(nTableSolidId, DispositionUtility.HOOK)
      ' Punto di hook a cui spostare la ventosa
@@ -292,22 +293,33 @@ Public Class FixtureParametersVM
            EgtMoveFixture(nFixtureId, ptCurrHook - ptFixtHook)
            ' verifico se è in una posizione valida
            If DispositionUtility.VerifyFixturePosition(nFixtureId, New Vector3d) Then
-               If nFixtHookType = DispositionUtility.HOOKTYPE.POINT then
-                  DispositionUtility.SetHookUsed( nCurrHookId, nFixtureId)
-               Else
-                  DispositionUtility.AddHookUsed( nCurrHookId, nFixtureId)
-               End If
+               EgtSetInfo(nCurrHookId, used, nFixtureId)
               Return True
-            Else
-               EgtStartPoint(nFixtHookId, GDB_ID.ROOT, ptFixtHook)
            End If
         End If
         nCurrHookId = EgtGetNextName(nCurrHookId, DispositionUtility.HOOK)
      End While
-      ' *** Cerco hook su barre fisse ***
+      ' cerco hook su barra fissa
      Dim nTableFixedId As Integer = EgtGetFirstNameInGroup(nTableId, DispositionUtility.FIXED)
-      While nTableFixedId <> GDB_ID.NULL
-         nCurrHookId = EgtGetFirstNameInGroup(nTableFixedId, DispositionUtility.HOOK)
+      nCurrHookId = EgtGetFirstNameInGroup(nTableFixedId, DispositionUtility.HOOK)
+      While nCurrHookId <> GDB_ID.NULL
+         ' se punto di aggancio valido
+         If HookAnalyzer(nCurrHookId, nFixtHookType, nFixtHookClass, ptFixtHook, ptCurrHook) Then
+            ' sposto la ventosa
+            EgtMoveFixture(nFixtureId, ptCurrHook - ptFixtHook)
+            ' verifico se è in una posizione valida
+            If DispositionUtility.VerifyFixturePosition(nFixtureId, New Vector3d) Then
+               EgtSetInfo(nCurrHookId, USED, nFixtureId)
+               Return True
+            End If
+         End If
+         nCurrHookId = EgtGetNextName(nCurrHookId, DispositionUtility.HOOK)
+      End While
+      ' cerco hook su barre mobili
+      Dim nMobileInd As Integer = 1
+      Dim nMobile As Integer = EgtGetFirstNameInGroup(nTableId, DispositionUtility.MOBILE & nMobileInd)
+      While nMobile <> GDB_ID.NULL
+         nCurrHookId = EgtGetFirstNameInGroup(nMobile, DispositionUtility.HOOK)
         While nCurrHookId <> GDB_ID.NULL
            ' se punto di aggancio valido
            If HookAnalyzer(nCurrHookId, nFixtHookType, nFixtHookClass, ptFixtHook, ptCurrHook) Then
@@ -315,111 +327,46 @@ Public Class FixtureParametersVM
               EgtMoveFixture(nFixtureId, ptCurrHook - ptFixtHook)
               ' verifico se è in una posizione valida
               If DispositionUtility.VerifyFixturePosition(nFixtureId, New Vector3d) Then
-                  If nFixtHookType = DispositionUtility.HOOKTYPE.POINT then
-                     DispositionUtility.SetHookUsed( nCurrHookId, nFixtureId)
-                  Else
-                     DispositionUtility.AddHookUsed( nCurrHookId, nFixtureId)
-                  End If
+                  EgtSetInfo(nCurrHookId, USED, nFixtureId)
                  Return True
-               Else
-                  EgtStartPoint(nFixtHookId, GDB_ID.ROOT, ptFixtHook)
               End If
            End If
            nCurrHookId = EgtGetNextName(nCurrHookId, DispositionUtility.HOOK)
         End While
-         nTableFixedId = EgtGetNextName( nTableFixedId, DispositionUtility.FIXED)
-      End While
-      ' *** Cerco hook su barre mobili ***
-      Dim nBarId As Integer = EgtGetFirstGroupInGroup(nTableId)
-      While nBarId <> GDB_ID.NULL
-         Dim sBarName As String = ""
-         If EgtGetName( nBarId, sBarName) AndAlso EgtGetAxisId( sBarName) <> GDB_ID.NULL Then
-            nCurrHookId = EgtGetFirstNameInGroup(nBarId, DispositionUtility.HOOK)
-            While nCurrHookId <> GDB_ID.NULL
-               ' se punto di aggancio valido
-               If HookAnalyzer(nCurrHookId, nFixtHookType, nFixtHookClass, ptFixtHook, ptCurrHook) Then
-                  ' sposto la ventosa
-                  Dim vtMove As Vector3d = ptCurrHook - ptFixtHook
-                  EgtMoveFixture(nFixtureId, vtMove)
-                  ' verifico se è in una posizione valida
-                  If DispositionUtility.VerifyFixturePosition(nFixtureId, New Vector3d) Then
-                     If nFixtHookType = DispositionUtility.HOOKTYPE.POINT then
-                        DispositionUtility.SetHookUsed( nCurrHookId, nFixtureId)
-                     Else
-                        DispositionUtility.AddHookUsed( nCurrHookId, nFixtureId)
-                     End If
-                     Return True
-                  Else
-                     EgtStartPoint(nFixtHookId, GDB_ID.ROOT, ptFixtHook)
-                  End If
-               End If
-               nCurrHookId = EgtGetNextName(nCurrHookId, DispositionUtility.HOOK)
-            End While
-            ' Cerco su eventuali carrelli
-            Dim nCharId As Integer = EgtGetFirstGroupInGroup(nBarId)
-            While nCharId <> GDB_ID.NULL
-               Dim sCharName As String = ""
-               If EgtGetName( nCharId, sCharName) AndAlso EgtGetAxisId( sCharName) <> GDB_ID.NULL Then 
-                  nCurrHookId = EgtGetFirstNameInGroup(nCharId, DispositionUtility.HOOK)
-                  While nCurrHookId <> GDB_ID.NULL
-                     ' se punto di aggancio valido
-                     If HookAnalyzer(nCurrHookId, nFixtHookType, nFixtHookClass, ptFixtHook, ptCurrHook) Then
-                        ' sposto la ventosa
-                        EgtMoveFixture(nFixtureId, ptCurrHook - ptFixtHook)
-                        ' verifico se è in una posizione valida
-                        If DispositionUtility.VerifyFixturePosition(nFixtureId, New Vector3d) Then
-                           If nFixtHookType = DispositionUtility.HOOKTYPE.POINT then
-                              DispositionUtility.SetHookUsed( nCurrHookId, nFixtureId)
-                           Else
-                              DispositionUtility.AddHookUsed( nCurrHookId, nFixtureId)
-                           End If
-                           Return True
-                        Else
-                           EgtStartPoint(nFixtHookId, GDB_ID.ROOT, ptFixtHook)
-                        End If
-                     End If
-                     nCurrHookId = EgtGetNextName(nCurrHookId, DispositionUtility.HOOK)
-                  End While
-               End If
-               nCharId = EgtGetNextGroup(nCharId)
-            End While
-         End If
-         nBarId = EgtGetNextGroup(nBarId)
+         nMobileInd += 1
+         nMobile = EgtGetFirstNameInGroup(nTableId, DispositionUtility.MOBILE & nMobileInd)
      End While
      Return False
   End Function

-   ' Funzione che analizza l'hook e se valido ne restituisce la posizione (punto)
-   Private Shared Function HookAnalyzer(nCurrHookId As Integer, nFixtHookType As Integer, nFixtHookClass As Integer,
-                                        ptFixtHook As Point3d, ByRef ptCurrHook As Point3d) As Boolean
-      ' Verifico se del tipo giusto
+   ' Funzione che analizza l'hook e se valido ne prestituisce lo posizione(punto)
+   Private Shared Function HookAnalyzer(nCurrHookId As Integer, nFixtHookType As Integer, nFixtHookClass As Integer, ptFixtHook As Point3d, ByRef ptCurrHook As Point3d) As Boolean
+      ' verifico se del tipo giusto
      Dim nTableHookType As GDB_TY = EgtGetType(nCurrHookId)
-      If Not (nTableHookType = GDB_TY.GEO_POINT And nFixtHookType = DispositionUtility.HOOKTYPE.POINT) AndAlso
-         Not (nTableHookType = GDB_TY.CRV_LINE And nFixtHookType = DispositionUtility.HOOKTYPE.LINE) Then
-         Return False
-      End If
-
-      ' Verifico se della stessa classe
-      Dim nTableHookClass As Integer = DispositionUtility.GetHookClass( nCurrHookId)
-      If nTableHookClass <> nFixtHookClass Then
-         Return False
-      End If
-
-      Dim dDist As Double = 0
-      ' punto a distanza minima sull'hook
-      If nTableHookType = GDB_TY.GEO_POINT Then
-         ' verifico se utilizzato
-         If Not DispositionUtility.GetIsHookUsed( nCurrHookId) Then
-            ' calcolo distanza punto hook tavola dal punto hook della ventosa
-            EgtStartPoint(nCurrHookId, GDB_ID.ROOT, ptCurrHook)
-            Return True
+      If (nTableHookType = GDB_TY.GEO_POINT And nFixtHookType = DispositionUtility.HOOKTYPE.POINT) OrElse (nTableHookType = GDB_TY.CRV_LINE And nFixtHookType = DispositionUtility.HOOKTYPE.LINE) Then
+         ' verifico se della stessa classe
+         Dim nTableHookClass As Integer = 0
+         EgtGetInfo(nCurrHookId, DispositionUtility.CLASS_, nTableHookClass)
+         If nTableHookClass = nFixtHookClass Then
+            Dim dDist As Double = 0
+            ' punto a distanza minima sull'hook
+            If nTableHookType = GDB_TY.GEO_POINT Then
+               ' verifico se utilizzato
+               Dim nTableHookUsed As Boolean = False
+               If Not EgtGetInfo(nCurrHookId, DispositionUtility.USED, nTableHookUsed) Then
+                  ' calcolo distanza punto hook tavola dal punto hook della ventosa
+                  EgtStartPoint(nCurrHookId, GDB_ID.ROOT, ptCurrHook)
+                  Return True
+               End If
+            ElseIf nTableHookType = GDB_TY.CRV_LINE Then
+               ' calcolo distanza linea hook tavola dal punto hook della ventosa
+               Dim nRefId As Integer = 0
+               Dim dU As Double = 0
+               EgtPointCurveDist(ptFixtHook, nCurrHookId, nRefId, dDist, dU)
+               EgtAtParamPoint(nCurrHookId, dU, GDB_ID.ROOT, ptCurrHook)
+               Return True
+            End If
         End If
-      ElseIf nTableHookType = GDB_TY.CRV_LINE Then
-         ' calcolo distanza linea hook tavola dal punto hook della ventosa
-         Dim ptL1 As Point3d : EgtStartPoint( nCurrHookId, GDB_ID.ROOT, ptL1)
-         Dim ptL2 As Point3d : EgtEndPoint( nCurrHookId, GDB_ID.ROOT, ptL2)
-         ptCurrHook = DispositionUtility.DistPointSegment( ptFixtHook, ptL1, ptL2)
-         Return True
      End If
      Return False
   End Function
@@ -449,7 +396,6 @@ Public Class FixtureParametersVM
         Dim NextSelectedId As Integer = EgtGetNextSelectedObj()
         If EgtVerifyFixture(SelectedFixtureId) Then
            EgtRemoveFixture(SelectedFixtureId)
-            DispositionUtility.RemoveFixtureFromHook( SelectedFixtureId)
            For Index = 0 To FixtureTypeList.Count - 1
               Dim SelFixtureName As String = String.Empty
               EgtGetName(SelectedFixtureId, SelFixtureName)
@@ -109,34 +109,6 @@
                                   Visibility="{Binding SysNotes_Visibility}"
                                   IsReadOnly="True"/>
         </UniformGrid>
-         <EgtWPFLib5:CheckParamV ParamTxBl="{Binding InvertTxBl}" 
-                                 ParamChBx="{Binding Path=Invert,
-                                                     UpdateSourceTrigger=PropertyChanged,
-                                                     ValidatesOnDataErrors=True}" 
-                                 Style="{DynamicResource CheckParamV_Margin}"/>
-         <EgtWPFLib5:ComboParamV ParamTxBl="{Binding WorkSideTxBl}" 
-                                 ParamCmBxList="{Binding Path=WorkSideList,
-                                                         UpdateSourceTrigger=PropertyChanged,
-                                                         ValidatesOnDataErrors=True}"
-                                 ParamCmBxSelIndex="{Binding Path=SelectedWorkSide}" 
-                                 Style="{DynamicResource ComboParamV_Margin}"/>
-         <UniformGrid Columns="2">
-            <TextBlock Text="{Binding UserNotesTxBl}" 
-                       Style="{DynamicResource MPExpander_UserNotesTxBlMargin}"/>
-            <EgtWPFLib5:EgtTextBox Text="{Binding UserNotes, UpdateSourceTrigger=PropertyChanged}" 
-                                   Style="{DynamicResource MPExpander_UserNotesTxBxMargin}">
-               <EgtWPFLib5:EgtTextBox.ToolTip>
-                  <TextBlock Text="{Binding UserNotesTooltip}"/>
-               </EgtWPFLib5:EgtTextBox.ToolTip>
-            </EgtWPFLib5:EgtTextBox>
-            <TextBlock Text="{Binding SystemNotesTxBl}" 
-                       Style="{DynamicResource MPExpander_UserNotesTxBlMargin}"
-                       Visibility="{Binding SysNotes_Visibility}"/>
-            <EgtWPFLib5:EgtTextBox Text="{Binding SystemNotes, UpdateSourceTrigger=PropertyChanged}" 
-                                   Style="{DynamicResource MPExpander_UserNotesTxBxMargin}"
-                                   Visibility="{Binding SysNotes_Visibility}"
-                                   IsReadOnly="True"/>
-         </UniformGrid>
      </StackPanel>
      <StackPanel Name="AutomaticCloseExpanderStackPanel">
         <Expander Header="{Binding GenericExpanderHeader}" Name="GenericExpander"
@@ -264,7 +236,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -294,43 +266,6 @@
            </Grid>
         </Expander>

-         <Expander Style="{StaticResource ExpanderStyle}">
-            <Expander.Header>
-               <EgtWPFLib5:ComboParamV ParamTxBl="{Binding LeadInTypeTxBl}" 
-                                       ParamCmBxList="{Binding Path=LeadInTypeList,
-                                                               UpdateSourceTrigger=PropertyChanged,
-                                                               ValidatesOnDataErrors=True}"
-                                       ParamCmBxSelIndex="{Binding Path=SelectedLeadInType}" 
-                                       Style="{DynamicResource ComboParamV_Margin}"/>
-            </Expander.Header>
-            <StackPanel>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding StartAddLenTxBl}" 
-                                        ParamTxBx="{Binding Path=StartAddLen,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LiTangTxBl}" 
-                                        ParamTxBx="{Binding Path=LiTang,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LiPerpTxBl}" 
-                                        ParamTxBx="{Binding Path=LiPerp,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LiElevTxBl}" 
-                                        ParamTxBx="{Binding Path=LiElev,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LiCompLenTxBl}" 
-                                        ParamTxBx="{Binding Path=LiCompLen,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-            </StackPanel>
-         </Expander>
         <Expander Style="{StaticResource ExpanderStyle}">
            <Expander.Header>
               <EgtWPFLib5:ComboParamV ParamTxBl="{Binding LeadInTypeTxBl}" 
@@ -369,43 +304,6 @@
            </StackPanel>
         </Expander>

-         <Expander Style="{StaticResource ExpanderStyle}">
-            <Expander.Header>
-               <EgtWPFLib5:ComboParamV ParamTxBl="{Binding LeadOutTypeTxBl}" 
-                                       ParamCmBxList="{Binding Path=LeadOutTypeList,
-                                                               UpdateSourceTrigger=PropertyChanged,
-                                                               ValidatesOnDataErrors=True}"
-                                       ParamCmBxSelIndex="{Binding Path=SelectedLeadOutType}"
-                                       Style="{DynamicResource ComboParamV_Margin}"/>
-            </Expander.Header>
-            <StackPanel>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding EndAddLenTxBl}" 
-                                        ParamTxBx="{Binding Path=EndAddLen,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LoTangTxBl}" 
-                                        ParamTxBx="{Binding Path=LoTang,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LoPerpTxBl}" 
-                                        ParamTxBx="{Binding Path=LoPerp,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LoElevTxBl}" 
-                                        ParamTxBx="{Binding Path=LoElev,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding LoCompLenTxBl}" 
-                                        ParamTxBx="{Binding Path=LoCompLen,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-            </StackPanel>
-         </Expander>
         <Expander Style="{StaticResource ExpanderStyle}">
            <Expander.Header>
               <EgtWPFLib5:ComboParamV ParamTxBl="{Binding LeadOutTypeTxBl}" 
@@ -444,53 +342,6 @@
            </StackPanel>
         </Expander>

-         <Expander Style="{StaticResource ExpanderStyle}">
-            <Expander.Header>
-               <EgtWPFLib5:CheckParamV ParamTxBl="{Binding LeaveTabTxBl}" 
-                                       ParamChBx="{Binding Path=LeaveTab,
-                                                           UpdateSourceTrigger=PropertyChanged,
-                                                           ValidatesOnDataErrors=True}" 
-                                       Style="{DynamicResource CheckParamV_Margin}"/>
-            </Expander.Header>
-            <StackPanel Margin="2">
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding TabLenTxBl}" 
-                                        ParamTxBx="{Binding Path=TabLen,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        ParamErrorMsg="{Binding Path=TabLenErrorMsg}"
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding TabHeightTxBl}" 
-                                        ParamTxBx="{Binding Path=TabHeight,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        ParamErrorMsg="{Binding Path=TabHeightErrorMsg}"
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding TabAngleTxBl}" 
-                                        ParamTxBx="{Binding Path=TabAngle,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}" 
-                                        ParamErrorMsg="{Binding Path=TabAngleErrorMsg}"
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding TabDistTxBl}" 
-                                        ParamTxBx="{Binding Path=TabDist,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}"
-                                        ParamErrorMsg="{Binding Path=TabDistErrorMsg}"
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding TabMinTxBl}" 
-                                        ParamTxBx="{Binding Path=TabMin,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}"
-                                        ParamErrorMsg="{Binding Path=TabMinErrorMsg}"
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding TabMaxTxBl}" 
-                                        ParamTxBx="{Binding Path=TabMax,
-                                                            UpdateSourceTrigger=PropertyChanged,
-                                                            ValidatesOnDataErrors=True}"
-                                        ParamErrorMsg="{Binding Path=TabMaxErrorMsg}"
-                                        Style="{DynamicResource StringParamV_Margin}"/>
-            </StackPanel>
-         </Expander>
         <Expander Style="{StaticResource ExpanderStyle}">
            <Expander.Header>
               <EgtWPFLib5:CheckParamV ParamTxBl="{Binding LeaveTabTxBl}" 
@@ -571,7 +422,7 @@
                                        Style="{DynamicResource StringParamV_Margin}"/>
            </StackPanel>
         </Expander>
-      
+
         <Interactivity:Interaction.Behaviors>
            <EgtCAM5:AutomaticCloseExpander/>
         </Interactivity:Interaction.Behaviors>
@@ -224,7 +224,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -80,16 +80,4 @@ Public Class FiveAxisMachinigParameterExpanderV
      Return TryCast(target, T)
   End Function

-   Private Sub StackPanel_PreviewKeyDown(sender As Object, e As KeyEventArgs)
-      If e.Key = Key.Tab Then
-         Dim s As EgtWPFLib5.StringParamV = TryCast(e.OriginalSource, EgtWPFLib5.StringParamV)
-
-         If Not IsNothing(s) Then
-            s.MoveFocus(New TraversalRequest(FocusNavigationDirection.Next))
-         End If
-
-         e.Handled = True
-      End If
-
-   End Sub
 End Class
@@ -214,7 +214,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -126,16 +126,6 @@ Public Class MachiningParameterExpanderVM
      m_SliderValue = 1
      NotifyPropertyChanged(NameOf(SliderValue))
   End Sub
-   Friend Sub SetSliderValue(value As Integer)
-      Dim nOldSliderValue As Integer = m_SliderValue
-      m_SliderValue = Math.Min( Math.Max( m_SliderValue + value, 1), m_SliderScale)
-      Dim nStep As Integer = m_SliderValue - nOldSliderValue
-      If nStep = 0 Then Return
-      Dim nId As Integer = EgtPreviewMachiningTool(m_nPtEntId, nStep)
-      If nId <> GDB_ID.NULL Then m_nPtEntId = nId
-      EgtDraw()
-      NotifyPropertyChanged(NameOf(SliderValue))
-   End Sub

   Dim WoodDrillParamExpanderV As WoodDrillingParameterExpanderV
   Dim WoodSawParamExpanderV As WoodSawingParameterExpanderV
@@ -232,7 +232,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -129,13 +129,13 @@
                                                            UpdateSourceTrigger=PropertyChanged,
                                                            ValidatesOnDataErrors=True}" 
                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding OffsetSlTxBl}" 
-                                        ParamTxBx="{Binding Path=OffSl,
+               <EgtWPFLib5:StringParamV ParamTxBl="{Binding OffsetSrTxBl}" 
+                                        ParamTxBx="{Binding Path=OffSr,
                                                            UpdateSourceTrigger=PropertyChanged,
                                                            ValidatesOnDataErrors=True}" 
                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:StringParamV ParamTxBl="{Binding OffsetSrTxBl}" 
-                                        ParamTxBx="{Binding Path=OffSr,
+               <EgtWPFLib5:StringParamV ParamTxBl="{Binding OffsetSlTxBl}" 
+                                        ParamTxBx="{Binding Path=OffSl,
                                                            UpdateSourceTrigger=PropertyChanged,
                                                            ValidatesOnDataErrors=True}" 
                                        Style="{DynamicResource StringParamV_Margin}"/>
@@ -241,7 +241,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -213,7 +213,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -217,7 +217,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -211,7 +211,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -209,7 +209,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -217,7 +217,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -124,12 +124,6 @@
                                                            UpdateSourceTrigger=PropertyChanged,
                                                            ValidatesOnDataErrors=True}" 
                                        Style="{DynamicResource StringParamV_Margin}"/>
-               <EgtWPFLib5:ComboParamV ParamTxBl="{Binding LeadLinkTypeTxBl}" 
-                                       ParamCmBxList="{Binding Path=LeadLinkTypeList,
-                                                               UpdateSourceTrigger=PropertyChanged,
-                                                               ValidatesOnDataErrors=True}"
-                                       ParamCmBxSelIndex="{Binding Path=SelectedLeadLinkType}" 
-                                       Style="{DynamicResource ComboParamV_Margin}"/>
               <EgtWPFLib5:StringParamV ParamTxBl="{Binding SideAngleTxBl}" 
                                        ParamTxBx="{Binding Path=SideAngle,
                                                            UpdateSourceTrigger=PropertyChanged,
@@ -230,7 +224,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -199,7 +199,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -218,7 +218,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -236,7 +236,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -226,7 +226,7 @@
                                             IsReadOnly="False"/>
                                 </TabItem>
                                 <TabItem Header="CHECKBOX">
-                                    <CheckBox IsChecked="{Binding Value}"/>
+                                    <CheckBox IsChecked="{Binding Value, UpdateSourceTrigger=PropertyChanged}"/>
                                 </TabItem>
                              </TabControl>
                              <Button Command="{Binding RemoveItemNoteCommand}"
@@ -106,32 +106,26 @@ Public Class OperationListBoxItem
               Dim EntityIndex As Integer = 0
               Dim SubEntityIndex As Integer = 0
               While EgtGetMachiningGeometry(CountIndex, EntityIndex, SubEntityIndex)
-                  EgtSelectObj(EntityIndex)
-                  If EgtGetType(EntityIndex) = GDB_TY.SRF_MESH Or EgtGetType(EntityIndex) = GDB_TY.SRF_FRGN Then
+                  EgtSelectObj( EntityIndex)
+                  If EgtGetType( EntityIndex) = GDB_TY.SRF_MESH Or EgtGetType( EntityIndex) = GDB_TY.SRF_FRGN Then
                     SelData.AddIdSub(EntityIndex, SubEntityIndex)
                  End If
                  CountIndex += 1
               End While
            End If
            ' Notifico al contentcontrol OperationParameter di aggiornarsi
-            If Not IsNothing(Map.refOperationParametersExpanderVM) Then
+            If Not IsNothing( Map.refOperationParametersExpanderVM) Then
               Map.refOperationParametersExpanderVM.OnPropertyChanged("OperationParameters")
            End If
            Map.refOperationsListExpanderVM.OnPropertyChanged("MoveUp_IsEnabled")
            Map.refOperationsListExpanderVM.OnPropertyChanged("MoveDown_IsEnabled")
            ' Notifico l'operazione selezionata all'expander con l'albero delle lavorazioni aggiungibili
-            If Not IsNothing(Map.refMachiningTreeExpanderVM) Then
+            If Not IsNothing( Map.refMachiningTreeExpanderVM) Then
               Map.refMachiningTreeExpanderVM.nSelectedOperationId = Me.Id
            End If
            ' Aggiorno visualizzazione
            EgtDraw()
         End If
-         ' Resetto valori slider
-         If Not IsNothing(Map.refMachiningParameterExpanderVM) Then
-            Map.refMachiningParameterExpanderVM.SetSliderScale(EgtGetPreviewMachiningToolStepCount())
-            Map.refMachiningParameterExpanderVM.ResetSliderValue()
-         End If
-
         'OnPropertyChanged("ToolExpanderHeader")
         Map.refOperationsListExpanderVM.OnPropertyChanged("DuplicateCmd_IsEnabled")
         Map.refOperationsListExpanderVM.OnPropertyChanged("MachToDb_IsEnabled")
@@ -329,11 +329,10 @@ Public Class OperationsListExpanderVM
      ' Aggiungo la nuova fase
      Dim nPhase As Integer = EgtAddPhase()
      Dim nDispId As Integer = EgtGetPhaseDisposition(nPhase)
-      ' Confermo grezzi, movimenti assi di disposizione e bloccaggi sopra salvati
+      ' Confermo grezzi e bloccaggi sopra salvati
      For Each nId As Integer In vRawId
         EgtKeepRawPart(nId, nLastPhase)
      Next
-      EgtKeepAllDispAxes( nLastPhase)
      For Each nId As Integer In vFxtId
         EgtKeepFixture(nId, nLastPhase)
      Next
@@ -434,10 +433,8 @@ Public Class OperationsListExpanderVM

      If EgtGetOperationMode(selOperation.Id) Then
         Map.refOperationParametersExpanderVM.ParametersIsExpanded = True
-         If EgtGetOperationType(selOperation.Id) <> MCH_OY.DISP Then
-            Map.refMachiningParameterExpanderVM.SetSliderScale( EgtGetPreviewMachiningToolStepCount())
-            Map.refMachiningParameterExpanderVM.ResetSliderValue()
-         End If
+         Map.refMachiningParameterExpanderVM.SetSliderScale( EgtGetPreviewMachiningToolStepCount())
+         Map.refMachiningParameterExpanderVM.ResetSliderValue()
      End If
   End Sub

@@ -101,11 +101,9 @@ Public Class SimulationExpanderVM
      If Not GetCncFileName(True, sCncFile, sInfo) Then Return
      ' Eseguo
      If Not EgtGenerate(sCncFile, sInfo) Then
-         Dim nErr As Integer = EgtGetLastMachMgrErrorId()
+         Dim nErr = EgtGetLastMachMgrErrorId()
         If nErr = 1000 Then
            MessageBox.Show(EgtMsg(5333), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
-         ElseIf nErr = 1001 Then
-            MessageBox.Show(EgtMsg(5334), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
         ElseIf nErr <> 0 Then
            Dim sErr As String = EgtGetLastMachMgrErrorString()
            MessageBox.Show(sErr, EgtMsg(5305), MessageBoxButton.OK, MessageBoxImage.Exclamation)
@@ -227,16 +225,11 @@ Public Class SimulationExpanderVM
      UpdateUI()
      ' Messaggio in caso di errore
      If Not bOk Then
-         Dim nErr As Integer = EgtGetLastMachMgrErrorId()
-         If nErr = 1000 Then
-            MessageBox.Show(EgtMsg(5333), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
-         ElseIf nErr = 1001 Then
-            MessageBox.Show(EgtMsg(5334), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
-         ElseIf nErr <> 0 Then
+         If EgtGetLastMachMgrErrorId() <> 0 Then
            Dim sErr As String = EgtGetLastMachMgrErrorString()
-            MessageBox.Show(sErr, EgtMsg(5305), MessageBoxButton.OK, MessageBoxImage.Exclamation)                     '.... - ERRORE
+            MessageBox.Show(sErr, EgtMsg(MSG_SIMULATION + 5), MessageBoxButton.OK, MessageBoxImage.Exclamation)                     '.... - ERRORE
         Else
-            MessageBox.Show(EgtMsg(15010), EgtMsg(5305), MessageBoxButton.OK, MessageBoxImage.Error)    'Errore sconosciuto - ERRORE
+            MessageBox.Show(EgtMsg(MSG_MESSAGEBOX + 10), EgtMsg(MSG_SIMULATION + 5), MessageBoxButton.OK, MessageBoxImage.Error)    'Errore sconosciuto - ERRORE
         End If
      End If
      ' Imposto stato corrente
@@ -274,16 +267,11 @@ Public Class SimulationExpanderVM
      Map.refEstimationsExpanderVM.NotifyPropertyChanged("Estimation_IsEnabled")
      m_bStopOnNextCollision = True
      If Not EgtSimStart(False) Then
-         Dim nErr As Integer = EgtGetLastMachMgrErrorId()
-         If nErr = 1000 Then
-            MessageBox.Show(EgtMsg(5333), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
-         ElseIf nErr = 1001 Then
-            MessageBox.Show(EgtMsg(5334), EgtMsg(5320), MessageBoxButton.OK, MessageBoxImage.Information)
-         ElseIf nErr <> 0 Then
+         If EgtGetLastMachMgrErrorId() <> 0 Then
            Dim sErr As String = EgtGetLastMachMgrErrorString()
-            MessageBox.Show(sErr, EgtMsg(5305), MessageBoxButton.OK, MessageBoxImage.Exclamation)                     '.... - ERRORE
+            MessageBox.Show(sErr, EgtMsg(MSG_SIMULATION + 5), MessageBoxButton.OK, MessageBoxImage.Exclamation)                     '.... - ERRORE
         Else
-            MessageBox.Show(EgtMsg(15010), EgtMsg(5305), MessageBoxButton.OK, MessageBoxImage.Error)    'Errore sconosciuto - ERRORE
+            MessageBox.Show(EgtMsg(MSG_MESSAGEBOX + 10), EgtMsg(MSG_SIMULATION + 5), MessageBoxButton.OK, MessageBoxImage.Error)    'Errore sconosciuto - ERRORE
         End If
         SetSimulationStatus(MCH_SIM_ST.UI_STOP)
      End If
@@ -1,9 +1,9 @@
 <UserControl x:Class="MachiningOptionPanelV"
             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" Width="250"
             xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5">

-   <StackPanel Name="ciao" Background="Transparent" MaxHeight="{Binding MaxHeight,RelativeSource={RelativeSource AncestorType={x:Type EgtFloating:EgtFloatingPanel}}}">
+   <StackPanel Name="ciao" Background="Transparent" Margin="0,0,3.5001,0" MaxHeight="{Binding MaxHeight,RelativeSource={RelativeSource AncestorType={x:Type EgtFloating:EgtFloatingPanel}}}">
      <!--ContentPresenter that contains the OperationsListExpander-->
      <ContentPresenter Content="{Binding OperationsListExpander,Mode=OneWay}"/>
      <!--ContentPresenter that contains the OperationParametersExpander-->
@@ -1,6 +1,6 @@
 <EgtFloating:EgtFloatingPanel x:Class="OptionPanelV"
                              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" Width="250"
                              xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
                              TitleBarOrientation="Vertical"
                              Visibility="{Binding Panel_Visibility}">
@@ -56,7 +56,6 @@ Friend Module OptionModule
   Friend m_SelGeomSurfRoughing As SceneSelModeOpt
   Friend m_SelGeomWaterJetting As SceneSelModeOpt
   Friend m_SelGeomFiveAxMilling As SceneSelModeOpt
-   Friend m_SelVMillQuality As VMillSelTypeOpt
   ' Flag per aggiungere una nuova lavorazione alla fine della fase o subito dopo la lavorazione selezionata
   Friend m_bNewMachiningIsLastOne As Boolean
   ' Variabile che indica se usare lo script per calcolare automaticamente la disposizione quando si passa in lavorazione
@@ -148,8 +147,6 @@ Friend Module OptionModule
      m_SelGeomSurfRoughing = If(Temp < 0 Or Temp > 3, SceneSelModeOpt.PARTCURVESANDSURFACES, DirectCast(Temp, SceneSelModeOpt))
      Temp = GetPrivateProfileInt(S_MACH, K_SELGEOMFIVEAXMILLING, -1)
      m_SelGeomFiveAxMilling = If(Temp < 0 Or Temp > 3, SceneSelModeOpt.PARTCURVESANDSURFACES, DirectCast(Temp, SceneSelModeOpt))
-      Temp = GetPrivateProfileInt(S_MACH, K_SELVMILLQUALITY, 0)
-      m_SelVMillQuality = If(Temp < -2 Or Temp > 2, VMillSelTypeOpt.HIGHER, DirectCast(Temp, VMillSelTypeOpt))
      m_SelGeomWaterJetting = SceneSelModeOpt.PARTCURVES
      ' Inizializzo variabile che indica posizione nuova operazione di lavorazione
      m_bNewMachiningIsLastOne = (GetPrivateProfileInt(S_OPTIONS, K_NEWMACHININGISLASTONE, 0) <> 0)
@@ -9,12 +9,11 @@
                            WindowStyle="None" ResizeMode="NoResize" TitleBarHeight="30" IsResizable="False"
                            IsMinimizable="False" WindowStartupLocation="CenterScreen" ShowInTaskbar="False"
                            MinWidth="400" MinHeight="382"
-                            Width="400" Height="575"
+                            Width="400" Height="520"
                            CloseCommand="{Binding CloseOptionsCommand,Mode=OneWay,UpdateSourceTrigger=PropertyChanged}">

   <EgtWPFLib5:EgtCustomWindow.Resources>
      <local:GeomTypeConverter x:Key="GeomTypeConverter"/>
-      <local:VMillTypeConverter x:Key="VMillTypeConverter"/>
   </EgtWPFLib5:EgtCustomWindow.Resources>

   <TabControl Margin="5,5,5,5">
@@ -317,41 +316,30 @@
               </UniformGrid>
            </GroupBox>

-            <Grid Margin="10,5,10,0">
-               <Grid.RowDefinitions>
-                  <RowDefinition Height="1*"/>
-                  <RowDefinition Height="1*"/>
-                  <RowDefinition Height="1*"/>
-               </Grid.RowDefinitions>
+            <Grid Margin="5,5,5,0">
               <Grid.ColumnDefinitions>
                  <ColumnDefinition Width="2*"/>
                  <ColumnDefinition Width="1*"/>
               </Grid.ColumnDefinitions>
-               <UniformGrid Columns="2" Grid.ColumnSpan="2" Margin="0,5,0,0">
-                  <TextBlock Text="{Binding VMillQualityMsg}" VerticalAlignment="Center"/>
-                  <ComboBox ItemsSource="{Binding VMillTypeList, Mode=OneWay}"
-                            SelectedItem="{Binding SelectedVMillTypeType}" Height="25">
-                     <ComboBox.ItemTemplate>
-                        <DataTemplate>
-                           <TextBlock Text="{Binding Converter={StaticResource VMillTypeConverter}}"/>
-                        </DataTemplate>
-                     </ComboBox.ItemTemplate>
-                  </ComboBox>
-               </UniformGrid>
-               <TextBlock Grid.Row="1" Text="{Binding NewMachiningPosMsg}" VerticalAlignment="Center" 
-                          Margin="0,8,0,5"/>
-               <CheckBox Grid.Row="1" Grid.Column="1" IsChecked="{Binding NewMachiningIsLastOne}"
-                         Margin="4,8,0,0" VerticalAlignment="Center"/>
-               <TextBlock Grid.Row="2" Text="{Binding UseDispositionScriptMsg}"
-                          VerticalAlignment="Center" Margin="0,5,0,5"/>
-               <CheckBox Grid.Row="2" Grid.Column="1" IsChecked="{Binding UseDispositionScript}"
-                         Margin="4,5,0,0" VerticalAlignment="Center"/>
+               <Grid.RowDefinitions>
+                  <RowDefinition Height="1*"/>
+                  <RowDefinition Height="1*"/>
+               </Grid.RowDefinitions>
+               <TextBlock Text="{Binding NewMachiningPosMsg}" VerticalAlignment="Center"
+                          Grid.Row="0" Margin="0,0,0,5"/>
+               <CheckBox IsChecked="{Binding NewMachiningIsLastOne}"
+                         Grid.Column="1" Grid.Row="0" Margin="4,0,0,0" VerticalAlignment="Center"/>
+               <TextBlock Text="{Binding UseDispositionScriptMsg}" VerticalAlignment="Center"
+                          Grid.Row="1" Margin="0,0,0,5"/>
+               <CheckBox IsChecked="{Binding UseDispositionScript}"
+                         Grid.Column="1" Grid.Row="1" Margin="4,0,0,0" VerticalAlignment="Center"/>
+            </Grid>
+            <Grid Margin="5,5,5,0">
+               <Button Content="{Binding AddMachineMsg}" Command="{Binding AddMachine_Command}"  Height="26" Margin="100,1"/>
+            </Grid>
+            <Grid Margin="5,5,5,0">
+               <Button Content="{Binding ExportMachineMsg}" Command="{Binding ExportMachine_Command}"  Height="26" Margin="100,1"/>
            </Grid>
-
-            <UniformGrid Rows="2">
-               <Button Content="{Binding AddMachineMsg}" Command="{Binding AddMachine_Command}" Height="26" Margin="100,10,100,5"/>
-               <Button Content="{Binding ExportMachineMsg}" Command="{Binding ExportMachine_Command}" Height="26" Margin="100,1"/>
-            </UniformGrid>
         </StackPanel>
      </TabItem>

@@ -2,7 +2,6 @@
 Imports System.Collections.ObjectModel
 Imports System.IO
 Imports EgtUILib
-Imports System.Globalization

 Public Class OptionWindowVM
   Inherits VMBase
@@ -20,13 +19,6 @@ Public Class OptionWindowVM
      End Get
   End Property

-   Private m_VMillTypeList As ObservableCollection(Of VMillSelTypeOpt) = New ObservableCollection(Of VMillSelTypeOpt)({VMillSelTypeOpt.LOWER, VMillSelTypeOpt.LOW, VMillSelTypeOpt.STANDARD, VMillSelTypeOpt.HIGH, VMillSelTypeOpt.HIGHER})
-   Public ReadOnly Property VMillTypeList As ObservableCollection(Of VMillSelTypeOpt)
-      Get
-         Return m_VMillTypeList
-      End Get
-   End Property
-
   Private m_UnitMeasureList As List(Of String) = New List(Of String)({"mm", "inch", EgtMsg(MSG_OPTIONPAGE + 45)})
   Public ReadOnly Property UnitMeasureList As List(Of String)
      Get
@@ -200,17 +192,6 @@ Public Class OptionWindowVM
      End Set
   End Property

-   Public Property SelectedVMillTypeType As VMillSelTypeOpt
-      Get
-         Return OptionModule.m_SelVMillQuality
-      End Get
-      Set(value As VMillSelTypeOpt)
-         If WritePrivateProfileString(S_MACH, K_SELVMILLQUALITY, CInt(value).ToString()) Then
-            OptionModule.m_SelVMillQuality = value
-         End If
-      End Set
-   End Property
-
   Public Property GeometryTolerance As String
      Get
         Return LenToString(OptionModule.m_dGeometryTolerance, 5)
@@ -287,8 +268,8 @@ Public Class OptionWindowVM
      End Get
      Set(value As Boolean)
         OptionModule.m_bThickLine = value
-         WritePrivateProfileString(S_SCENE, K_LINEWIDTH, If(value, "2", "1"))
-         EgtSetLineAttribs(If(value, 2, 1))
+         WritePrivateProfileString(S_SCENE, K_LINEWIDTH, If( value, "2", "1"))
+         EgtSetLineAttribs( If( value, 2, 1))
      End Set
   End Property

@@ -608,7 +589,7 @@ Public Class OptionWindowVM
      End Get
      Set(value As Boolean)
         OptionModule.m_bSpecialOn = value
-         WritePrivateProfileString(S_SPECIAL, K_SPECIALENABLE, If(value, "1", "0"))
+         WritePrivateProfileString(S_SPECIAL, K_SPECIALENABLE, If( value, "1", "0"))
      End Set
   End Property

@@ -628,7 +609,7 @@ Public Class OptionWindowVM
      End Get
      Set(value As Boolean)
         OptionModule.m_bBeamOn = value
-         WritePrivateProfileString(S_BEAM, K_BEAMENABLE, If(value, "1", "0"))
+         WritePrivateProfileString(S_BEAM, K_BEAMENABLE, If( value, "1", "0"))
      End Set
   End Property

@@ -648,7 +629,7 @@ Public Class OptionWindowVM
      End Get
      Set(value As Boolean)
         OptionModule.m_bWallOn = value
-         WritePrivateProfileString(S_WALL, K_WALLENABLE, If(value, "1", "0"))
+         WritePrivateProfileString(S_WALL, K_WALLENABLE, If( value, "1", "0"))
      End Set
   End Property

@@ -663,7 +644,7 @@ Public Class OptionWindowVM
      End Get
      Set(value As Boolean)
         OptionModule.m_bDoorsOn = value
-         WritePrivateProfileString(S_DOORS, K_DDFENABLE, If(value, "1", "0"))
+         WritePrivateProfileString(S_DOORS, K_DDFENABLE, If( value, "1", "0"))
      End Set
   End Property

@@ -678,7 +659,7 @@ Public Class OptionWindowVM
      End Get
      Set(value As Boolean)
         OptionModule.m_bGunstockOn = value
-         WritePrivateProfileString(S_GUNSTOCK, K_GUNSTOCKENABLE, If(value, "1", "0"))
+         WritePrivateProfileString(S_GUNSTOCK, K_GUNSTOCKENABLE, If( value, "1", "0"))
      End Set
   End Property

@@ -736,17 +717,17 @@ Public Class OptionWindowVM
   End Property
   Public ReadOnly Property ThickLineMsg As String
      Get
-         Return EgtMsg(6536)                     ' Linee spesse
+         Return EgtMsg( 6536)                     ' Linee spesse
      End Get
   End Property
   Public ReadOnly Property SmoothTriMeshMsg As String
      Get
-         Return EgtMsg(6518)                     ' Superfici smussate
+         Return EgtMsg( 6518)                     ' Superfici smussate
      End Get
   End Property
   Public ReadOnly Property UpdateLicenceMsg As String
      Get
-         Return EgtMsg(6553)                     ' Aggiorna licenza
+         Return EgtMsg( 6553)                     ' Aggiorna licenza
      End Get
   End Property

@@ -985,13 +966,6 @@ Public Class OptionWindowVM
      End Get
   End Property

-   Public ReadOnly Property VMillQualityMsg As String
-      Get
-         Return EgtMsg(31214)
-      End Get
-   End Property
-
-
 #End Region

 #Region "COMMANDS"
@@ -1205,135 +1179,135 @@ Public Class OptionWindowVM
      Dim sMachDir As String = Path.Combine(IniFile.m_sMachinesRoot, sMachName)
      ' Preparo direttorio temporaneo
      Dim sTempDir As String = Path.Combine(IniFile.m_sMachinesRoot, "Temp")
-      If My.Computer.FileSystem.DirectoryExists(sTempDir) Then
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+      If My.Computer.FileSystem.DirectoryExists( sTempDir) Then
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
      End If
-      My.Computer.FileSystem.CreateDirectory(sTempDir)
+      My.Computer.FileSystem.CreateDirectory( sTempDir)
      ' Unzip nel direttorio temporaneo
      Using zip As New Ionic.Zip.ZipFile(sMachZip)
-         zip.ExtractAll(sTempDir, Ionic.Zip.ExtractExistingFileAction.DoNotOverwrite)
+         zip.ExtractAll( sTempDir, Ionic.Zip.ExtractExistingFileAction.DoNotOverwrite)
      End Using
      ' Se non è una macchina segnalo il problema ed esco
-      If Not My.Computer.FileSystem.FileExists(Path.Combine(sTempDir, sMachName, sMachName & ".ini")) Or
-         Not My.Computer.FileSystem.FileExists(Path.Combine(sTempDir, sMachName, sMachName & ".mlde")) Then
+      If Not My.Computer.FileSystem.FileExists( Path.Combine( sTempDir, sMachName, sMachName & ".ini"))  Or
+         Not My.Computer.FileSystem.FileExists( Path.Combine( sTempDir, sMachName, sMachName & ".mlde")) Then
         ' Il file {0} non contiene una macchina  -  Avviso
         Dim sOut As String = String.Format(EgtMsg(MSG_OPTIONPAGE + 29), sMachZip)
         MessageBox.Show(sOut, EgtMsg(MSG_MESSAGEBOX + 2), MessageBoxButton.OK, MessageBoxImage.Warning)
         ' Rimuovo il direttorio temporaneo ed esco
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         Return
      End If
      ' Imposto data e ora correnti al file mlde della macchina
      Try
-         File.SetLastWriteTime(Path.Combine(sTempDir, sMachName, sMachName & ".mlde"), System.DateTime.Now)
+         File.SetLastWriteTime( Path.Combine( sTempDir, sMachName, sMachName & ".mlde"), System.DateTime.Now)
      Catch ex As Exception
      End Try
      ' Verifico esistenza di una macchina con lo stesso nome
-      Dim bOldExists As Boolean = My.Computer.FileSystem.DirectoryExists(sMachDir)
+      Dim bOldExists As Boolean = My.Computer.FileSystem.DirectoryExists( sMachDir)
      Dim bUpdate As Boolean = True
      If bOldExists Then
-         Dim MachBox As New MachineBox(Application.Current.MainWindow, sMachName)
-         Select Case MachBox.ShowDialog()
-            Case MessageBoxResult.Yes
-               bUpdate = False
-            Case MessageBoxResult.No
-               bUpdate = True
-            Case MessageBoxResult.Cancel
-               ' Rimuovo il direttorio temporaneo ed esco
-               My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
-               Return
+         Dim MachBox As New MachineBox( Application.Current.MainWindow, sMachName)
+         Select MachBox.ShowDialog()
+         Case MessageBoxResult.Yes
+            bUpdate = False
+         Case MessageBoxResult.No
+            bUpdate = True
+         Case MessageBoxResult.Cancel
+            ' Rimuovo il direttorio temporaneo ed esco
+            My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+            Return
         End Select
         ' Faccio una copia di backup della macchina corrente
         Dim sBackupDir As String = sMachDir & ".old"
-         If My.Computer.FileSystem.DirectoryExists(sBackupDir) Then
-            My.Computer.FileSystem.DeleteDirectory(sBackupDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         If My.Computer.FileSystem.DirectoryExists( sBackupDir) Then
+            My.Computer.FileSystem.DeleteDirectory( sBackupDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         End If
         Try
-            My.Computer.FileSystem.MoveDirectory(sMachDir, sBackupDir, True)
+            My.Computer.FileSystem.MoveDirectory( sMachDir, sBackupDir, True)
         Catch ex As Exception
            ' Ripristino lo stato originale ed esco
-            My.Computer.FileSystem.MoveDirectory(sBackupDir, sMachDir, True)
+            My.Computer.FileSystem.MoveDirectory( sBackupDir, sMachDir, True)
            ' L'aggiornamento della macchina "{0}" non è riuscito.
            Dim sKo As String = String.Format(EgtMsg(MSG_OPTIONPAGE + 35), sMachName)
-            EgtOutLog(sKo)
+            EgtOutLog( sKo)
            MessageBox.Show(sKo, EgtMsg(MSG_MESSAGEBOX + 1), MessageBoxButton.OK)
            Return
         End Try
      End If
      ' Installo la macchina
-      My.Computer.FileSystem.MoveDirectory(Path.Combine(sTempDir, sMachName), sMachDir, True)
+      My.Computer.FileSystem.MoveDirectory( Path.Combine( sTempDir, sMachName), sMachDir, True)
      ' Se è un aggiornamento, recupero utensili, lavorazioni, attrezzaggi e dati per travi
      If bOldExists And bUpdate Then
         Dim sBackupDir As String = sMachDir & ".old"
-         If My.Computer.FileSystem.DirectoryExists(sBackupDir & "\Tools") Then
-            If My.Computer.FileSystem.DirectoryExists(sMachDir & "\Tools") Then
-               My.Computer.FileSystem.DeleteDirectory(sMachDir & "\Tools", FileIO.DeleteDirectoryOption.DeleteAllContents)
+         If My.Computer.FileSystem.DirectoryExists( sBackupDir & "\Tools") Then
+            If My.Computer.FileSystem.DirectoryExists( sMachDir & "\Tools") Then
+                My.Computer.FileSystem.DeleteDirectory( sMachDir & "\Tools", FileIO.DeleteDirectoryOption.DeleteAllContents)
            End If
-            My.Computer.FileSystem.CopyDirectory(sBackupDir & "\Tools", sMachDir & "\Tools", True)
+            My.Computer.FileSystem.CopyDirectory( sBackupDir & "\Tools", sMachDir & "\Tools", True)
         End If
-         If My.Computer.FileSystem.DirectoryExists(sBackupDir & "\Machinings") Then
-            If My.Computer.FileSystem.DirectoryExists(sMachDir & "\Machinings") Then
-               My.Computer.FileSystem.DeleteDirectory(sMachDir & "\Machinings", FileIO.DeleteDirectoryOption.DeleteAllContents)
+         If My.Computer.FileSystem.DirectoryExists( sBackupDir & "\Machinings") Then
+            If My.Computer.FileSystem.DirectoryExists( sMachDir & "\Machinings") Then
+                My.Computer.FileSystem.DeleteDirectory( sMachDir & "\Machinings", FileIO.DeleteDirectoryOption.DeleteAllContents)
            End If
-            My.Computer.FileSystem.CopyDirectory(sBackupDir & "\Machinings", sMachDir & "\Machinings", True)
+            My.Computer.FileSystem.CopyDirectory( sBackupDir & "\Machinings", sMachDir & "\Machinings", True)
         End If
-         If My.Computer.FileSystem.DirectoryExists(sBackupDir & "\SetUp") Then
-            If My.Computer.FileSystem.DirectoryExists(sMachDir & "\SetUp") Then
-               My.Computer.FileSystem.DeleteDirectory(sMachDir & "\SetUp", FileIO.DeleteDirectoryOption.DeleteAllContents)
+         If My.Computer.FileSystem.DirectoryExists( sBackupDir & "\SetUp") Then
+            If My.Computer.FileSystem.DirectoryExists( sMachDir & "\SetUp") Then
+                My.Computer.FileSystem.DeleteDirectory( sMachDir & "\SetUp", FileIO.DeleteDirectoryOption.DeleteAllContents)
            End If
-            My.Computer.FileSystem.CopyDirectory(sBackupDir & "\SetUp", sMachDir & "\SetUp", True)
+            My.Computer.FileSystem.CopyDirectory( sBackupDir & "\SetUp", sMachDir & "\SetUp", True)
         End If
-         If My.Computer.FileSystem.DirectoryExists(sBackupDir & "\Beam") Then
+         If My.Computer.FileSystem.DirectoryExists( sBackupDir & "\Beam") Then
            ' Flag per sovrascrivere vecchio file BeamData.lua con nuovo
            Dim bBeamDataExists As Boolean = False
            Const sBeamData As String = "\BeamData.lua"
            ' Flag per sovrascrivere vecchio file MachiningTypes.ini
            Dim bMchgTypesExists As Boolean = False
            Const sMchgTypes As String = "\MachiningTypes.ini"
-            If My.Computer.FileSystem.DirectoryExists(sMachDir & "\Beam") Then
-               If My.Computer.FileSystem.FileExists(sMachDir & "\Beam" & sBeamData) Then
+            If My.Computer.FileSystem.DirectoryExists( sMachDir & "\Beam") Then
+               If My.Computer.FileSystem.FileExists( sMachDir & "\Beam" & sBeamData) Then
                  bBeamDataExists = True
-                  My.Computer.FileSystem.MoveFile(sMachDir & "\Beam" & sBeamData, sMachDir & sBeamData, True)
+                  My.Computer.FileSystem.MoveFile( sMachDir & "\Beam" & sBeamData, sMachDir & sBeamData, True) 
               End If
-               If My.Computer.FileSystem.FileExists(sMachDir & "\Beam" & sMchgTypes) Then
+               If My.Computer.FileSystem.FileExists( sMachDir & "\Beam" & sMchgTypes) Then
                  bMchgTypesExists = True
-                  My.Computer.FileSystem.MoveFile(sMachDir & "\Beam" & sMchgTypes, sMachDir & sMchgTypes, True)
+                  My.Computer.FileSystem.MoveFile( sMachDir & "\Beam" & sMchgTypes, sMachDir & sMchgTypes, True) 
               End If
-               My.Computer.FileSystem.DeleteDirectory(sMachDir & "\Beam", FileIO.DeleteDirectoryOption.DeleteAllContents)
+               My.Computer.FileSystem.DeleteDirectory( sMachDir & "\Beam", FileIO.DeleteDirectoryOption.DeleteAllContents)
            End If
-            My.Computer.FileSystem.CopyDirectory(sBackupDir & "\Beam", sMachDir & "\Beam", True)
-            If bBeamDataExists Then My.Computer.FileSystem.MoveFile(sMachDir & sBeamData, sMachDir & "\Beam" & sBeamData, True)
-            If bMchgTypesExists Then My.Computer.FileSystem.MoveFile(sMachDir & sMchgTypes, sMachDir & "\Beam" & sMchgTypes, True)
+            My.Computer.FileSystem.CopyDirectory( sBackupDir & "\Beam", sMachDir & "\Beam", True)
+            If bBeamDataExists Then My.Computer.FileSystem.MoveFile( sMachDir & sBeamData, sMachDir & "\Beam" & sBeamData, True)
+            If bMchgTypesExists Then My.Computer.FileSystem.MoveFile( sMachDir & sMchgTypes, sMachDir & "\Beam" & sMchgTypes, True)
         End If
-         If My.Computer.FileSystem.DirectoryExists(sBackupDir & "\Wall") Then
+         If My.Computer.FileSystem.DirectoryExists( sBackupDir & "\Wall") Then
            ' Flag per sovrascrittura vecchio file WallData.lua con nuovo
            Dim bWallDataExists As Boolean = False
            Const sWallData As String = "\WallData.lua"
            ' Flag per sovrascrivere vecchio file MachiningTypes.ini
            Dim bMchgTypesExists As Boolean = False
            Const sMchgTypes As String = "\MachiningTypes.ini"
-            If My.Computer.FileSystem.DirectoryExists(sMachDir & "\Wall") Then
-               If My.Computer.FileSystem.FileExists(sMachDir & "\Wall" & sWallData) Then
+            If My.Computer.FileSystem.DirectoryExists( sMachDir & "\Wall") Then
+               If My.Computer.FileSystem.FileExists( sMachDir & "\Wall" & sWallData) Then
                  bWallDataExists = True
-                  My.Computer.FileSystem.MoveFile(sMachDir & "\Wall" & sWallData, sMachDir & sWallData, True)
+                  My.Computer.FileSystem.MoveFile( sMachDir & "\Wall" & sWallData, sMachDir & sWallData, True) 
               End If
-               If My.Computer.FileSystem.FileExists(sMachDir & "\Wall" & sMchgTypes) Then
+               If My.Computer.FileSystem.FileExists( sMachDir & "\Wall" & sMchgTypes) Then
                  bMchgTypesExists = True
-                  My.Computer.FileSystem.MoveFile(sMachDir & "\Wall" & sMchgTypes, sMachDir & sMchgTypes, True)
+                  My.Computer.FileSystem.MoveFile( sMachDir & "\Wall" & sMchgTypes, sMachDir & sMchgTypes, True) 
               End If
-               My.Computer.FileSystem.DeleteDirectory(sMachDir & "\Wall", FileIO.DeleteDirectoryOption.DeleteAllContents)
+               My.Computer.FileSystem.DeleteDirectory( sMachDir & "\Wall", FileIO.DeleteDirectoryOption.DeleteAllContents)
            End If
-            My.Computer.FileSystem.CopyDirectory(sBackupDir & "\Wall", sMachDir & "\Wall", True)
-            If bWallDataExists Then My.Computer.FileSystem.MoveFile(sMachDir & sWallData, sMachDir & "\Wall" & sWallData, True)
-            If bMchgTypesExists Then My.Computer.FileSystem.MoveFile(sMachDir & sMchgTypes, sMachDir & "\Wall" & sMchgTypes, True)
+            My.Computer.FileSystem.CopyDirectory( sBackupDir & "\Wall", sMachDir & "\Wall", True)
+            If bWallDataExists Then My.Computer.FileSystem.MoveFile( sMachDir & sWallData, sMachDir & "\Wall" & sWallData, True)
+            If bMchgTypesExists Then My.Computer.FileSystem.MoveFile( sMachDir & sMchgTypes, sMachDir & "\Wall" & sMchgTypes, True)
         End If
      End If
      'La macchina "{0}" è stata aggiornata con successo.
      Dim sOk As String = String.Format(EgtMsg(MSG_OPTIONPAGE + 30), sMachName)
-      EgtOutLog(sOk)
+      EgtOutLog( sOk)
      MessageBox.Show(sOk, EgtMsg(MSG_MESSAGEBOX + 3), MessageBoxButton.OK)
      ' Rimuovo il direttorio temporaneo
-      My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+      My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
      ' Aggiorno la lista delle macchina
      Map.refMachinePanelVM.InsertMachine(sMachDir)
   End Sub
@@ -1381,7 +1355,7 @@ Public Class OptionWindowVM
            ' aggiungo i file della Macchina
            Dim sMachineDir As String = IniFile.m_sMachinesRoot & "\" & sCurrMachineName
            If Directory.Exists(sMachineDir) Then
-               zip.AddSelectedFiles("name != *\.git\*.* and name != *.git*", sMachineDir, sCurrMachineName, True)
+               zip.AddSelectedFiles( "name != *\.git\*.* and name != *.git*", sMachineDir, sCurrMachineName, True)
            End If
            ' salvo lo zip
            zip.Save()
@@ -1392,7 +1366,7 @@ Public Class OptionWindowVM
         Dim sKo As String = String.Format(EgtMsg(6551), sCurrMachineName)
         EgtOutLog(sKo)
         MessageBox.Show(sKo, EgtMsg(MSG_MESSAGEBOX + 1), MessageBoxButton.OK)
-         Return
+         return
      End Try
      'La macchina "{0}" è stata esportata con successo.
      Dim sOk As String = String.Format(EgtMsg(6552), sCurrMachineName)
@@ -1417,10 +1391,10 @@ Public Class OptionWindowVM
      Dim sExeVer As String = IniFile.GetProgramVersion()
      ' Verifico presenza di una precedente installazione del Beam
      Dim sBeamVer As String = ""
-      IniFile.GetSpecialLuaVersion(IniFile.m_sBeamDirPath, sBeamVer)
-      If String.IsNullOrEmpty(sBeamVer) Then
+      IniFile.GetSpecialLuaVersion( IniFile.m_sBeamDirPath, sBeamVer)
+      If String.IsNullOrEmpty( sBeamVer) Then
         ' Il modulo "{0}" non è stato trovato, impossibile aggiornare. - Avviso
-         Dim sOut As String = String.Format(EgtMsg(6555), "Beam")
+         Dim sOut As String = String.Format(EgtMsg(6555), "Beam") 
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15002), MessageBoxButton.OK, MessageBoxImage.Warning)
         ' Esco
         Return
@@ -1436,26 +1410,26 @@ Public Class OptionWindowVM
      Dim sBeamZip As String = BeamDlg.FileName
      ' Preparo direttorio temporaneo
      Dim sTempDir As String = Path.Combine(IniFile.m_sTempDir, "Beam")
-      If My.Computer.FileSystem.DirectoryExists(sTempDir) Then
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+      If My.Computer.FileSystem.DirectoryExists( sTempDir) Then
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
      End If
-      My.Computer.FileSystem.CreateDirectory(sTempDir)
+      My.Computer.FileSystem.CreateDirectory( sTempDir)
      ' Unzip nel direttorio temporaneo
      Using zip As New Ionic.Zip.ZipFile(sBeamZip)
-         zip.ExtractAll(sTempDir, Ionic.Zip.ExtractExistingFileAction.DoNotOverwrite)
+         zip.ExtractAll( sTempDir, Ionic.Zip.ExtractExistingFileAction.DoNotOverwrite)
      End Using
      ' Recupero i dati del nuovo Beam
      Dim sNewName = ""
      Dim sNewVer = ""
      Dim sNewMinExe = ""
-      IniFile.GetSpecialLuaData(sTempDir, sNewName, sNewVer, sNewMinExe)
+      IniFile.GetSpecialLuaData( sTempDir, sNewName, sNewVer, sNewMinExe)
      ' Verifico che sia veramente il Beam
      If String.Compare(sNewName, "Beam") <> 0 Then
         ' Il file zip non contiene il modulo "{0}". - Avviso
-         Dim sOut As String = String.Format(EgtMsg(6556), "Beam")
+         Dim sOut As String = String.Format(EgtMsg(6556), "Beam") 
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15002), MessageBoxButton.OK, MessageBoxImage.Warning)
         ' Rimuovo il direttorio temporaneo ed esco
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         Return
      End If
      ' Verifico la versione minima del programma
@@ -1464,42 +1438,42 @@ Public Class OptionWindowVM
         Dim sOut As String = String.Format(EgtMsg(6557), "Beam", sNewMinExe)
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15002), MessageBoxButton.OK, MessageBoxImage.Warning)
         ' Rimuovo il direttorio temporaneo ed esco
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         Return
      End If
      ' Verifico la versione del Beam e se più vecchia chiedo cosa fare
      If String.Compare(sNewVer, sBeamVer) < 0 Then
         ' La versione del nuovo modulo "{0}" è più vecchia dell'attuale. Vuoi sovrascrivere lo stesso ?
         Dim sOut As String = String.Format(EgtMsg(6558), "Beam")
-         If MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15003), MessageBoxButton.YesNo, MessageBoxImage.Question) = MessageBoxResult.No Then
+         if MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15003), MessageBoxButton.YesNo, MessageBoxImage.Question) = MessageBoxResult.No Then
            ' Rimuovo il direttorio temporaneo ed esco
-            My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+            My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
            Return
         End If
      End If
      ' Faccio una copia di backup del Beam corrente
      Dim sBackupDir As String = IniFile.m_sBeamDirPath & ".old"
-      If My.Computer.FileSystem.DirectoryExists(sBackupDir) Then
-         My.Computer.FileSystem.DeleteDirectory(sBackupDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+      If My.Computer.FileSystem.DirectoryExists( sBackupDir) Then
+         My.Computer.FileSystem.DeleteDirectory( sBackupDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
      End If
      Try
-         My.Computer.FileSystem.MoveDirectory(IniFile.m_sBeamDirPath, sBackupDir, True)
+         My.Computer.FileSystem.MoveDirectory( IniFile.m_sBeamDirPath, sBackupDir, True)
      Catch ex As Exception
         ' Ripristino lo stato originale ed esco
-         My.Computer.FileSystem.MoveDirectory(sBackupDir, IniFile.m_sBeamDirPath, True)
+         My.Computer.FileSystem.MoveDirectory( sBackupDir, IniFile.m_sBeamDirPath, True)
         ' L'aggiornamento del modulo "{0}" non è riuscito. - Errore
         Dim sOut As String = String.Format(EgtMsg(6559), "Beam")
-         EgtOutLog(sOut)
+         EgtOutLog( sOut)
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15001), MessageBoxButton.OK, MessageBoxImage.Error)
         ' Rimuovo il direttorio temporaneo ed esco
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         Return
      End Try
      ' Installo il Beam
-      My.Computer.FileSystem.MoveDirectory(sTempDir, IniFile.m_sBeamDirPath, True)
+      My.Computer.FileSystem.MoveDirectory( sTempDir, IniFile.m_sBeamDirPath, True)
      ' Il modulo "{0}" è stata aggiornato con successo. - Info
      Dim sOk As String = String.Format(EgtMsg(6560), "Beam")
-      EgtOutLog(sOk)
+      EgtOutLog( sOk)
      MessageBox.Show(Application.Current.MainWindow, sOk, EgtMsg(15003), MessageBoxButton.OK)
   End Sub

@@ -1521,10 +1495,10 @@ Public Class OptionWindowVM
      Dim sExeVer As String = IniFile.GetProgramVersion()
      ' Verifico presenza di una precedente installazione del Wall
      Dim sWallVer As String = ""
-      IniFile.GetSpecialLuaVersion(IniFile.m_sWallDirPath, sWallVer)
-      If String.IsNullOrEmpty(sWallVer) Then
+      IniFile.GetSpecialLuaVersion( IniFile.m_sWallDirPath, sWallVer)
+      If String.IsNullOrEmpty( sWallVer) Then
         ' Il modulo "{0}" non è stato trovato, impossibile aggiornare. - Avviso
-         Dim sOut As String = String.Format(EgtMsg(6555), "Wall")
+         Dim sOut As String = String.Format(EgtMsg(6555), "Wall") 
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15002), MessageBoxButton.OK, MessageBoxImage.Warning)
         ' Esco
         Return
@@ -1540,26 +1514,26 @@ Public Class OptionWindowVM
      Dim sWallZip As String = WallDlg.FileName
      ' Preparo direttorio temporaneo
      Dim sTempDir As String = Path.Combine(IniFile.m_sTempDir, "Wall")
-      If My.Computer.FileSystem.DirectoryExists(sTempDir) Then
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+      If My.Computer.FileSystem.DirectoryExists( sTempDir) Then
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
      End If
-      My.Computer.FileSystem.CreateDirectory(sTempDir)
+      My.Computer.FileSystem.CreateDirectory( sTempDir)
      ' Unzip nel direttorio temporaneo
      Using zip As New Ionic.Zip.ZipFile(sWallZip)
-         zip.ExtractAll(sTempDir, Ionic.Zip.ExtractExistingFileAction.DoNotOverwrite)
+         zip.ExtractAll( sTempDir, Ionic.Zip.ExtractExistingFileAction.DoNotOverwrite)
      End Using
      ' Recupero i dati del nuovo Wall
      Dim sNewName = ""
      Dim sNewVer = ""
      Dim sNewMinExe = ""
-      IniFile.GetSpecialLuaData(sTempDir, sNewName, sNewVer, sNewMinExe)
+      IniFile.GetSpecialLuaData( sTempDir, sNewName, sNewVer, sNewMinExe)
      ' Verifico che sia veramente il Wall
      If String.Compare(sNewName, "Wall") <> 0 Then
         ' Il file zip non contiene il modulo "{0}". - Avviso
-         Dim sOut As String = String.Format(EgtMsg(6556), "Wall")
+         Dim sOut As String = String.Format(EgtMsg(6556), "Wall") 
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15002), MessageBoxButton.OK, MessageBoxImage.Warning)
         ' Rimuovo il direttorio temporaneo ed esco
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         Return
      End If
      ' Verifico la versione minima del programma
@@ -1568,42 +1542,42 @@ Public Class OptionWindowVM
         Dim sOut As String = String.Format(EgtMsg(6557), "Wall", sNewMinExe)
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15002), MessageBoxButton.OK, MessageBoxImage.Warning)
         ' Rimuovo il direttorio temporaneo ed esco
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         Return
      End If
      ' Verifico la versione del Wall e se più vecchia chiedo cosa fare
      If String.Compare(sNewVer, sWallVer) < 0 Then
         ' La versione del nuovo modulo "{0}" è più vecchia dell'attuale. Vuoi sovrascrivere lo stesso ?
         Dim sOut As String = String.Format(EgtMsg(6558), "Wall")
-         If MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15003), MessageBoxButton.YesNo, MessageBoxImage.Question) = MessageBoxResult.No Then
+         if MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15003), MessageBoxButton.YesNo, MessageBoxImage.Question) = MessageBoxResult.No Then
            ' Rimuovo il direttorio temporaneo ed esco
-            My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+            My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
            Return
         End If
      End If
      ' Faccio una copia di backup del Wall corrente
      Dim sBackupDir As String = IniFile.m_sWallDirPath & ".old"
-      If My.Computer.FileSystem.DirectoryExists(sBackupDir) Then
-         My.Computer.FileSystem.DeleteDirectory(sBackupDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+      If My.Computer.FileSystem.DirectoryExists( sBackupDir) Then
+         My.Computer.FileSystem.DeleteDirectory( sBackupDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
      End If
      Try
-         My.Computer.FileSystem.MoveDirectory(IniFile.m_sWallDirPath, sBackupDir, True)
+         My.Computer.FileSystem.MoveDirectory( IniFile.m_sWallDirPath, sBackupDir, True)
      Catch ex As Exception
         ' Ripristino lo stato originale ed esco
-         My.Computer.FileSystem.MoveDirectory(sBackupDir, IniFile.m_sWallDirPath, True)
+         My.Computer.FileSystem.MoveDirectory( sBackupDir, IniFile.m_sWallDirPath, True)
         ' L'aggiornamento del modulo "{0}" non è riuscito. - Errore
         Dim sOut As String = String.Format(EgtMsg(6559), "Wall")
-         EgtOutLog(sOut)
+         EgtOutLog( sOut)
         MessageBox.Show(Application.Current.MainWindow, sOut, EgtMsg(15001), MessageBoxButton.OK, MessageBoxImage.Error)
         ' Rimuovo il direttorio temporaneo ed esco
-         My.Computer.FileSystem.DeleteDirectory(sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
+         My.Computer.FileSystem.DeleteDirectory( sTempDir, FileIO.DeleteDirectoryOption.DeleteAllContents)
         Return
      End Try
      ' Installo il Wall
-      My.Computer.FileSystem.MoveDirectory(sTempDir, IniFile.m_sWallDirPath, True)
+      My.Computer.FileSystem.MoveDirectory( sTempDir, IniFile.m_sWallDirPath, True)
      ' Il modulo "{0}" è stata aggiornato con successo. - Info
      Dim sOk As String = String.Format(EgtMsg(6560), "Wall")
-      EgtOutLog(sOk)
+      EgtOutLog( sOk)
      MessageBox.Show(Application.Current.MainWindow, sOk, EgtMsg(15003), MessageBoxButton.OK)
   End Sub

@@ -1691,29 +1665,4 @@ Public Class GeomTypeConverter
      Throw New NotImplementedException
   End Function

-End Class
-
-Public Class VMillTypeConverter
-   Implements IValueConverter
-
-   Public Function Convert(value As Object, targetType As Type, parameter As Object, culture As CultureInfo) As Object Implements IValueConverter.Convert
-      Select Case CInt(value)
-         Case VMillSelTypeOpt.LOWER
-            Return EgtMsg(31215)
-         Case VMillSelTypeOpt.LOW
-            Return EgtMsg(31216)
-         Case VMillSelTypeOpt.STANDARD
-            Return EgtMsg(31217)
-         Case VMillSelTypeOpt.HIGH
-            Return EgtMsg(31218)
-         Case VMillSelTypeOpt.HIGHER
-            Return EgtMsg(31219)
-         Case Else
-            Return ""
-      End Select
-   End Function
-
-   Public Function ConvertBack(value As Object, targetType As Type, parameter As Object, culture As CultureInfo) As Object Implements IValueConverter.ConvertBack
-      Throw New NotImplementedException()
-   End Function
 End Class
@@ -16,7 +16,7 @@
         <Setter Property="DockPanel.Dock" Value="{Binding}" />
      </Style>
   </ItemsControl.ItemContainerStyle>
-
+   
   <interactivity:Interaction.Triggers>
      <interactivity:EventTrigger EventName="Loaded">
         <interactivity:InvokeCommandAction Command="{Binding LoadedCommand}"/>
@@ -58,25 +58,11 @@ Public Class ProjectVM
      End Get
   End Property

-   Private m_DynamicGrid As New Grid()
-   Public ReadOnly Property DynamicGrid As Grid
-      Get
-         Return m_DynamicGrid
-      End Get
-   End Property
-
-   Private m_DynamicGridList As New List(Of Object)
-   Public ReadOnly Property DynamicGridList As List(Of Object)
-      Get
-         Return m_DynamicGridList
-      End Get
-   End Property
-
 #End Region

 #Region "EGTUILIB FIELDS"

-   Private m_bCPlaneTypePos As Boolean
+    Private m_bCPlaneTypePos As Boolean

   ' Variabile per implementazione eventi
   Private m_InputText As String
@@ -93,17 +79,6 @@ Public Class ProjectVM
      TMDbParamVisibility.bFirst = True
      ' Inizializza i parametri della scena
      'InitializeEgtProject()
-
-      Dim m_TopTrayV As New TopTrayV
-      Dim m_LeftTrayV As New LeftTrayV
-      Dim m_RightTrayV As New RightTrayV
-      Dim m_BottomTrayV As New BottomTrayV
-      Dim m_SceneContentControlV As New SceneContentControlV
-
-      CreateDynamicGrid()
-
-      Dim gridSplitter As GridSplitter = CreateGridSplitter()
-
      ' aggiungo componenti interfaccia
      Dim bPlugin As Boolean = False
      Dim PluginDirNameList() As String = {}
@@ -130,57 +105,30 @@ Public Class ProjectVM
               Dim ConfigurationData As IPluginConfigData = Map.refMainWindowVM.GetConfigData(Of IPluginConfigData)(PluginName & ".ConfigurationData")
               If Not IsNothing(ConfigurationData) And ConfigurationData.ControlList.Count > 0 Then
                  For Each Element In ConfigurationData.ControlList
-                     PopolateGridWithPlugIn(m_TopTrayV, m_RightTrayV, m_BottomTrayV, m_SceneContentControlV, gridSplitter)
                     Select Case Element.Name
                        Case PLUGIN_RIGHT_TRAY
-                           'm_PanelList.Add(New RightTrayV)
-                           'aggiungo RightTrayV alla griglia
-                           m_DynamicGrid.Children.Add(m_RightTrayV)
+                           m_PanelList.Add(New RightTrayV)
                           Map.refOptionPanelVM.SetPanelViewState(Element.ViewPanelState)
                        Case PLUGIN_LEFT_TRAY
-                           'm_PanelList.Add(New LeftTrayV)
-                           ' aggiungo LeftTrayV alla griglia
-                           m_DynamicGrid.Children.Add(m_LeftTrayV)
+                           m_PanelList.Add(New LeftTrayV)
                        Case Else
                           m_PanelList.Add(Map.refMainWindowVM.GetControlByName(Of IPluginControl)(Element))
-                           ' aggiungo LeftTrayV alla griglia
-                           'm_DynamicGrid.Children.Add(Map.refMainWindowVM.GetControlByName(Of IPluginControl)(Element))
                     End Select
                  Next
               End If
            End If
         Next
-         ' aggiungo gridSplitter alla griglia
-         m_DynamicGrid.Children.Add(gridSplitter)
-         'm_PanelList.Add(New BottomTrayV)
-         ' aggiungo BottomTrayV alla griglia
-         m_DynamicGrid.Children.Add(m_BottomTrayV)
-         'm_PanelList.Add(New TopTrayV)
-         ' aggiungo TopTrayV alla griglia
-         m_DynamicGrid.Children.Add(m_TopTrayV)
+         m_PanelList.Add(New BottomTrayV)
+         m_PanelList.Add(New TopTrayV)
         ' nascondo tasti gestione progetto se attivo plugin
         Map.refTopCommandBarVM.SetProjectManagerVisibility(False)
      Else
-         PololateGrid(m_TopTrayV, m_LeftTrayV, m_RightTrayV, m_BottomTrayV, m_SceneContentControlV, gridSplitter)
-         'm_PanelList.Add(New TopTrayV)
-         'm_PanelList.Add(New LeftTrayV)
-         'm_PanelList.Add(New RightTrayV)
-         'm_PanelList.Add(New BottomTrayV)
-         ' aggiungo TopTrayV alla griglia
-         m_DynamicGrid.Children.Add(m_TopTrayV)
-         ' aggiungo LeftTrayV alla griglia
-         m_DynamicGrid.Children.Add(m_LeftTrayV)
-         ' aggiungo gridSplitter alla griglia
-         m_DynamicGrid.Children.Add(gridSplitter)
-         ' aggiungo RightTrayV alla griglia
-         m_DynamicGrid.Children.Add(m_RightTrayV)
-         ' aggiungo BottomTrayV alla griglia
-         m_DynamicGrid.Children.Add(m_BottomTrayV)
+         m_PanelList.Add(New TopTrayV)
+         m_PanelList.Add(New LeftTrayV)
+         m_PanelList.Add(New RightTrayV)
+         m_PanelList.Add(New BottomTrayV)
      End If
-      'm_PanelList.Add(New SceneContentControlV)
-      ' aggiungo SceneContentControlV alla griglia
-      m_DynamicGrid.Children.Add(m_SceneContentControlV)
-      m_PanelList.Add(m_DynamicGrid)
+      m_PanelList.Add(New SceneContentControlV)
   End Sub

 #End Region
@@ -296,14 +244,14 @@ Public Class ProjectVM
            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
+      ' Se altrimenti manca il collegamento con la chiave di rete
      ElseIf IniFile.m_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 : sKeyInfo \n "Programma senza licenza. \n Caricala e riavvia il programma."  "Errore"
@@ -344,125 +292,6 @@ Public Class ProjectVM

 #Region "METHODS"

-   ''' <summary>
-   ''' Funzione per popolare la griglia
-   ''' </summary>
-   ''' <param name="m_TopTrayV"></param>
-   ''' <param name="m_LeftTrayV"></param>
-   ''' <param name="m_RightTrayV"></param>
-   ''' <param name="m_BottomTrayV"></param>
-   ''' <param name="m_SceneContentControlV"></param>
-   ''' <param name="gridSplitter"></param>
-   Private Shared Sub PololateGrid(m_TopTrayV As TopTrayV, m_LeftTrayV As LeftTrayV, m_RightTrayV As RightTrayV, m_BottomTrayV As BottomTrayV, m_SceneContentControlV As SceneContentControlV, gridSplitter As GridSplitter)
-      ' aggiungo TopTrayV
-      Grid.SetRow(m_TopTrayV, 0)
-      Grid.SetColumnSpan(m_TopTrayV, 3)
-
-      ' aggiungo LeftTrayV
-      Grid.SetRow(m_LeftTrayV, 1)
-      Grid.SetColumn(m_LeftTrayV, 0)
-      Grid.SetRowSpan(m_LeftTrayV, 2)
-
-      ' aggiungo RightTrayV
-      Grid.SetRow(m_RightTrayV, 1)
-      Grid.SetColumn(m_RightTrayV, 2)
-      Grid.SetRowSpan(m_RightTrayV, 2)
-
-      'aggiungo gridSplitter
-      Grid.SetRow(gridSplitter, 1)
-      Grid.SetColumn(gridSplitter, 2)
-
-      ' aggiungo BottomTrayV
-      Grid.SetRow(m_BottomTrayV, 2)
-      Grid.SetColumn(m_BottomTrayV, 1)
-
-      ' aggiungo Scena
-      Grid.SetRow(m_SceneContentControlV, 1)
-      Grid.SetColumn(m_SceneContentControlV, 1)
-   End Sub
-
-   ''' <summary>
-   ''' Funzione per popolare la griglia con PlugIn
-   ''' </summary>
-   ''' <param name="m_TopTrayV"></param>
-   ''' <param name="m_RightTrayV"></param>
-   ''' <param name="m_BottomTrayV"></param>
-   ''' <param name="m_SceneContentControlV"></param>
-   ''' <param name="gridSplitter"></param>
-   Private Shared Sub PopolateGridWithPlugIn(m_TopTrayV As TopTrayV, m_RightTrayV As RightTrayV, m_BottomTrayV As BottomTrayV, m_SceneContentControlV As SceneContentControlV, gridSplitter As GridSplitter)
-      ' aggiungo TopTrayV
-      Grid.SetRow(m_TopTrayV, 0)
-      Grid.SetColumn(m_TopTrayV, 1)
-
-      ' aggiungo RightTrayV
-      Grid.SetRow(m_RightTrayV, 0)
-      Grid.SetColumn(m_RightTrayV, 2)
-      Grid.SetRowSpan(m_RightTrayV, 2)
-
-      'aggiungo gridSplitter
-      Grid.SetRow(gridSplitter, 0)
-      Grid.SetColumn(gridSplitter, 2)
-      Grid.SetRowSpan(gridSplitter, 2)
-
-      ' aggiungo BottomTrayV
-      Grid.SetRow(m_BottomTrayV, 2)
-      Grid.SetColumn(m_BottomTrayV, 1)
-
-      ' aggiungo Scena
-      Grid.SetRow(m_SceneContentControlV, 1)
-      Grid.SetColumn(m_SceneContentControlV, 1)
-   End Sub
-
-   ''' <summary>
-   ''' Creazione GridSplitter
-   ''' </summary>
-   ''' <returns></returns>
-   Private Shared Function CreateGridSplitter() As GridSplitter
-      ' creo gridsplitter
-      Return New GridSplitter With {
-         .Width = 30,
-         .HorizontalAlignment = HorizontalAlignment.Left,
-         .VerticalAlignment = VerticalAlignment.Stretch,
-         .Background = Brushes.Transparent
-      }
-   End Function
-
-   ''' <summary>
-   ''' Creazione Griglia Dinamica
-   ''' </summary>
-   Private Sub CreateDynamicGrid()
-      ' creo colonne griglia dinamica
-      Dim gridCol1 As New ColumnDefinition With {
-         .Width = New GridLength(1, GridUnitType.Auto)
-      }
-      '.Width = New GridLength(1, GridUnitType.Auto)
-      Dim gridCol2 As New ColumnDefinition With {
-         .Width = New GridLength(1, GridUnitType.Star)
-      }
-      Dim gridCol3 As New ColumnDefinition With {
-         .Width = New GridLength(250)
-      }
-      ' aggiungo le colonne alla griglia
-      m_DynamicGrid.ColumnDefinitions.Add(gridCol1)
-      m_DynamicGrid.ColumnDefinitions.Add(gridCol2)
-      m_DynamicGrid.ColumnDefinitions.Add(gridCol3)
-
-      ' creo righe griglia dinamica
-      Dim gridRow1 As New RowDefinition With {
-         .Height = New GridLength(1, GridUnitType.Auto)
-      }
-      Dim gridRow2 As New RowDefinition With {
-         .Height = New GridLength(1, GridUnitType.Star)
-      }
-      Dim gridRow3 As New RowDefinition With {
-         .Height = New GridLength(1, GridUnitType.Auto)
-      }
-      ' aggiungo righe alla griglia
-      m_DynamicGrid.RowDefinitions.Add(gridRow1)
-      m_DynamicGrid.RowDefinitions.Add(gridRow2)
-      m_DynamicGrid.RowDefinitions.Add(gridRow3)
-   End Sub
-
   Private Sub PreInitializeScene()
      ' imposto colore di default
      Dim DefColor As New Color3d(0, 0, 0)
@@ -478,13 +307,10 @@ Public Class ProjectVM
      Dim nLineWidth As Integer = 1
      nLineWidth = GetPrivateProfileInt(S_SCENE, K_LINEWIDTH, nLineWidth)
      m_ProjectScene.SetLineWidth(nLineWidth)
-      ' imposto colori di evidenziazione
+      ' imposto colore di evidenziazione
      Dim MarkColor As New Color3d(255, 255, 0)
      GetPrivateProfileColor(S_SCENE, K_MARK, MarkColor)
      m_ProjectScene.SetMarkMaterial(MarkColor)
-      Dim Mark2Color As New Color3d(255, 64, 64)
-      GetPrivateProfileColor(S_SCENE, K_MARK2, Mark2Color)
-      m_ProjectScene.SetMark2Material(Mark2Color)
      ' imposto colore per superfici selezionate
      Dim SelSurfColor As New Color3d(255, 255, 192)
      GetPrivateProfileColor(S_SCENE, K_SELSURF, SelSurfColor)
@@ -657,7 +483,7 @@ Public Class ProjectVM
            End If
            ' Esecuzione
            bOk = ExecBeam(sFile, sMachine, nFlag, True)
-            ' altrimenti pareti
+         ' altrimenti pareti
         Else
            ' Verifica abilitazione elaborazione pareti
            If Not VerifyWall(sFile, sMachine, nFlag) Then
@@ -671,12 +497,12 @@ Public Class ProjectVM
         If nFlag = 0 Or nFlag = 3 Or nFlag = 4 Then
            Map.refMachinePanelVM.SaveCurrentMachine()
            Map.refMainWindowVM.CloseApplicationCmd()
-            ' Altrimenti se richiesta visualizzazione DB utensili
+         ' Altrimenti se richiesta visualizzazione DB utensili
         ElseIf nFlag = 11 And bOk Then
            MyMachinePanelVM.ToolDb()
            Map.refMachinePanelVM.SaveCurrentMachine()
            Map.refMainWindowVM.CloseApplicationCmd()
-            ' Altrimenti se richiesta visualizzazione DB lavorazioni
+         ' Altrimenti se richiesta visualizzazione DB lavorazioni
         ElseIf nFlag = 12 And bOk Then
            MyMachinePanelVM.MachDb()
            If bBeam Then
@@ -686,7 +512,7 @@ Public Class ProjectVM
            End If
            Map.refMachinePanelVM.SaveCurrentMachine()
            Map.refMainWindowVM.CloseApplicationCmd()
-            ' Altrimenti se errore
+         ' Altrimenti se errore
         ElseIf Not bOk Then
            EgtZoom(ZM.ALL)
         End If
@@ -1273,8 +1099,8 @@ Public Class ProjectVM
         Select Case m_SceneSelType
            Case SceneSelTypeOpt.FIXTURE
               Dim nFixtureId As Integer = EgtGetParent(EgtGetParent(nId))
-               'Dim sName As String = ""
-               'EgtGetName(EgtGetParent(nId), sName)
+               Dim sName As String = ""
+               EgtGetName(EgtGetParent(nId), sName)
               If EgtVerifyFixture(nFixtureId) Then
                  m_SelType = DispositionUtility.SelType.FIXTURE
                  ' Se già selezionato 
@@ -1292,12 +1118,14 @@ Public Class ProjectVM
                  EgtGetPlaneSnapPoint(e.Location, Vector3d.Z_AX, TableRef.z, ptCurr)
                  DispositionUtility.VtHookFinder(nFixtureId, ptCurr)
                  Exit While
-               ElseIf DispositionUtility.VerifyTableAxis(nFixtureId) Then
-                  m_SelType = DispositionUtility.SelType.BARS
-                  m_nIdToSel = nFixtureId
-                  ' Drag possibile
-                  m_bDrag = True
-                  Exit While
+               ElseIf sName.Contains(DispositionUtility.MOBILE) Then
+                  Dim sInfo As String = ""
+                  If EgtGetInfo(EgtGetParent(nId), "MDir", sInfo) Then
+                     m_SelType = DispositionUtility.SelType.BARS
+                     m_nIdToSel = EgtGetParent(nId)
+                     ' Drag possibile
+                     m_bDrag = True
+                  End If
               End If
            Case SceneSelTypeOpt.RAWPART, SceneSelTypeOpt.RAWPARTWITHFIXTURE
               Dim nRawPartId As Integer = EgtGetParent(nId)
@@ -1359,6 +1187,7 @@ Public Class ProjectVM
      vtMove.z = 0
      ' Muovo gli oggetti selezionati se consentito
      DispositionUtility.MoveRawPartPartAndFixture(nMoveId, vtMove, m_SelType, ptCurr)
+      'EgtSaveFile("c:\Temp\ProveMovimentoVentose\Prova1.nge", NGE.BIN)
      EgtDraw()
      ' Aggiorno il punto precedente
      m_ptPrev = ptCurr
@@ -1561,7 +1390,7 @@ Public Class ProjectVM
         If nFac <> -1 Then
            ' Visualizzo la normale e il contorno della faccia
            Analyze.CreateAnalyzeGroup()
-            Analyze.CreateFacetNormal(nId, nFac)
+            Analyze.CreateNormal(nId, nFac)
            Analyze.CreateFacetLoops(nId, nFac)
            ' Recupero i dati (in globale o griglia a seconda della impostazione)
            Dim ptC As Point3d
@@ -1576,27 +1405,6 @@ Public Class ProjectVM
                                 " / φ=" + DoubleToString(dPhi, 2) + " θ=" + DoubleToString(dTheta, 2)
            Map.refStatusBarVM.NotifyStatusOutput(sOut)
         End If
-         ' Se Regione, visualizzo dati parte toccata
-      ElseIf EgtGetType(nId) = GDB_TY.SRF_FRGN Then
-         Dim nChk As Integer = nSub
-         If nChk >= 0 AndAlso nChk < EgtSurfFrChunkCount(nId) Then
-            ' Visualizzo la normale e il contorno della parte
-            Analyze.CreateAnalyzeGroup()
-            Analyze.CreateChunkNormal(nId, nChk)
-            Analyze.CreateChunkLoops(nId, nChk)
-            ' Recupero i dati (in globale o griglia a seconda della impostazione)
-            Dim ptC As Point3d
-            Dim vtN As Vector3d
-            EgtSurfFrChunkCenter(nId, nChk, If(m_bCPlaneTypePos, GDB_ID.GRID, GDB_ID.ROOT), ptC, vtN)
-            Dim dLen, dPhi, dTheta As Double
-            vtN.ToSpherical(dLen, dTheta, dPhi)
-            ' Emetto info sulla barra di stato
-            Dim sOut As String = "Chunk " + nChk.ToString() +
-                                 " : C(" + LenToString(ptC.x, 3) + "," + LenToString(ptC.y, 3) + "," + LenToString(ptC.z, 3) + ")" +
-                                   " N(" + DoubleToString(vtN.x, 4) + "," + DoubleToString(vtN.y, 4) + "," + DoubleToString(vtN.z, 4) + ")" +
-                                 " / φ=" + DoubleToString(dPhi, 2) + " θ=" + DoubleToString(dTheta, 2)
-            Map.refStatusBarVM.NotifyStatusOutput(sOut)
-         End If
      End If
      ' Aggiorno la visualizzazione
      EgtDraw()
@@ -2,8 +2,6 @@
      xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
      xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
      xmlns:local="clr-namespace:EgtCAM5"
-      DockPanel.Dock="Right"
-      Margin="0.5,0,0,0">
-
+      DockPanel.Dock="Right">
   <local:OptionPanelV DataContext="{StaticResource OptionPanelViewModel}"/>
 </Grid>
@@ -60,8 +60,8 @@ Module Wall
         Map.refTopCommandBarVM.SetMachiningMode()
         ' Se simulazione
         If bOk And nFlag = 2 Then
-            ' Se da TS3 e non pezzo da Vista, impedisco di fare altro
-            If bBtl AndAlso sFile.IndexOf( "Part_", StringComparison.InvariantCulture) = -1 Then
+            ' Se da TS3 impedisco di fare altro
+            If bBtl Then
               Map.refSimulationExpanderVM.bOnlySimulation = True
            End If
            ' Vado in simulazione
@@ -220,7 +220,7 @@ Public Class TopCommandBarVM
         ' Cerco di preimpostare come corrente la macchina opportuna
         If Not bAllowEmpty AndAlso EgtGetSelectedObjCount() = 0 AndAlso EgtGetMachGroupCount() > 0 Then
            Dim sMachineName As String = ""
-            if EgtGetMachGroupMachineName( EgtGetFirstMachGroup(), sMachineName) Then
+            if EgtGetMachGroupMachineName( EgtGetLastMachGroup(), sMachineName) Then
               Map.refMachinePanelVM.SelectedMachine = Map.refMachinePanelVM.MachinesList.FirstOrDefault(Function(x) x.Name = sMachineName)
            End If
         End If
@@ -241,7 +241,7 @@ Public Class TopCommandBarVM
            If Not IsNothing(Map.refDoorPanelVM) Then Map.refDoorPanelVM.MTableIsEnabled(bIsEnabled)
            If Not IsNothing(Map.refSpecialPanelVM) Then Map.refSpecialPanelVM.SpecialPanelIsEnabled(bIsEnabled)
         End If
-      Else
+            Else
         ' Deseleziono tutto
         EgtDeselectAll()
         ' Pulisco lista e geometria faccette di superfici di lavorazione corrente
@@ -37,7 +37,7 @@ Module Analyze
      Return True
   End Function

-   Function CreateFacetNormal( nId As Integer, nFac As Integer) As Boolean
+   Function CreateNormal( nId As Integer, nFac As Integer) As Boolean
      If m_AnaGrpId = GDB_ID.NULL Then Return False
      Dim bEnMod As Boolean = EgtGetEnableModified()
      EgtDisableModified()
@@ -66,35 +66,6 @@ Module Analyze
      Return True
   End Function

-   Function CreateChunkNormal( nId As Integer, nChk As Integer) As Boolean
-      If m_AnaGrpId = GDB_ID.NULL Then Return False
-      Dim bEnMod As Boolean = EgtGetEnableModified()
-      EgtDisableModified()
-      Dim ptC As Point3d
-      Dim vtN As Vector3d
-      If EgtSurfFrChunkCenter( nId, nChk, GDB_ID.ROOT, ptC, vtN) Then
-         Dim nNormId As Integer = EgtCreateGeoVector( m_AnaGrpId, 50 * vtN, ptC, GDB_RT.GLOB)
-         EgtSetColor( nNormId, New Color3d( 255, 0,0))
-      End If
-      If bEnMod Then EgtEnableModified()
-      Return True
-   End Function
-
-   Function CreateChunkLoops( nId As Integer, nChk As Integer) As Boolean
-      If m_AnaGrpId = GDB_ID.NULL Then Return False
-      Dim bEnMod As Boolean = EgtGetEnableModified()
-      EgtDisableModified()
-      Dim nCount As Integer
-      Dim nFirstId As Integer = EgtExtractSurfFrChunkLoops( nId, nChk, m_AnaGrpId, nCount)
-      If nFirstId <> GDB_ID.NULL Then
-         For nCrvId As Integer = nFirstId To nFirstId + nCount - 1
-            EgtSetColor( nCrvId, New Color3d( 255, 0,0))
-         Next
-      End If
-      If bEnMod Then EgtEnableModified()
-      Return True
-   End Function
-
   Function CreateCurveCompoPntNbrs( nId As Integer) As Boolean
      If m_AnaGrpId = GDB_ID.NULL Then Return False
      Dim bEnMod As Boolean = EgtGetEnableModified()
@@ -38,7 +38,6 @@
   <EgtCAM5:DoorPanelVM x:Key="DoorsPanelViewModel"/>
   <EgtCAM5:GunStockPanelVM x:Key="GunStockPanelViewModel"/>
   <EgtCAM5:MyMachGroupPanelVM x:Key="MachGroupPanelViewModel"/>
-   <EgtCAM5:WinFormPluginControlVM x:Key="WinFormPluginControlViewModel"/>
   <!--<EgtCAM5:MachGroupPanelVM x:Key="MachGroupPanelViewModel"/>-->
   <!--<EgtCAM5:OperationExpanderVM x:Key="OperationExpanderViewModel"/>-->

@@ -459,10 +458,6 @@
   <Style x:Key="DrawPanelButton" TargetType="{x:Type Button}" BasedOn="{StaticResource {x:Type Button}}">
      <Setter Property="Height" Value="30"/>
      <Setter Property="Width" Value="30"/>
-      <Setter Property="ToolTipService.ShowOnDisabled" Value="True"/>
-      <Setter Property="ContextMenuService.Placement" Value="Right"/>
-      <Setter Property="ContextMenuService.HorizontalOffset" Value="-1.5"/>
-      <Setter Property="ContextMenuService.VerticalOffset" Value="-3.5"/>
   </Style>

   <Style x:Key="MachiningsTextBlock" TargetType="{x:Type TextBlock}" BasedOn="{StaticResource {x:Type TextBlock}}">
@@ -1228,9 +1223,9 @@
      <Setter Property="Margin" Value="1,0,0,0"/>
   </Style>

-    <Style x:Key="MPExpander_UserNotesTxBxMargin" TargetType="{x:Type EgtWPFLib5:EgtTextBox}">
-        <Setter Property="Margin" Value="-1,0,0,0"/>
-    </Style>
+   <Style x:Key="MPExpander_UserNotesTxBxMargin" TargetType="{x:Type EgtWPFLib5:EgtTextBox}">
+      <Setter Property="Margin" Value="-1,0,0,0"/>
+   </Style>

   <!-- ______________________________________________________________________________________________________________________________________________ -->

@@ -1263,26 +1258,6 @@
      </Style.Triggers>
   </Style>

-<Style x:Key="ListBoxItemStyle" TargetType="ListBoxItem">
-      <Setter Property="Template">
-         <Setter.Value>
-            <ControlTemplate TargetType="ListBoxItem">
-               <Border Name="_Border"
-                       SnapsToDevicePixels="True"
-                       BorderBrush="{StaticResource EgaltechWhite}"
-                       BorderThickness="1">
-                  <ContentPresenter />
-               </Border>
-               <ControlTemplate.Triggers>
-                  <Trigger Property="IsSelected" Value="True">
-                     <Setter TargetName="_Border" Property="Background" Value="{StaticResource Button.Pressed.Background}"/>
-                  </Trigger>
-               </ControlTemplate.Triggers>
-            </ControlTemplate>
-         </Setter.Value>
-      </Setter>
-   </Style>
-   
   <!-- ______________________________________________________________________________________________________________________________________________ -->

   <!-- Style CheckBox -->
@@ -1297,20 +1272,4 @@
      </Style.Triggers>-->
   </Style>

-
-   <!-- ______________________________________________________________________________________________________________________________________________ -->
-
-
-   <ItemsPanelTemplate x:Key="MenuItemPanelTemplate">
-      <StackPanel Margin="-38,0,0,0" Background="Transparent" />
-   </ItemsPanelTemplate>
-
-   <Style x:Key="ContextMenu_Button" TargetType="{x:Type ContextMenu}">
-      <Setter Property="ItemsPanel" Value="{StaticResource MenuItemPanelTemplate}"/>
-      <Setter Property="Background" Value="Transparent"/>
-      <Setter Property="BorderBrush" Value="Transparent"/>
-      <Setter Property="BorderThickness" Value="0"/>
-      <Setter Property="Width" Value="37"/>
-   </Style>
-
 </ResourceDictionary>
@@ -34,14 +34,6 @@ Public Module IniFile
      MACHPATH = 5
   End Enum

-   Public Enum VMillSelTypeOpt As Integer
-      LOWER = -2
-      LOW = -1
-      STANDARD = 0
-      HIGH = 1
-      HIGHER = 2
-   End Enum
-
   ' MainWindow Page
   Friend m_nInstance As Integer = 0
   Friend m_nUserLevel As Integer = 1
@@ -1,8 +1,6 @@
 <Grid x:Class="WinFormPluginControlV"
      xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
      xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
-      xmlns:EgtCAM5="clr-namespace:EgtCAM5"
-      xmlns:EgtFloating="clr-namespace:EgtWPFLib5.EgtFloating;assembly=EgtWPFLib5"
      DockPanel.Dock="{Binding DockSide}"
      Height="{Binding Height}"
      Width="{Binding Width}"
@@ -1,10 +1,10 @@
 <?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">
-            <!-- UAC Manifest Options
+  <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">
+        <!-- UAC Manifest Options
             If you want to change the Windows User Account Control level replace the 
             requestedExecutionLevel node with one of the following.

@@ -16,49 +16,49 @@
            Remove this element if your application requires this virtualization for backwards
            compatibility.
        -->
-            <requestedExecutionLevel level="asInvoker" uiAccess="false" />
-         </requestedPrivileges>
-      </security>
-   </trustInfo>
+        <requestedExecutionLevel level="asInvoker" uiAccess="false" />
+      </requestedPrivileges>
+    </security>
+  </trustInfo>

-   <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
-      <application>
-         <!-- A list of the Windows versions that this application has been tested on
+  <compatibility xmlns="urn:schemas-microsoft-com:compatibility.v1">
+    <application>
+      <!-- A list of the Windows versions that this application has been tested on
           and is designed to work with. Uncomment the appropriate elements
           and Windows will automatically select the most compatible environment. -->

-         <!-- Windows Vista -->
-         <supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}" />
+      <!-- Windows Vista -->
+      <supportedOS Id="{e2011457-1546-43c5-a5fe-008deee3d3f0}" />

-         <!-- Windows 7 -->
-         <supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}" />
+      <!-- Windows 7 -->
+      <supportedOS Id="{35138b9a-5d96-4fbd-8e2d-a2440225f93a}" />

-         <!-- Windows 8 -->
-         <supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}" />
+      <!-- Windows 8 -->
+      <supportedOS Id="{4a2f28e3-53b9-4441-ba9c-d69d4a4a6e38}" />

-         <!-- Windows 8.1 -->
-         <supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}" />
+      <!-- Windows 8.1 -->
+      <supportedOS Id="{1f676c76-80e1-4239-95bb-83d0f6d0da78}" />

-         <!-- Windows 10 -->
-         <supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}" />
+      <!-- Windows 10 -->
+      <supportedOS Id="{8e0f7a12-bfb3-4fe8-b9a5-48fd50a15a9a}" />

-      </application>
-   </compatibility>
+    </application>
+  </compatibility>

-   <!-- Indicates that the application is DPI-aware and will not be automatically scaled by Windows at higher
+  <!-- Indicates that the application is DPI-aware and will not be automatically scaled by Windows at higher
       DPIs. Windows Presentation Foundation (WPF) applications are automatically DPI-aware and do not need 
       to opt in. Windows Forms applications targeting .NET Framework 4.6 that opt into this setting, should 
       also set the 'EnableWindowsFormsHighDpiAutoResizing' setting to 'true' in their app.config. -->
+  <!--
+  <application xmlns="urn:schemas-microsoft-com:asm.v3">
+    <windowsSettings>
+      <dpiAware xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">true</dpiAware>
+    </windowsSettings>
+  </application>
+  -->

-   <application xmlns="urn:schemas-microsoft-com:asm.v3">
-      <windowsSettings>
-         <dpiAware xmlns="http://schemas.microsoft.com/SMI/2005/WindowsSettings">true/PM</dpiAware>
-      </windowsSettings>
-   </application>
-
-
-   <!-- Enable themes for Windows common controls and dialogs (Windows XP and later) -->
-   <!--
+  <!-- Enable themes for Windows common controls and dialogs (Windows XP and later) -->
+  <!--
  <dependency>
    <dependentAssembly>
      <assemblyIdentity
Author	SHA1	Message	Date
Demetrio Cassarino	7558449b06	Merge remote-tracking branch 'origin/master' into feature/Note_Utensile	2024-07-30 10:21:32 +02:00
Demetrio Cassarino	c727e98f8f	Merge remote-tracking branch 'origin/master' into feature/Note_Utensile	2024-07-23 10:06:55 +02:00