Organize Control Classes in Namespaces

This commit is contained in:
Jonathan Jenne
2019-03-27 15:59:16 +01:00
parent d7a4a4441d
commit 0eb1eeb287
34 changed files with 670 additions and 234 deletions

View File

@@ -0,0 +1,30 @@
Imports System.ComponentModel
Namespace Controls
Public Class Localization
Private Shared Function Lookup(key As String)
Try
Return My.Resources.ControlProperties.ResourceManager.GetString(key)
Catch ex As Exception
Return key
End Try
End Function
Public Class LocalizedDescriptionAttribute
Inherits DescriptionAttribute
Public Sub New(key As String)
MyBase.New(Lookup(key))
End Sub
End Class
Public Class LocalizedCategoryAttribute
Inherits CategoryAttribute
Public Sub New(key As String)
MyBase.New(Lookup(key))
End Sub
End Class
End Class
End Namespace