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

TestGUI: Add Localizer Tests for LookupControl

Browse Source
This commit is contained in:
Jonathan Jenne 2021-04-29 16:09:27 +02:00
parent c33d5ff340
commit cbd861fc89
1 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
GUIs.Test.TestGUI/frmLookup.vb
View File

@ -1,10 +1,23 @@
Imports DigitalData.Controls.LookupGrid Imports System.Globalization
Imports DevExpress.XtraEditors.Controls
Imports DigitalData.Controls.LookupGrid
Public Class frmLookup Public Class frmLookup
Private _Datasource As List(Of String) = New List(Of String) From {"Foo", "Bar", "Baz", "Bart", "Maggie", "Homer"} Private _Datasource As List(Of String) = New List(Of String) From {"Foo", "Bar", "Baz", "Bart", "Maggie", "Homer"}
Public Sub New()
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
Localizer.Active = New LookupGridLocalizer()
End Sub
Private Sub frmLookup_Load(sender As Object, e As EventArgs) Handles MyBase.Load Private Sub frmLookup_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim oCulture = CultureInfo.CurrentCulture
Dim oUICulture = CultureInfo.CurrentUICulture
Dim oTable = GetDatatable(10) Dim oTable = GetDatatable(10)
Dim LookupControl31 As New LookupControl3 With { Dim LookupControl31 As New LookupControl3 With {