diff --git a/Constants/ConstIni.vb b/Constants/ConstIni.vb
index 5fe49fb..0505566 100644
--- a/Constants/ConstIni.vb
+++ b/Constants/ConstIni.vb
@@ -30,6 +30,10 @@ Module ConstIni
Public Const K_LASTLUADIR As String = "LastLuaDir"
Public Const K_LASTIMPDIR As String = "LastImpDir"
Public Const K_LASTEXPDIR As String = "LastExpDir"
+ Public Const K_DRAW2D As String = "2DDraw"
+ Public Const K_DRAW3D As String = "3DDraw"
+ Public Const K_MODIFY As String = "Modify"
+ Public Const K_TRANSFORM As String = "Transform"
Public Const S_LUA As String = "Lua"
Public Const K_LIBSDIR As String = "LibsDir"
diff --git a/ProjectPage/DrawPanel/DrawPanelView.xaml b/ProjectPage/DrawPanel/DrawPanelView.xaml
index 87d0dac..f447e78 100644
--- a/ProjectPage/DrawPanel/DrawPanelView.xaml
+++ b/ProjectPage/DrawPanel/DrawPanelView.xaml
@@ -9,7 +9,7 @@
-
+
-
+
-
+
-
+
-
+
@@ -53,7 +53,7 @@
diff --git a/ProjectPage/OptionPanel/MachiningOptionPanel/OperationExpander/OperationExpanderViewModel.vb b/ProjectPage/OptionPanel/MachiningOptionPanel/OperationExpander/OperationExpanderViewModel.vb
index 598ed8b..794f224 100644
--- a/ProjectPage/OptionPanel/MachiningOptionPanel/OperationExpander/OperationExpanderViewModel.vb
+++ b/ProjectPage/OptionPanel/MachiningOptionPanel/OperationExpander/OperationExpanderViewModel.vb
@@ -84,7 +84,8 @@ Namespace EgtCAM5
Return m_SelectedOperation
End Get
Set(value As OperationListBoxItem)
- If value IsNot m_SelectedOperation Then
+ 'If value IsNot m_SelectedOperation Then
+ If Not IsNothing(value) Then
' Verifico se c'è l'operazione precedente
If m_LastMarkedOperationId <> GDB_ID.NULL Then
' La deevidenzio
@@ -118,8 +119,9 @@ Namespace EgtCAM5
' Notifico l'operazione selezionata all'expander dei parametri operazione
Application.Msn.NotifyColleagues(Application.SELECTEDOPERATION, value)
End If
- m_SelectedOperation = value
End If
+ m_SelectedOperation = value
+ 'End If
OnPropertyChanged("SelectedOperation")
End Set
End Property
@@ -499,7 +501,7 @@ Namespace EgtCAM5
' Ricarico la lista delle operazioni
Application.Msn.NotifyColleagues(Application.LOADOPERATIONLIST)
' Riseleziono l'entità selezionata
- Me.SelectedOperation = SelectedOperation
+ Me.SelectedOperation = DirectCast(param, OperationListBoxItem)
End If
End Sub
diff --git a/ProjectPage/ProjectViewModel.vb b/ProjectPage/ProjectViewModel.vb
index fa1ca4d..b66f699 100644
--- a/ProjectPage/ProjectViewModel.vb
+++ b/ProjectPage/ProjectViewModel.vb
@@ -77,10 +77,6 @@ Namespace EgtCAM5
m_DrawOptionPanel = New BaseWindowView
m_DrawOptionPanel.DataContext = New DrawOptionPanelViewModel
WinPosToWindow(m_DrawOptionPanel, WinPos)
- GetPrivateProfileWinPos(S_GENERAL, "Win3", WinPos.nFlag, WinPos.nLeft, WinPos.nTop, WinPos.nWidth, WinPos.nHeight)
- m_DrawOptionPanel = New BaseWindowView
- m_DrawOptionPanel.DataContext = New DrawOptionPanelViewModel
- WinPosToWindow(m_DrawOptionPanel, WinPos)
m_DrawOptionPanel.Show()
' Funzione che contiene la registrazione alle funzioni che permettono di visualizzare e nascondere le finestre di disegno
ManagePanelVisibility()