EgtCAM5 :

- aggiunta gestione script da lanciare a inizio e fine modalità Lavorazioni.
This commit is contained in:
Dario Sassi
2018-11-22 14:33:28 +00:00
parent de85fac9a6
commit acf23b68a8
6 changed files with 102 additions and 21 deletions
@@ -63,14 +63,14 @@ Public Class LayerTreeViewItem
End Set
End Property
Private m_OnOff As Boolean
Private m_bOnOff As Boolean = True
Public Property OnOff As Boolean
Get
Return m_OnOff
Return m_bOnOff
End Get
Set(value As Boolean)
If m_OnOff <> value Then
m_OnOff = value
If m_bOnOff <> value Then
m_bOnOff = value
' se abilitato, eseguo operazione
If m_SendCmd Then
Application.Msn.NotifyColleagues(Application.SETLASTINTEGER, Id)
@@ -84,6 +84,19 @@ Public Class LayerTreeViewItem
End Set
End Property
Private m_bHidden As Boolean = False
Public ReadOnly Property IsHidden As Visibility
Get
Return If(m_bHidden, Visibility.Hidden, Visibility.Visible)
End Get
End Property
Public Sub SetHidden(bVal As Boolean)
If bVal <> m_bHidden Then
m_bHidden = bVal
NotifyPropertyChanged("IsHidden")
End If
End Sub
Private m_sPictureString As String
Public Property PictureString As String
Get