Add Lookup Grid Localization
This commit is contained in:
parent
ccf8236d9f
commit
2a571a91ab
@ -8,6 +8,7 @@ Imports System.DirectoryServices
|
|||||||
Imports DigitalData.Modules.Logging
|
Imports DigitalData.Modules.Logging
|
||||||
Imports DigitalData.Controls.LookupGrid
|
Imports DigitalData.Controls.LookupGrid
|
||||||
Imports DigitalData.GUIs.GlobalIndexer
|
Imports DigitalData.GUIs.GlobalIndexer
|
||||||
|
Imports DevExpress.XtraEditors.Controls
|
||||||
|
|
||||||
Public Class frmIndex
|
Public Class frmIndex
|
||||||
#Region "+++++ Variablen ++++++"
|
#Region "+++++ Variablen ++++++"
|
||||||
@ -73,6 +74,8 @@ Public Class frmIndex
|
|||||||
|
|
||||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||||
_Logger = LOGCONFIG.GetLogger()
|
_Logger = LOGCONFIG.GetLogger()
|
||||||
|
|
||||||
|
Localizer.Active = New LookupGridLocalizer()
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Public Sub DisposeViewer()
|
Public Sub DisposeViewer()
|
||||||
@ -1764,6 +1767,7 @@ Public Class frmIndex
|
|||||||
If DefaultValue Is Nothing Then
|
If DefaultValue Is Nothing Then
|
||||||
DefaultValue = GetPlaceholderValue(oRow.Item("DEFAULT_VALUE"), CURRENT_WORKFILE, USER_SHORTNAME)
|
DefaultValue = GetPlaceholderValue(oRow.Item("DEFAULT_VALUE"), CURRENT_WORKFILE, USER_SHORTNAME)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Select Case oDataType
|
Select Case oDataType
|
||||||
Case "BOOLEAN"
|
Case "BOOLEAN"
|
||||||
Dim chk As CheckBox = oControls.AddCheckBox(oControlName, oControlPosition, DefaultValue, oRow.Item("COMMENT").ToString)
|
Dim chk As CheckBox = oControls.AddCheckBox(oControlName, oControlPosition, DefaultValue, oRow.Item("COMMENT").ToString)
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user