EgtCAM5 :

- migliorie varie per gestione visualizzazione.
This commit is contained in:
Dario Sassi
2017-01-04 07:41:11 +00:00
parent fb4ebfd60c
commit fbbd91f9ac
4 changed files with 14 additions and 14 deletions
+2 -1
View File
@@ -270,7 +270,7 @@ Namespace EgtCAM5
End Get
End Property
' Definizione layer corrente
Private m_bSelOk As Boolean = (EgtGetFirstSelectedObj() <> GDB_ID.NULL)
Private m_bSelOk As Boolean = False
Public ReadOnly Property bSelOk As Boolean
Get
Return m_bSelOk
@@ -835,6 +835,7 @@ Namespace EgtCAM5
''' Returns always true.
''' </summary>
Private Function CanPlane(ByVal param As Object) As Boolean
If IniFile.m_ProjectSceneContext = 0 Then Return False
m_bSelOk = EgtGetFirstSelectedObj() <> GDB_ID.NULL
Return bLayerOk And bSelOk
End Function