Subversion Repositories Projects

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2233 - 1 
'------------------------------------------------------------------------------
2 
' <auto-generated>
3 
'     Dieser Code wurde von einem Tool generiert.
4 
'     Laufzeitversion:4.0.30319.42000
5 
'
6 
'     Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
7 
'     der Code erneut generiert wird.
8 
' </auto-generated>
9 
'------------------------------------------------------------------------------
10 
 
11 
Option Strict On
12 
Option Explicit On
13 
 
14 
 
15 
Namespace My
16 
 
17 
    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(),  _
18 
     Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "14.0.0.0"),  _
19 
     Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>  _
20 
    Partial Friend NotInheritable Class MySettings
21 
        Inherits Global.System.Configuration.ApplicationSettingsBase
22 
 
23 
        Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
24 
 
25 
#Region "Funktion zum automatischen Speichern von My.Settings"
26 
#If _MyType = "WindowsForms" Then
27 
    Private Shared addedHandler As Boolean
28 
 
29 
    Private Shared addedHandlerLockObject As New Object
30 
 
31 
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
32 
    Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
33 
        If My.Application.SaveMySettingsOnExit Then
34 
            My.Settings.Save()
35 
        End If
36 
    End Sub
37 
#End If
38 
#End Region
39 
 
40 
        Public Shared ReadOnly Property [Default]() As MySettings
41 
            Get
42 
 
43 
#If _MyType = "WindowsForms" Then
44 
               If Not addedHandler Then
45 
                    SyncLock addedHandlerLockObject
46 
                        If Not addedHandler Then
47 
                            AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
48 
                            addedHandler = True
49 
                        End If
50 
                    End SyncLock
51 
                End If
52 
#End If
53 
                Return defaultInstance
54 
            End Get
55 
        End Property
56 
    End Class
57 
End Namespace
58 
 
59 
Namespace My
60 
 
61 
    <Global.Microsoft.VisualBasic.HideModuleNameAttribute(),  _
62 
     Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
63 
     Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>  _
64 
    Friend Module MySettingsProperty
65 
 
66 
        <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")>  _
67 
        Friend ReadOnly Property Settings() As Global.ArtificialHorizon.My.MySettings
68 
            Get
69 
                Return Global.ArtificialHorizon.My.MySettings.Default
70 
            End Get
71 
        End Property
72 
    End Module
73 
End Namespace