Code development platform for open source projects from the European Union institutions

Skip to content
Snippets Groups Projects
Commit abd6431b authored by Michael KRISPER's avatar Michael KRISPER
Browse files

[VECTO] removed settings file (not used)

parent 7f188cb3
No related branches found
No related tags found
No related merge requests found
'------------------------------------------------------------------------------
' <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
Imports System.CodeDom.Compiler
Imports System.ComponentModel
Imports System.ComponentModel.Design
Imports System.Configuration
Imports System.Runtime.CompilerServices
Namespace My
<CompilerGenerated(), _
GeneratedCode("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "12.0.0.0"), _
EditorBrowsable(EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Synchronized(New MySettings()), MySettings)
#Region "Funktion zum automatischen Speichern von My.Settings"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<DebuggerNonUserCode(), EditorBrowsable(EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Object, ByVal e As EventArgs)
If Application.SaveMySettingsOnExit Then
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 Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
#End If
Return defaultInstance
End Get
End Property
End Class
End Namespace
Namespace My
<HideModuleName(), _
DebuggerNonUserCode(), _
CompilerGenerated()> _
Friend Module MySettingsProperty
<HelpKeyword("My.Settings")> _
Friend ReadOnly Property Settings() As MySettings
Get
Return MySettings.Default
End Get
End Property
End Module
End Namespace
<?xml version='1.0' encoding='utf-8'?>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" UseMySettingsClassName="true">
<Profiles />
<Settings />
</SettingsFile>
\ No newline at end of file
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment