20 lines
663 B
VB.net
20 lines
663 B
VB.net
Imports DigitalData.GUIs.Common
|
|
Imports DigitalData.Modules.Database
|
|
Imports DigitalData.Modules.Logging
|
|
|
|
Public Class frmObjectProperties
|
|
Implements IBaseForm
|
|
|
|
Public Sub New(pLogConfig As LogConfig, Database As MSSQLServer)
|
|
' Dieser Aufruf ist für den Designer erforderlich.
|
|
InitializeComponent()
|
|
|
|
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
|
LogConfig = pLogConfig
|
|
Logger = pLogConfig.GetLogger()
|
|
End Sub
|
|
|
|
Public ReadOnly Property LogConfig As LogConfig Implements IBaseForm.LogConfig
|
|
|
|
Public ReadOnly Property Logger As Logger Implements IBaseForm.Logger
|
|
End Class |