AppStd/TaskFlow
8
1
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Add Proper Translation for Lookup Grids

Browse Source
This commit is contained in:
Jonathan Jenne 2021-05-03 13:02:49 +02:00
parent b9a4d35093
commit a66d591c52
1 changed files with 16 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
app/DD_PM_WINDREAM/frmValidator.vb
View File

@ -14,6 +14,7 @@ Imports DevExpress.XtraEditors.Repository
Imports DigitalData.Modules.EDMI.API Imports DigitalData.Modules.EDMI.API
Imports DigitalData.Modules.EDMI.API.EDMIServiceReference Imports DigitalData.Modules.EDMI.API.EDMIServiceReference
Imports DevExpress.XtraGrid.Views.Grid Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraEditors.Controls
Public Class frmValidator Public Class frmValidator
Dim strFileList() Dim strFileList()
@ -82,7 +83,22 @@ Public Class frmValidator
Private ControlHandleStarted As Boolean = False Private ControlHandleStarted As Boolean = False
Public Sub New()
'MyBase.New
LOGGER.Debug("Initialize Components...")
InitializeComponent()
LOGGER.Debug("Initialize _frmValidatorSearch...")
Try
_frmValidatorSearch = New frmValidatorSearch
Catch ex As Exception
LOGGER.Error(ex)
End Try
Localizer.Active = New LookupGridLocalizer()
End Sub
Private Sub frmValidation_Load(sender As Object, e As System.EventArgs) Handles Me.Load Private Sub frmValidation_Load(sender As Object, e As System.EventArgs) Handles Me.Load
Try Try
LOGGER.Debug("###frmValidation_Load###") LOGGER.Debug("###frmValidation_Load###")
DataASorDB = New ClassDataASorDB DataASorDB = New ClassDataASorDB
@ -5227,18 +5243,6 @@ Public Class frmValidator
Private Const SEE_MASK_FLAG_NO_UI = &H400 Private Const SEE_MASK_FLAG_NO_UI = &H400
Public Const SW_SHOW As Short = 5 Public Const SW_SHOW As Short = 5
Public Sub New()
'MyBase.New
LOGGER.Debug("Initialize Components...")
InitializeComponent()
LOGGER.Debug("Initialize _frmValidatorSearch...")
Try
_frmValidatorSearch = New frmValidatorSearch
Catch ex As Exception
LOGGER.Error(ex)
End Try
End Sub
<DllImport("Shell32", CharSet:=CharSet.Auto, SetLastError:=True)> <DllImport("Shell32", CharSet:=CharSet.Auto, SetLastError:=True)>
Public Shared Function ShellExecuteEx(ByRef lpExecInfo As SHELLEXECUTEINFO) As Boolean Public Shared Function ShellExecuteEx(ByRef lpExecInfo As SHELLEXECUTEINFO) As Boolean
End Function End Function