From da73acc8a0ee6571a77a02cbe7af580da99e8fcd Mon Sep 17 00:00:00 2001
From: Emmanuele Sassi <emmanuele.sassi@egaltech.com>
Date: Fri, 18 Nov 2022 14:15:11 +0100
Subject: [PATCH] - Aggiunti tooltip su statistiche ed ultimi bottoni aggiunti
 - Aggiunto bottone cancella tutti i grezzi

---
 .../EgtBEAMWALL.ViewerOptimizer.vbproj        |   3 ++
 .../LeftPanel/LeftPanelVM.vb                  |   6 +++
 .../Resources/LeftPanel/NewRawPartAuto.png    | Bin 596 -> 649 bytes
 .../Resources/TopPanel/RemoveAllRawPart.png   | Bin 0 -> 720 bytes
 .../StatisticsTimePanelV.xaml                 |   4 ++
 .../StatisticsTimePanelVM.vb                  |  18 ++++++++
 .../TopPanel/TopPanelV.xaml                   |   6 +++
 .../TopPanel/TopPanelVM.vb                    |  40 ++++++++++++++++--
 8 files changed, 74 insertions(+), 3 deletions(-)
 create mode 100644 EgtBEAMWALL.ViewerOptimizer/Resources/TopPanel/RemoveAllRawPart.png

diff --git a/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj b/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj
index 2d887c93..336d446a 100644
--- a/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj
+++ b/EgtBEAMWALL.ViewerOptimizer/EgtBEAMWALL.ViewerOptimizer.vbproj
@@ -952,6 +952,9 @@
   <ItemGroup>
     <Resource Include="Resources\LeftPanel\NewRawPartAuto.png" />
   </ItemGroup>
+  <ItemGroup>
+    <Resource Include="Resources\TopPanel\RemoveAllRawPart.png" />
+  </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
   <PropertyGroup>
     <PostBuildEvent>IF "$(PlatformName)"=="x86" IF "$(ConfigurationName)" == "Release" copy $(TargetPath) c:\EgtProg\EgtBEAMWALL\EgtBEAMWALL.ViewerOptimizerR32.exe
diff --git a/EgtBEAMWALL.ViewerOptimizer/LeftPanel/LeftPanelVM.vb b/EgtBEAMWALL.ViewerOptimizer/LeftPanel/LeftPanelVM.vb
index ddeaa938..fb4e4f5f 100644
--- a/EgtBEAMWALL.ViewerOptimizer/LeftPanel/LeftPanelVM.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/LeftPanel/LeftPanelVM.vb
@@ -156,6 +156,12 @@ Public Class LeftPanelVM
       End Get
    End Property
 
+   Public ReadOnly Property NewRawPartAuto_ToolTip As String
+      Get
+         Return EgtMsg(61977)
+      End Get
+   End Property
+
    Public ReadOnly Property AddToRawPart_ToolTip As String
       Get
          Return EgtMsg(61904)
