diff --git a/lcl/languages/lclstrconsts.fr.po b/lcl/languages/lclstrconsts.fr.po
index b09644b58c..9408108b65 100644
--- a/lcl/languages/lclstrconsts.fr.po
+++ b/lcl/languages/lclstrconsts.fr.po
@@ -254,10 +254,12 @@ msgid "&Directory"
 msgstr "&Répertoire"
 
 #: lclstrconsts.rsdocopy
+msgctxt "lclstrconsts.rsdocopy"
 msgid "Copy"
 msgstr "Copier"
 
 #: lclstrconsts.rsdopaste
+msgctxt "lclstrconsts.rsdopaste"
 msgid "Paste"
 msgstr "Coller"
 
@@ -266,6 +268,7 @@ msgid "Duplicate icon format."
 msgstr "Dupliquer le format d'icône."
 
 #: lclstrconsts.rseditrecordhint
+msgctxt "lclstrconsts.rseditrecordhint"
 msgid "Edit"
 msgstr "Éditer"
 
@@ -781,10 +784,46 @@ msgstr "Vert citron"
 msgid "List index exceeds bounds (%d)"
 msgstr "Index de liste hors limites (%d)"
 
+#: lclstrconsts.rsmacoseditmenu
+msgctxt "lclstrconsts.rsmacoseditmenu"
+msgid "Edit"
+msgstr "Éditer"
+
+#: lclstrconsts.rsmacoseditmenucopy
+msgctxt "lclstrconsts.rsmacoseditmenucopy"
+msgid "Copy"
+msgstr "Copier"
+
+#: lclstrconsts.rsmacoseditmenucut
+msgid "Cut"
+msgstr "Couper"
+
+#: lclstrconsts.rsmacoseditmenupaste
+msgctxt "lclstrconsts.rsmacoseditmenupaste"
+msgid "Paste"
+msgstr "Coller"
+
+#: lclstrconsts.rsmacoseditmenuredo
+msgid "Redo"
+msgstr "Refaire"
+
+#: lclstrconsts.rsmacoseditmenuselectall
+msgid "Select All"
+msgstr "Tout sélectionner"
+
+#: lclstrconsts.rsmacoseditmenuundo
+msgid "Undo"
+msgstr "Annuler"
+
 #: lclstrconsts.rsmacosfileformat
 msgid "File Format:"
 msgstr "Format de fichier :"
 
+#: lclstrconsts.rsmacosmenuabout
+#, object-pascal-format
+msgid "About %s"
+msgstr "À propos d’%s"
+
 #: lclstrconsts.rsmacosmenuhide
 #, object-pascal-format
 msgid "Hide %s"
@@ -794,6 +833,10 @@ msgstr "Masquer %s"
 msgid "Hide Others"
 msgstr "Masquer les autres"
 
+#: lclstrconsts.rsmacosmenupreferences
+msgid "Preferences..."
+msgstr "Préférences…"
+
 #: lclstrconsts.rsmacosmenuquit
 #, object-pascal-format
 msgid "Quit %s"
@@ -805,7 +848,7 @@ msgstr "Services"
 
 #: lclstrconsts.rsmacosmenushowall
 msgid "Show All"
-msgstr "Tout afficher"
+msgstr "Tout Afficher"
 
 #: lclstrconsts.rsmarooncolorcaption
 msgid "Maroon"