24 lines
538 B
VB.net
24 lines
538 B
VB.net
Public Class ClassdiKonfiguration
|
|
|
|
Private _profiles As ClassDIProfile
|
|
|
|
Sub New()
|
|
End Sub
|
|
' ================================================================
|
|
' Liest alle Profile aus der XML-Datei aus
|
|
Private Sub LoadProfiles()
|
|
ClassDIProfile.LoadFromXmlFile()
|
|
End Sub
|
|
|
|
|
|
Public Property Profiles() As ClassDIProfile
|
|
Get
|
|
Return Me._profiles
|
|
End Get
|
|
Set(ByVal value As ClassDIProfile)
|
|
Me._profiles = value
|
|
End Set
|
|
End Property
|
|
|
|
End Class
|