040c7aeac0
• Erweiterung von SetControlValues_FromControl um Handling für DevExpress DateEdit (Parsing verschiedener Datumsformate, Farbanpassung). • Ergänzung einer analogen Fall-Branch für System.Windows.Forms.DateTimePicker (Fallback auf MinimumDateTime bei ungültigem oder leerem Caption). • Keine bestehenden Funktionen außerhalb der neuen Select-Case-Zweige angepasst. Nutzen: Ermöglicht dynamisches Setzen von Datumswerten aus SQL-Steuerdaten (Caption-Feld) für beide Datumstypen und konsistente Farbgestaltung wie bei anderen Steuerelementen. Hinweis: Validierungs- und Logging-Struktur wiederverwendet; keine Seiteneffekte auf andere Control-Typen.
273 lines
12 KiB
VB.net
273 lines
12 KiB
VB.net
'------------------------------------------------------------------------------
|
|
' <auto-generated>
|
|
' Dieser Code wurde von einem Tool generiert.
|
|
' Laufzeitversion:4.0.30319.42000
|
|
'
|
|
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
|
|
' der Code erneut generiert wird.
|
|
' </auto-generated>
|
|
'------------------------------------------------------------------------------
|
|
|
|
Option Strict On
|
|
Option Explicit On
|
|
|
|
|
|
Namespace My
|
|
|
|
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
|
|
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.14.0.0"), _
|
|
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Partial Friend NotInheritable Class MySettings
|
|
Inherits Global.System.Configuration.ApplicationSettingsBase
|
|
|
|
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
|
|
|
|
#Region "Automatische My.Settings-Speicherfunktion"
|
|
#If _MyType = "WindowsForms" Then
|
|
Private Shared addedHandler As Boolean
|
|
|
|
Private Shared addedHandlerLockObject As New Object
|
|
|
|
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
|
|
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
|
|
If My.Application.SaveMySettingsOnExit Then
|
|
My.Settings.Save()
|
|
End If
|
|
End Sub
|
|
#End If
|
|
#End Region
|
|
|
|
Public Shared ReadOnly Property [Default]() As MySettings
|
|
Get
|
|
|
|
#If _MyType = "WindowsForms" Then
|
|
If Not addedHandler Then
|
|
SyncLock addedHandlerLockObject
|
|
If Not addedHandler Then
|
|
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
|
|
addedHandler = True
|
|
End If
|
|
End SyncLock
|
|
End If
|
|
#End If
|
|
Return defaultInstance
|
|
End Get
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("5")> _
|
|
Public Property IntervallReminder() As String
|
|
Get
|
|
Return CType(Me("IntervallReminder"),String)
|
|
End Get
|
|
Set
|
|
Me("IntervallReminder") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0"), _
|
|
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
|
Public Property frmMainSize() As Global.System.Drawing.Size
|
|
Get
|
|
Return CType(Me("frmMainSize"),Global.System.Drawing.Size)
|
|
End Get
|
|
Set
|
|
Me("frmMainSize") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0"), _
|
|
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
|
Public Property frmMainPosition() As Global.System.Drawing.Point
|
|
Get
|
|
Return CType(Me("frmMainPosition"),Global.System.Drawing.Point)
|
|
End Get
|
|
Set
|
|
Me("frmMainPosition") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0"), _
|
|
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
|
Public Property frmValidatorSize() As Global.System.Drawing.Size
|
|
Get
|
|
Return CType(Me("frmValidatorSize"),Global.System.Drawing.Size)
|
|
End Get
|
|
Set
|
|
Me("frmValidatorSize") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0"), _
|
|
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
|
Public Property frmValidatorPosition() As Global.System.Drawing.Point
|
|
Get
|
|
Return CType(Me("frmValidatorPosition"),Global.System.Drawing.Point)
|
|
End Get
|
|
Set
|
|
Me("frmValidatorPosition") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0")> _
|
|
Public Property frmMassValidatorSize() As Global.System.Drawing.Size
|
|
Get
|
|
Return CType(Me("frmMassValidatorSize"),Global.System.Drawing.Size)
|
|
End Get
|
|
Set
|
|
Me("frmMassValidatorSize") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0")> _
|
|
Public Property frmMassValidatorposition() As Global.System.Drawing.Point
|
|
Get
|
|
Return CType(Me("frmMassValidatorposition"),Global.System.Drawing.Point)
|
|
End Get
|
|
Set
|
|
Me("frmMassValidatorposition") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0")> _
|
|
Public Property frmValidatorSearchPosition() As Global.System.Drawing.Point
|
|
Get
|
|
Return CType(Me("frmValidatorSearchPosition"),Global.System.Drawing.Point)
|
|
End Get
|
|
Set
|
|
Me("frmValidatorSearchPosition") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("513")> _
|
|
Public Property frmValSearchSplitterDistance() As Integer
|
|
Get
|
|
Return CType(Me("frmValSearchSplitterDistance"),Integer)
|
|
End Get
|
|
Set
|
|
Me("frmValSearchSplitterDistance") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("Normal")> _
|
|
Public Property frmMainWindowState() As String
|
|
Get
|
|
Return CType(Me("frmMainWindowState"),String)
|
|
End Get
|
|
Set
|
|
Me("frmMainWindowState") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("False")> _
|
|
Public ReadOnly Property UseAppConfigConString() As Boolean
|
|
Get
|
|
Return CType(Me("UseAppConfigConString"),Boolean)
|
|
End Get
|
|
End Property
|
|
|
|
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("TEST")> _
|
|
Public ReadOnly Property UserConfig_Prefix() As String
|
|
Get
|
|
Return CType(Me("UserConfig_Prefix"),String)
|
|
End Get
|
|
End Property
|
|
|
|
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM;Persist Security "& _
|
|
"Info=True;User ID=sa;Password=dd;Encrypt=False")> _
|
|
Public ReadOnly Property ConnectionString() As String
|
|
Get
|
|
Return CType(Me("ConnectionString"),String)
|
|
End Get
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0"), _
|
|
Global.System.Configuration.SettingsManageabilityAttribute(Global.System.Configuration.SettingsManageability.Roaming)> _
|
|
Public Property frmTableColumns_Position() As Global.System.Drawing.Point
|
|
Get
|
|
Return CType(Me("frmTableColumns_Position"),Global.System.Drawing.Point)
|
|
End Get
|
|
Set
|
|
Me("frmTableColumns_Position") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("0, 0")> _
|
|
Public Property frmValidatorSearchSize() As Global.System.Drawing.Size
|
|
Get
|
|
Return CType(Me("frmValidatorSearchSize"),Global.System.Drawing.Size)
|
|
End Get
|
|
Set
|
|
Me("frmValidatorSearchSize") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.UserScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("Normal")> _
|
|
Public Property frmValidatorWindowState() As String
|
|
Get
|
|
Return CType(Me("frmValidatorWindowState"),String)
|
|
End Get
|
|
Set
|
|
Me("frmValidatorWindowState") = value
|
|
End Set
|
|
End Property
|
|
|
|
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Configuration.DefaultSettingValueAttribute("11.2024")> _
|
|
Public ReadOnly Property GDPICTURE_VERSION() As String
|
|
Get
|
|
Return CType(Me("GDPICTURE_VERSION"),String)
|
|
End Get
|
|
End Property
|
|
End Class
|
|
End Namespace
|
|
|
|
Namespace My
|
|
|
|
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
|
|
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
|
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
|
|
Friend Module MySettingsProperty
|
|
|
|
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
|
|
Friend ReadOnly Property Settings() As Global.taskFLOW.My.MySettings
|
|
Get
|
|
Return Global.taskFLOW.My.MySettings.Default
|
|
End Get
|
|
End Property
|
|
End Module
|
|
End Namespace
|