LookupGrid: Localize to English

Controls.LookupGrid/frmLookupGrid.vb

@@ -14,6 +14,8 @@ Public Class frmLookupGrid
     Private _DataSourceTemp As DataTable
     Private _View As GridView
     Private _Grid As GridControl
+    Private _R As Resources.ResourceManager = My.Resources.Strings.ResourceManager
+
 
     Private Sub frmLookupGrid_Load(sender As Object, e As EventArgs) Handles Me.Load
         _View = viewLookup
@@ -52,11 +54,13 @@ Public Class frmLookupGrid
             Dim oCheckboxColumn = _View.Columns.Item(0)
             oCheckboxColumn.Caption = " "
             oCheckboxColumn.MaxWidth = 10
+            My.Resources.ResourceManager.GetString("FormText")
 
-            Text = "Wählen Sie einen oder mehrere Werte:"
+
+            Text = _R.GetString("FormText")
             _DataColumn = 1
         Else
-            Text = "Wählen Sie einen Wert:"
+            Text = _R.GetString("FormText")
             _DataColumn = 0
         End If