EgtCAM5 :

- piccola modifica in selezione per lavorazioni.
This commit is contained in:
Dario Sassi
2016-12-08 14:34:08 +00:00
parent 687d93b865
commit 93925bcd7f
+4 -4
View File
@@ -886,10 +886,10 @@ Namespace EgtCAM5
' Se in modalità Draw accetto tutto
If IniFile.m_ProjectMode = ProjectModeOpt.DRAW Then Return
' Sono in modalità Machining
'se non posso selezionare nulla esco
If m_SceneSelType = SceneSelTypeOpt.NULL Then Return
' Si può selezionare solo con il tasto sinistro se la selezione non è impostata a NULL
If e.Button <> Forms.MouseButtons.Left OrElse m_SceneSelType = SceneSelTypeOpt.NULL Then Return
' se non posso selezionare nulla o in lavorazione esco
If m_SceneSelType = SceneSelTypeOpt.NULL OrElse m_SceneSelType = SceneSelTypeOpt.MACHINING Then Return
' Si può selezionare solo con il tasto sinistro
If e.Button <> Forms.MouseButtons.Left Then Return
' Per default no drag
m_bDrag = False
Dim nSel As Integer