From 0ad3efeb90c4798391d3cd4043af1df8b883d06e Mon Sep 17 00:00:00 2001 From: Ben Nicholson Date: Wed, 26 Jun 2024 23:34:56 +1000 Subject: [PATCH] Delete HelloWorld/My Project/Settings.Designer.vb --- HelloWorld/My Project/Settings.Designer.vb | 73 ---------------------- 1 file changed, 73 deletions(-) delete mode 100644 HelloWorld/My Project/Settings.Designer.vb diff --git a/HelloWorld/My Project/Settings.Designer.vb b/HelloWorld/My Project/Settings.Designer.vb deleted file mode 100644 index c894be6..0000000 --- a/HelloWorld/My Project/Settings.Designer.vb +++ /dev/null @@ -1,73 +0,0 @@ -'------------------------------------------------------------------------------ -' -' This code was generated by a tool. -' Runtime Version:4.0.30319.42000 -' -' Changes to this file may cause incorrect behavior and will be lost if -' the code is regenerated. -' -'------------------------------------------------------------------------------ - -Option Strict On -Option Explicit On - - -Namespace My - - _ - 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 "My.Settings Auto-Save Functionality" -#If _MyType = "WindowsForms" Then - Private Shared addedHandler As Boolean - - Private Shared addedHandlerLockObject As New Object - - _ - 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 - End Class -End Namespace - -Namespace My - - _ - Friend Module MySettingsProperty - - _ - Friend ReadOnly Property Settings() As Global.TNTTracking.My.MySettings - Get - Return Global.TNTTracking.My.MySettings.Default - End Get - End Property - End Module -End Namespace