Completed rules
[Blackjack.git] / src / Blackjack / My Project / Settings.Designer.vb
CommitLineData
8c763a2e 1'------------------------------------------------------------------------------\r
2' <auto-generated>\r
3' This code was generated by a tool.\r
4' Runtime Version:4.0.30319.296\r
5'\r
6' Changes to this file may cause incorrect behavior and will be lost if\r
7' the code is regenerated.\r
8' </auto-generated>\r
9'------------------------------------------------------------------------------\r
10\r
11Option Strict On\r
12Option Explicit On\r
13\r
14\r
15Namespace My\r
16 \r
17 <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _\r
18 Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0"), _\r
19 Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _\r
20 Partial Friend NotInheritable Class MySettings\r
21 Inherits Global.System.Configuration.ApplicationSettingsBase\r
22 \r
23 Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)\r
24 \r
25#Region "My.Settings Auto-Save Functionality"\r
26#If _MyType = "WindowsForms" Then\r
27 Private Shared addedHandler As Boolean\r
28\r
29 Private Shared addedHandlerLockObject As New Object\r
30\r
31 <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _\r
32 Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)\r
33 If My.Application.SaveMySettingsOnExit Then\r
34 My.Settings.Save()\r
35 End If\r
36 End Sub\r
37#End If\r
38#End Region\r
39 \r
40 Public Shared ReadOnly Property [Default]() As MySettings\r
41 Get\r
42 \r
43#If _MyType = "WindowsForms" Then\r
44 If Not addedHandler Then\r
45 SyncLock addedHandlerLockObject\r
46 If Not addedHandler Then\r
47 AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings\r
48 addedHandler = True\r
49 End If\r
50 End SyncLock\r
51 End If\r
52#End If\r
53 Return defaultInstance\r
54 End Get\r
55 End Property\r
56 End Class\r
57End Namespace\r
58\r
59Namespace My\r
60 \r
61 <Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _\r
62 Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _\r
63 Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _\r
64 Friend Module MySettingsProperty\r
65 \r
66 <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _\r
67 Friend ReadOnly Property Settings() As Global.Blackjack.My.MySettings\r
68 Get\r
69 Return Global.Blackjack.My.MySettings.Default\r
70 End Get\r
71 End Property\r
72 End Module\r
73End Namespace\r