--- a/ApplicationModel.st	Tue Aug 14 12:42:45 2018 +0200
+++ b/ApplicationModel.st	Thu Aug 16 21:16:19 2018 +0200
@@ -4227,6 +4227,24 @@
     "Created: / 09-08-2018 / 15:07:28 / Claus Gittinger"
 !
 
+information:aString with:argument1 with:argument2 with:argument3
+    "like Object's information, but translates the string via the
+     resourcePack, thus giving a translated string automatically"
+
+    self informationTranslated:aString with:argument1 with:argument2 with:argument3
+
+    "Created: / 16-08-2018 / 21:15:19 / Claus Gittinger"
+!
+
+information:aString withArguments:arguments
+    "like Object's information, but translates the string via the
+     resourcePack, thus giving a translated string automatically"
+
+    self informationTranslated:aString withArguments:arguments
+
+    "Created: / 16-08-2018 / 21:15:30 / Claus Gittinger"
+!
+
 informationHolder
     "applications which want to show this in some info-area at the bottom
      should redefine this to return a value holder or action-block"
@@ -4265,6 +4283,26 @@
     "Created: / 09-08-2018 / 15:07:50 / Claus Gittinger"
 !
 
+informationTranslated:aString with:argument1 with:argument2 with:argument3
+    "like Object's information, but translates the string via the
+     resourcePack, thus giving a translated string automatically"
+
+    self informationUntranslated:
+            (self translateString:aString with:argument1 with:argument2 with:argument3)
+
+    "Created: / 16-08-2018 / 21:15:47 / Claus Gittinger"
+!
+
+informationTranslated:aString withArguments:arguments
+    "like Object's information, but translates the string via the
+     resourcePack, thus giving a translated string automatically"
+
+    self informationUntranslated:
+            (self translateString:aString withArguments:arguments)
+
+    "Created: / 16-08-2018 / 21:16:05 / Claus Gittinger"
+!
+
 informationUntranslated:aString
     "applications which want to show this in some info-area at the bottom
      may redefine this or the informationHolder message."