src/Blackjack/My Project/Settings.Designer.vb

   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
  11 Option Strict On\r
  12 Option Explicit On\r
  13 \r
  14 \r
  15 Namespace 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
  57 End Namespace\r
  58 \r
  59 Namespace 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
  73 End Namespace\r