Add Lookup Grid Localization

This commit is contained in:
Jonathan Jenne 2021-04-29 12:33:21 +02:00
parent ccf8236d9f
commit 2a571a91ab

View File

@ -8,6 +8,7 @@ Imports System.DirectoryServices
Imports DigitalData.Modules.Logging
Imports DigitalData.Controls.LookupGrid
Imports DigitalData.GUIs.GlobalIndexer
Imports DevExpress.XtraEditors.Controls
Public Class frmIndex
#Region "+++++ Variablen ++++++"
@ -73,6 +74,8 @@ Public Class frmIndex
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
_Logger = LOGCONFIG.GetLogger()
Localizer.Active = New LookupGridLocalizer()
End Sub
Public Sub DisposeViewer()
@ -1764,6 +1767,7 @@ Public Class frmIndex
If DefaultValue Is Nothing Then
DefaultValue = GetPlaceholderValue(oRow.Item("DEFAULT_VALUE"), CURRENT_WORKFILE, USER_SHORTNAME)
End If
Select Case oDataType
Case "BOOLEAN"
Dim chk As CheckBox = oControls.AddCheckBox(oControlName, oControlPosition, DefaultValue, oRow.Item("COMMENT").ToString)