Emmanuele Sassi
51 lines
1.2 KiB
VB.net
51 lines
1.2 KiB
VB.net
Imports System.Collections.ObjectModel
|
|
|
|
Public Class Print3dPartVM
|
|
|
|
Private m_nPartId As Integer
|
|
Public ReadOnly Property nPartId As Integer
|
|
Get
|
|
Return m_nPartId
|
|
End Get
|
|
End Property
|
|
|
|
Private m_sImportedFileName As String
|
|
Public Property sImportedFileName As String
|
|
Get
|
|
Return m_sImportedFileName
|
|
End Get
|
|
Set(value As String)
|
|
m_sImportedFileName = value
|
|
End Set
|
|
End Property
|
|
|
|
Private m_sImportedFilePath As String
|
|
Public Property sImportedFilePath As String
|
|
Get
|
|
Return m_sImportedFilePath
|
|
End Get
|
|
Set(value As String)
|
|
m_sImportedFilePath = value
|
|
End Set
|
|
End Property
|
|
|
|
Private m_LayerList As ObservableCollection(Of Print3dLayerVM)
|
|
Public ReadOnly Property LayerList As ObservableCollection(Of Print3dLayerVM)
|
|
Get
|
|
Return m_LayerList
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Default Machining Params"
|
|
|
|
|
|
#End Region ' Default Machining Params
|
|
|
|
Sub New(nPartId As Integer, sImportedFilePath As String)
|
|
m_nPartId = nPartId
|
|
m_sImportedFilePath = sImportedFilePath
|
|
m_sImportedFileName = IO.Path.GetFileName(m_sImportedFilePath)
|
|
End Sub
|
|
|
|
End Class
|