LookupGrid: Translate last string in LookupGrid

Controls.LookupGrid/LookupControl3.vb

@@ -49,10 +49,8 @@ Public Class RepositoryItemLookupControl3
     Private Const TAG_DROPDOWN = "openDropdown"
 
     Private Const TAG_BUTTON_LOOKUP_FORM = "openLookupForm"
-    Private Const TEXT_NO_RECORDS = "Keine Datensätze ausgewählt"
-    Private Const TEXT_ONE_RECORD = "Ein Datensatz ausgewählt"
-    Private Const TEXT_N_RECORDS = "{0} Datensätze ausgewählt"
 
+    Private _R As Resources.ResourceManager = My.Resources.Strings.ResourceManager
     Private _SelectedValues As New List(Of String)
     Private _MultiSelect As Boolean = False
     Private _ReadOnly As Boolean = False
@@ -159,11 +157,11 @@ Public Class RepositoryItemLookupControl3
         If MultiSelect = True Then
             Select Case Values.Count
                 Case 0
-                    NullText = TEXT_NO_RECORDS
+                    NullText = _R.GetString("LookupControl_NoRecords")
                 Case 1
-                    NullText = TEXT_ONE_RECORD
+                    NullText = _R.GetString("LookupControl_OneRecord")
                 Case Else
-                    NullText = String.Format(TEXT_N_RECORDS, Values.Count)
+                    NullText = String.Format(_R.GetString("LookupControl_NRecords"), Values.Count)
             End Select
         Else
             NullText = Values.FirstOrDefault()

Controls.LookupGrid/Resources/Strings.Designer.vb

@@ -64,21 +64,48 @@ Namespace My.Resources
             End Set
         End Property
         
+        '''<summary>
+        '''  Sucht eine lokalisierte Zeichenfolge, die Keine Datensätze ausgewählt ähnelt.
+        '''</summary>
+        Friend Shared ReadOnly Property LookupControl_NoRecords() As String
+            Get
+                Return ResourceManager.GetString("LookupControl_NoRecords", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Zeichenfolge, die {0} Datensätze ausgewählt ähnelt.
+        '''</summary>
+        Friend Shared ReadOnly Property LookupControl_NRecords() As String
+            Get
+                Return ResourceManager.GetString("LookupControl_NRecords", resourceCulture)
+            End Get
+        End Property
+        
+        '''<summary>
+        '''  Sucht eine lokalisierte Zeichenfolge, die Ein Datensatz ausgewählt ähnelt.
+        '''</summary>
+        Friend Shared ReadOnly Property LookupControl_OneRecord() As String
+            Get
+                Return ResourceManager.GetString("LookupControl_OneRecord", resourceCulture)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Sucht eine lokalisierte Zeichenfolge, die Bitte wählen Sie einen Wert aus: ähnelt.
         '''</summary>
-        Friend Shared ReadOnly Property FormText() As String
+        Friend Shared ReadOnly Property PopupForm_Text() As String
             Get
-                Return ResourceManager.GetString("FormText", resourceCulture)
+                Return ResourceManager.GetString("PopupForm_Text", resourceCulture)
             End Get
         End Property
         
         '''<summary>
         '''  Sucht eine lokalisierte Zeichenfolge, die Bitte wählen Sie einen oder mehrere Werte aus: ähnelt.
         '''</summary>
-        Friend Shared ReadOnly Property FormTextMultiLine() As String
+        Friend Shared ReadOnly Property PopupForm_TextMultiLine() As String
             Get
-                Return ResourceManager.GetString("FormTextMultiLine", resourceCulture)
+                Return ResourceManager.GetString("PopupForm_TextMultiLine", resourceCulture)
             End Get
         End Property
     End Class

Controls.LookupGrid/Resources/Strings.en.resx

@@ -117,10 +117,19 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
-  <data name="FormText" xml:space="preserve">
+  <data name="LookupControl_NoRecords" xml:space="preserve">
+    <value>No records selected</value>
+  </data>
+  <data name="LookupControl_NRecords" xml:space="preserve">
+    <value>{0} records selected</value>
+  </data>
+  <data name="LookupControl_OneRecord" xml:space="preserve">
+    <value>One record selected</value>
+  </data>
+  <data name="PopupForm_Text" xml:space="preserve">
     <value>Please choose a value:</value>
   </data>
-  <data name="FormTextMultiLine" xml:space="preserve">
+  <data name="PopupForm_TextMultiLine" xml:space="preserve">
     <value>Please choose one or more values:</value>
   </data>
 </root>

Controls.LookupGrid/Resources/Strings.resx

@@ -117,10 +117,19 @@
   <resheader name="writer">
     <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
   </resheader>
-  <data name="FormText" xml:space="preserve">
+  <data name="LookupControl_NoRecords" xml:space="preserve">
+    <value>Keine Datensätze ausgewählt</value>
+  </data>
+  <data name="LookupControl_NRecords" xml:space="preserve">
+    <value>{0} Datensätze ausgewählt</value>
+  </data>
+  <data name="LookupControl_OneRecord" xml:space="preserve">
+    <value>Ein Datensatz ausgewählt</value>
+  </data>
+  <data name="PopupForm_Text" xml:space="preserve">
     <value>Bitte wählen Sie einen Wert aus:</value>
   </data>
-  <data name="FormTextMultiLine" xml:space="preserve">
+  <data name="PopupForm_TextMultiLine" xml:space="preserve">
     <value>Bitte wählen Sie einen oder mehrere Werte aus:</value>
   </data>
 </root>

Controls.LookupGrid/frmLookupGrid.vb

@@ -54,13 +54,11 @@ Public Class frmLookupGrid
             Dim oCheckboxColumn = _View.Columns.Item(0)
             oCheckboxColumn.Caption = " "
             oCheckboxColumn.MaxWidth = 10
-            My.Resources.ResourceManager.GetString("FormText")
 
-
+            Text = _R.GetString("PopupForm_Text")
-            Text = _R.GetString("FormText")
             _DataColumn = 1
         Else
-            Text = _R.GetString("FormText")
+            Text = _R.GetString("PopupForm_TextMultiLine")
             _DataColumn = 0
         End If