Nicola Pievani
eaee74096d
- ripristino della modalità assemblato - aggiunta del campo properties nel ddf - semplificazione del codice in modalità porta singola/assemblato
35 lines
739 B
VB.net
35 lines
739 B
VB.net
Imports System.Collections.ObjectModel
|
|
Imports System.IO
|
|
Imports EgtUILib
|
|
Imports EgtWPFLib5
|
|
|
|
Public Class Association
|
|
Inherits VMBase
|
|
|
|
Private m_Side As Integer
|
|
Public Property Side As Integer
|
|
Get
|
|
Return m_Side
|
|
End Get
|
|
Set(value As Integer)
|
|
m_Side = value
|
|
End Set
|
|
End Property
|
|
'
|
|
Private m_refPartDoor As PartDoor
|
|
Public Property refPartDoor As PartDoor
|
|
Get
|
|
Return m_refPartDoor
|
|
End Get
|
|
Set(value As PartDoor)
|
|
m_refPartDoor = value
|
|
End Set
|
|
End Property
|
|
|
|
Sub New(ref_PartDoor As PartDoor, ref_nSide As Integer)
|
|
m_refPartDoor = ref_PartDoor
|
|
Side = ref_nSide
|
|
End Sub
|
|
|
|
End Class
|