Emmanuele Sassi
41 lines
1.0 KiB
VB.net
41 lines
1.0 KiB
VB.net
Imports System.Collections.ObjectModel
|
|
Imports EgtBEAMWALL.Core
|
|
Imports EgtUILib
|
|
|
|
Public Class FeatureInPartInRawPartListVM
|
|
|
|
Private m_FeatureInPartInRawPartColumns As New ObservableCollection(Of EgtDataGridColumn)
|
|
Public Property FeatureInPartInRawPartColumns As ObservableCollection(Of EgtDataGridColumn)
|
|
Get
|
|
Return m_FeatureInPartInRawPartColumns
|
|
End Get
|
|
Set(value As ObservableCollection(Of EgtDataGridColumn))
|
|
m_FeatureInPartInRawPartColumns = value
|
|
End Set
|
|
End Property
|
|
|
|
#Region "Messages"
|
|
|
|
Public ReadOnly Property Description_Msg As String
|
|
Get
|
|
Return EgtMsg(61603)
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property DO_Msg As String
|
|
Get
|
|
Return EgtMsg(61610)
|
|
End Get
|
|
End Property
|
|
|
|
#End Region ' Messages
|
|
|
|
Sub New()
|
|
' creo riferimento in Map
|
|
Map.SetRefFeatureInPartInRawPartListVM(Me)
|
|
' carico le colonne della datagrid
|
|
GetPrivateProfileColumns(S_FEATUREINPARTINRAWPARTLIST, FeatureInPartInRawPartColumns)
|
|
End Sub
|
|
|
|
End Class
|