diff --git a/EgtBEAMWALL.ViewerOptimizer/Resources/LeftPanel/NewRawPartAuto.png b/EgtBEAMWALL.ViewerOptimizer/Resources/LeftPanel/NewRawPartAuto.png
index 65ad45714b9c8b96d67e69d717002179bfe6cb1e..fd8c32a60aacdbda70c8696c5575ccecb8f2f1b5 100644
GIT binary patch
delta 537
zcmV+!0_OeH1c?QZdw=;!L_t(oN9~tCOT$1I#^c~9I5-KSo0P_?6n8g2fQz7mgCC&y
z0kpe<gM#Sdq_#&<R~H3cML{PKn=~qjf_?&t&zrt2x#U7jlh);a@Nm8NKX*r~hDM{&
z^q2|JScVRuOV$=N#_ryN#)Hru<VL8>p}heORRhgJrGTx(DSzDu&B}r1F577^$quQn
zk{l2f%1Ra_HRnF6q12}ZhblM=QC&~mhpx3{qsLD%>bJ!~UJ*8>f@^uF69xQqqS*~)
z3VYoY&RX&CZHP@0sFURS(hoI$_Bp_@E)B<K3HVy4&=%XfGn6T;Rf;vM_7#TuV6z1L
z^mc-$MLmLF34f$4hO!?KcZzk9atgJVd3H&_HwA^R(Wh)4dcN{J(~NUgXphhD(1qtz
z03V$goeurH(15hkFkT<5>4!2a);`4<uG>d@eBPk_^igBj3rGm}OgB_B#yRJ$F)3c@
zieR(0*`x$9QD4sKhQh;Mq8O~-esSIphbf`D9H&x>p?`$^0RI=X=NIhPSlxnf7C1Bn
z{C~O$iMXU(tv>4ctM(?F+7xfxe)3_sdp3oLtFI(32@iaS{P`0r$0mshVOKr>@zV&K
zB;x8TiAy3M-p?&>L*y&<xn{n-%O;7q`bs)VN<c^TeM#L`qM@?>BQHw-^ACeYqtRrB
bVf+F<1`<zTjN|Sm00000NkvXXu0mjfsh9?9

delta 483
zcmV<90UZ8`1=IwPdw;}9L_t(oN9~reOT$1E#uKCzrAik&D58r<L8U`G3SCri5=3!y
z6P)5-U<U`mf`f`Ef^!|*UF_g)QU3rH7jaOWoaFqz^CC%lX%Umlk`I1d-+R~hKJG$V
zD^;pgsSIoC{AmrGfu>>)jH$9&VQ?O_fC!<cwwe(J>I_wZ6Mx7#>MQXJ!)k%yLgi`9
zmk0W*WC5^IR6GFRa5YC~N`G1?=r%_I`%2UtUaOnq!_PhXXG?98O;qY%QoZEqgb8(?
zs8LgYxjtj2+*9~P<r6i<XD4`CoDqB_5HqGI^eTb2YxH3DL3f3IJTaaQe_m*iE6vC`
zSk0U2rbJDlZ-3a!IZ;#9!m=X@E1RNt+Tt89$(S0iUoK$bYk_Pr*Hv+w>YFGZVi7&L
z{4Lg3ne3*xP1)Jr=Yh(c=r7N1Bjjl<$wDW^Y^nmp@cNG1{{>vJ&`~j)Issy`@#yy7
zWekQuxICsJ2kk{}dd7`us>B@F2jRlzsQ=_i1{XIj&|F^Fnd~RAZ2JT8J9FR*B%*up
z295(<0~%WeMl}jJxGp2VGJv%^85z_8;NYT++SLH8kI2Z7IPm7@qgL~PdyZt3Dpf49
ZtZ#1*w~hVxZ9D(~002ovPDHLkV1j%#<*EPx

diff --git a/EgtBEAMWALL.ViewerOptimizer/Resources/TopPanel/RemoveAllRawPart.png b/EgtBEAMWALL.ViewerOptimizer/Resources/TopPanel/RemoveAllRawPart.png
new file mode 100644
index 0000000000000000000000000000000000000000..a9a5f43a559f5dd238ef6bf249cba96960beceb3
GIT binary patch
literal 720
zcmV;>0x$iEP)<h;3K|Lk000e1NJLTq001Qb001Qj1^@s6#hxGo00001b5ch_0Itp)
z=>Px#1ZP1_K>z@;j|==^1poj532;bRa{vGf5dZ)S5dnW>Uy%R+02y>eSaefwW^{L9
za%BK;VQFr3E^cLXAT%y8E;2FkAZe8V00KZsL_t(oN9~qBOB_)Y#ka8(EQC~|U6h?&
z1+f&YlFG^^kboAZmwW)VvoNKgHl`4DXI5kI14PhDkOY!S{4+BvLQv385Y}^^cQ$Y5
zkB+XsfiMRS^WJ^;-TPza?bAZ8T)A>(ppxTHz`L5iz&)~TR%ko`|Agxao|05ELc<Q&
z)c}$_AzNNvXf_*ap5z<Z5)~Ht-C5|loaQYB9ubUYVSxuQZbPfyl@?7xd_>Ecm2k7T
znU-nG(i-xh6Cms<*f`W<-u%6v?>V7(M&khDYzB&wnsE?e8-?OswGGFC@Yl&-DaYoZ
z0--K%cKy0g7bc!O@Yz5mDRU?R(BBr#Kg^jz5rP15P6uT<-i+ncrU%z9IwjPQwSM}l
z<al$Xsy{5Dh{{_vi#gVs+sip>D=4*?Ryx${Z&&RsKod?SXew6D`qjGaeUwl{<%&Pb
zoMP2~!#T#SL0OLbi3Kd%+XK|4O3;)Mly`*jHlFWUsJwYTrjkU)p^BB$A#N@?wMmKp
zfxoLHk!h&9RdMAk5lplFZ;a0>F?q&W^22qcT{>Yy@J}8$pU9YAx{J97K@3ofDrS2-
zK`dh1U&oVBt9o48r5BogP=##oMmJ;dUrBq?=X<hnuz#b_HN31F@qIk&WvBLzdB&jn
zHqW}H(Ps%YG<aBV;~L<8ac&F>2Yf*l`Revbs7bh;ZMD8}+|_`p`YZ5w*vt>0;Q6GS
z2gL$7KR;v|5kTJFHSrc3Pzh$f1{G^nG}r&7Lg5zFoZYotPyL7h0000<MNUMnLSTYO
CT0c|(

literal 0
HcmV?d00001

diff --git a/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelV.xaml b/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelV.xaml
index 154e0ed3..1d8f07f1 100644
--- a/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelV.xaml
+++ b/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelV.xaml
@@ -9,6 +9,7 @@
                               Style="{StaticResource ToolBar_EgtFloatingPanel}">
 
    <Border BorderThickness="2"
+           ToolTip="{Binding TotalTime_ToolTip}"
            BorderBrush="Crimson"
            Background="{StaticResource Omag_LightGray}"
            Padding="5,0,5,0"
@@ -21,6 +22,7 @@
                  VerticalAlignment="Center"/>
    </Border>
    <Border BorderThickness="2"
+           ToolTip="{Binding TotalTime_ToolTip}"
            BorderBrush="Crimson"
            Background="{StaticResource Omag_LightGray}"
            Padding="5,0,5,0"
@@ -33,6 +35,7 @@
                  VerticalAlignment="Center"/>
    </Border>
    <Border BorderThickness="2"
+           ToolTip="{Binding DoneTime_ToolTip}"
            BorderBrush="Gold"
            Padding="5,0,5,0"
            Margin="2"
@@ -44,6 +47,7 @@
                  VerticalAlignment="Center"/>
    </Border>
    <Border BorderThickness="2"
+           ToolTip="{Binding RemainingTime_ToolTip}"
            BorderBrush="White"
            Padding="5,0,5,0"
            Margin="2"
diff --git a/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelVM.vb b/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelVM.vb
index 318ab884..f8215cb7 100644
--- a/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelVM.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/StatisticsTimePanel/StatisticsTimePanelVM.vb
@@ -23,6 +23,24 @@ Public Class StatisticsTimePanelVM
 
 #Region "ToolTip"
 
+   Public ReadOnly Property TotalTime_ToolTip As String
+      Get
+         Return EgtMsg(61978)
+      End Get
+   End Property
+
+   Public ReadOnly Property DoneTime_ToolTip As String
+      Get
+         Return EgtMsg(61979)
+      End Get
+   End Property
+
+   Public ReadOnly Property RemainingTime_ToolTip As String
+      Get
+         Return EgtMsg(61980)
+      End Get
+   End Property
+
 #End Region ' ToolTip
 
 #End Region    ' Fields & Properties
diff --git a/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelV.xaml b/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelV.xaml
index 973d6ea3..38c7e88a 100644
--- a/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelV.xaml
+++ b/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelV.xaml
@@ -58,6 +58,12 @@
                              Style="{StaticResource LeftPanel_Button}">
                         <Image Source="/Resources/TopPanel/RemoveRawPart.png" Stretch="Uniform"/>
                      </Button>
+                     <Button Command="{Binding RemoveAllRawPart_Command}"
+                             ToolTip="{Binding RemoveAllRawPart_ToolTip}"
+                             IsEnabled="{Binding TopPanel_IsEnabled}"
+                             Style="{StaticResource LeftPanel_Button}">
+                        <Image Source="/Resources/TopPanel/RemoveAllRawPart.png" Stretch="Uniform"/>
+                     </Button>
                      <Button Command="{Binding MovePartInRawPart_Command}"
                              ToolTip="{Binding MovePartInRawPart_ToolTip}"
                              IsEnabled="{Binding TopPanel_IsEnabled}"
diff --git a/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelVM.vb b/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelVM.vb
index 247f49b0..798e3834 100644
--- a/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelVM.vb
+++ b/EgtBEAMWALL.ViewerOptimizer/TopPanel/TopPanelVM.vb
@@ -80,6 +80,7 @@ Public Class TopPanelVM
    Private m_cmdProduceRawPart As ICommand
    Private m_cmdCopyRawPart As ICommand
    Private m_cmdRemoveRawPart As ICommand
+   Private m_cmdRemoveAllRawPart As ICommand
    Private m_cmdRemovePart As ICommand
    Private m_cmdMoveUpPart As ICommand
    Private m_cmdMoveDownPart As ICommand
@@ -127,6 +128,12 @@ Public Class TopPanelVM
       End Get
    End Property
 
+   Public ReadOnly Property RemoveAllRawPart_ToolTip As String
+      Get
+         Return EgtMsg(61976)
+      End Get
+   End Property
+
    Public ReadOnly Property ReOrderPart_ToolTip As String
       Get
          Return EgtMsg(61916)
@@ -365,7 +372,7 @@ Public Class TopPanelVM
    Public ReadOnly Property RemoveRawPart_Command As ICommand
       Get
          If m_cmdRemoveRawPart Is Nothing Then
-            m_cmdRemoveRawPart = New Command(AddressOf RemoveRawPart)
+            m_cmdRemoveRawPart = New Command(AddressOf RemoveRawPartCmd)
          End If
          Return m_cmdRemoveRawPart
       End Get
@@ -374,10 +381,14 @@ Public Class TopPanelVM
    ''' <summary>
    ''' Execute the Exec.  This method is invoked by the ExecCommand.
    ''' </summary>
-   Public Sub RemoveRawPart()
+   Public Sub RemoveRawPartCmd()
+      RemoveRawPart()
+   End Sub
+
+   Public Sub RemoveRawPart(Optional bAll As Boolean = False)
       If IsNothing(Map.refProdManagerVM.CurrProd) Then Return
       ' se premuto shift
-      If (Keyboard.Modifiers And ModifierKeys.Shift) = ModifierKeys.Shift Then
+      If bAll Then
          ' cancello tutti
          For Index = Map.refMachGroupPanelVM.MachGroupVMList.Count - 1 To 0 Step -1
             Dim CurrMachGroup As MyMachGroupVM = Map.refMachGroupPanelVM.MachGroupVMList(Index)
@@ -400,6 +411,29 @@ Public Class TopPanelVM
 
 #End Region    ' RemoveRawPart
 
+#Region "RemoveAllRawPart"
+
+   ''' <summary>
+   ''' Returns a command that do Exec.
+   ''' </summary>
+   Public ReadOnly Property RemoveAllRawPart_Command As ICommand
+      Get
+         If m_cmdRemoveAllRawPart Is Nothing Then
+            m_cmdRemoveAllRawPart = New Command(AddressOf RemoveAllRawPart)
+         End If
+         Return m_cmdRemoveAllRawPart
+      End Get
+   End Property
+
+   ''' <summary>
+   ''' Execute the Exec.  This method is invoked by the ExecCommand.
+   ''' </summary>
+   Public Sub RemoveAllRawPart()
+      RemoveRawPart(True)
+   End Sub
+
+#End Region    ' RemoveRawPart
+
 #Region "RemovePart"
 
    ''' <summary>