diff --git a/MoveRawPartPage.xaml b/MoveRawPartPage.xaml
index f120ab6..ad4ab7c 100644
--- a/MoveRawPartPage.xaml
+++ b/MoveRawPartPage.xaml
@@ -96,20 +96,6 @@
VerticalAlignment="Center" />
-
-
-
-
-
-
-
-
-
-
-
@@ -121,9 +107,6 @@
-
-
-
diff --git a/MoveRawPartPage.xaml.vb b/MoveRawPartPage.xaml.vb
index 1979394..b8eb47f 100644
--- a/MoveRawPartPage.xaml.vb
+++ b/MoveRawPartPage.xaml.vb
@@ -123,6 +123,8 @@ Public Class MoveRawPartPage
RemovePartBtn.Visibility = Windows.Visibility.Visible
' Abilitazione bottone modifica
ModifyBtn.IsEnabled = m_SplitPage.m_bShow
+ ' gestione abilitazione altri bottoni
+ EnableButtons()
End Sub
Private Sub OnMyMouseDownScene(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles m_CurrProjPage.OnMouseDownScene
@@ -362,6 +364,17 @@ Public Class MoveRawPartPage
End While
' disabilito bottone
ModifyBtn.IsEnabled = False
+ ' gestione abilitazione altri bottoni
+ EnableButtons()
+ End Sub
+
+ Private Sub EnableButtons()
+ UpBtn.IsEnabled = Not m_SplitPage.m_bShow
+ LeftBtn.IsEnabled = Not m_SplitPage.m_bShow
+ RightBtn.IsEnabled = Not m_SplitPage.m_bShow
+ DownBtn.IsEnabled = Not m_SplitPage.m_bShow
+ StepMoveTxBx.IsEnabled = Not m_SplitPage.m_bShow
+ RemovePartBtn.IsEnabled = Not m_SplitPage.m_bShow
End Sub
Private Sub MoveRawPartPage_Unloaded(sender As Object, e As EventArgs) Handles Me.Unloaded
diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb
index e3e3eaf..fbe3e83 100644
--- a/My Project/AssemblyInfo.vb
+++ b/My Project/AssemblyInfo.vb
@@ -60,5 +60,5 @@ Imports System.Windows
' by using the '*' as shown below:
'
-
-
+
+
diff --git a/SplitPageUC.xaml.vb b/SplitPageUC.xaml.vb
index a963c87..15030c1 100644
--- a/SplitPageUC.xaml.vb
+++ b/SplitPageUC.xaml.vb
@@ -812,6 +812,23 @@ Public Class SplitPageUC
ModifyBtn.IsEnabled = m_bShow
' Per bottone AUTO
AutoBtn.IsEnabled = Not m_bShow And ((GetDisabledCutsCount() > 0 Or m_nCurrPhase = 1) And Not m_bByHand)
+ ' Altri bottoni
+ MoveUpBtn.IsEnabled = Not m_bShow
+ MoveDownBtn.IsEnabled = Not m_bShow
+ OnOffBtn.IsEnabled = Not m_bShow
+ AllOnBtn.IsEnabled = Not m_bShow
+ AllOffBtn.IsEnabled = Not m_bShow
+ CutBtn.IsEnabled = Not m_bShow
+ CutStartBtn.IsEnabled = Not m_bShow
+ CutEndBtn.IsEnabled = Not m_bShow
+ OutCenStartBtn.IsEnabled = Not m_bShow
+ AllOutStartBtn.IsEnabled = Not m_bShow
+ AllCenStartBtn.IsEnabled = Not m_bShow
+ OutCenEndBtn.IsEnabled = Not m_bShow
+ AllOutEndBtn.IsEnabled = Not m_bShow
+ AllCenEndBtn.IsEnabled = Not m_bShow
+ AllExtendBtn.IsEnabled = Not m_bShow
+ AllReduceBtn.IsEnabled = Not m_bShow
End Sub
Private Function ModifyOtherLeadIn(nI As Integer, nLiOthType As Integer) As Boolean
diff --git a/VacuumCups.vb b/VacuumCups.vb
index 6587e96..7554570 100644
--- a/VacuumCups.vb
+++ b/VacuumCups.vb
@@ -60,7 +60,7 @@ Module VacuumCups
m_nTempId = EgtCreateGroup(GDB_ID.ROOT)
If m_nTempId = GDB_ID.NULL Then Return False
EgtSetName(m_nTempId, "VacTmp")
- EgtSetLevel(m_nTempId, GDB_LV.SYSTEM)
+ EgtSetLevel(m_nTempId, GDB_LV.TEMP)
' Eseguo copia in globale
m_nVacId = EgtCopyGlob(nLayId, m_nTempId)
If m_nVacId = GDB_ID.NULL Then Return False