18 lines
520 B
VB.net
18 lines
520 B
VB.net
|
|
Imports MultiTool.Shared.Winline
|
|
|
|
Namespace Templates
|
|
''' <summary>
|
|
''' Class for loading column/field config from database
|
|
''' </summary>
|
|
Public Class TemplateConfig
|
|
Public Property Items As List(Of TemplateConfigItem)
|
|
|
|
Public Function GetColumn(pName As String, pTable As String) As TemplateConfigItem
|
|
Return Items.
|
|
Where(Function(c) c.Name = pName And c.Table = pTable).
|
|
FirstOrDefault()
|
|
End Function
|
|
End Class
|
|
End Namespace
|