LCL: localized shortcut modifiers

git-svn-id: trunk@11457 -

lcl/include/intfbaselcl.inc

@@ -263,9 +263,9 @@ function TWidgetSet.GetAcceleratorString(const AVKey: Byte; const AShiftState: T
 
 begin
   Result := '';
-  if ssCtrl in AShiftState then AddPart('Ctrl');
-  if ssAlt in AShiftState then AddPart('Alt');
-  if ssShift in AShiftState then AddPart('Shift');
+  if ssCtrl in AShiftState then AddPart(ifsCtrl);
+  if ssAlt in AShiftState then AddPart(ifsAlt);
+  if ssShift in AShiftState then AddPart(ifsVK_SHIFT);
   AddKey;
 end;
 

lcl/languages/lclstrconsts.ca.po

@@ -161,6 +161,10 @@ msgstr ""
 msgid "All files (%s)|%s|%s"
 msgstr ""
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr ""
@@ -233,6 +237,10 @@ msgstr ""
 msgid "Creating gdb catchable error:"
 msgstr ""
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr ""

lcl/languages/lclstrconsts.de.po

@@ -164,6 +164,10 @@ msgstr "Übernehmen"
 msgid "All files (%s)|%s|%s"
 msgstr "Alle Dateien (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Rückschritt"
@@ -236,6 +240,10 @@ msgstr "Konvertiert"
 msgid "Creating gdb catchable error:"
 msgstr "Erzeuge GDB-fangbaren Fehler:"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Spezial"

lcl/languages/lclstrconsts.es.po

@@ -160,6 +160,10 @@ msgstr "Aceptar"
 msgid "All files (%s)|%s|%s"
 msgstr "Todos los archivos (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Retroceso"
@@ -232,6 +236,10 @@ msgstr "Convertir"
 msgid "Creating gdb catchable error:"
 msgstr "Creando un error capturable por gdb"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Personalizado"

lcl/languages/lclstrconsts.fi.po

@@ -150,6 +150,10 @@ msgstr "Hyväksy"
 msgid "All files (%s)|%s|%s"
 msgstr "Kaikki tiedostot (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr ""
@@ -222,6 +226,10 @@ msgstr ""
 msgid "Creating gdb catchable error:"
 msgstr ""
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr ""

lcl/languages/lclstrconsts.fr.po

@@ -162,6 +162,10 @@ msgstr "Accepter"
 msgid "All files (%s)|%s|%s"
 msgstr "Tous les fichiers (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Retour arriére"
@@ -234,6 +238,10 @@ msgstr "Convertir"
 msgid "Creating gdb catchable error:"
 msgstr ""
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Personnalisé"

lcl/languages/lclstrconsts.id.po

@@ -163,6 +163,10 @@ msgstr "Terima"
 msgid "All files (%s)|%s|%s"
 msgstr "Semua file (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Backspace"
@@ -235,6 +239,10 @@ msgstr "Konversi"
 msgid "Creating gdb catchable error:"
 msgstr "Pembuatan cachable salah: "
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Kustom"

lcl/languages/lclstrconsts.it.po

@@ -160,6 +160,10 @@ msgstr "Accetta"
 msgid "All files (%s)|%s|%s"
 msgstr "Tutti i file (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Backspace"
@@ -232,6 +236,10 @@ msgstr "Converti"
 msgid "Creating gdb catchable error:"
 msgstr "Creazione errore intercettabile gdb:"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Personalizza"

lcl/languages/lclstrconsts.nl.po

@@ -150,6 +150,10 @@ msgstr "Accepteer"
 msgid "All files (%s)|%s|%s"
 msgstr "Alle bestanden (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Backspace"
@@ -222,6 +226,10 @@ msgstr "Converteer"
 msgid "Creating gdb catchable error:"
 msgstr "Maak een fout die door gdb opgevangen kan worden"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Eigen"

lcl/languages/lclstrconsts.pb.po

@@ -150,6 +150,10 @@ msgstr "Aceitar"
 msgid "All files (%s)|%s|%s"
 msgstr "Todos os arquivos (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Backspace"
@@ -222,6 +226,10 @@ msgstr "Converter"
 msgid "Creating gdb catchable error:"
 msgstr "Erro na criação de gdb catchable:"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Personalizado"

lcl/languages/lclstrconsts.pl.po

@@ -165,6 +165,10 @@ msgstr ""
 msgid "All files (%s)|%s|%s"
 msgstr "Wszystkie pliki (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr ""
@@ -237,6 +241,10 @@ msgstr "Konwertuj"
 msgid "Creating gdb catchable error:"
 msgstr "Błąd przy tworzeniu \"gdb catchable\":"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Inny"

lcl/languages/lclstrconsts.pliso.po

@@ -161,6 +161,10 @@ msgstr ""
 msgid "All files (%s)|%s|%s"
 msgstr ""
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr ""
@@ -233,6 +237,10 @@ msgstr ""
 msgid "Creating gdb catchable error:"
 msgstr "B³±d przy tworzeniu \"gdb catchable\":"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Inny"

lcl/languages/lclstrconsts.plwin.po

@@ -161,6 +161,10 @@ msgstr ""
 msgid "All files (%s)|%s|%s"
 msgstr ""
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr ""
@@ -233,6 +237,10 @@ msgstr ""
 msgid "Creating gdb catchable error:"
 msgstr "B³¹d przy tworzeniu \"gdb catchable\":"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Inny"

lcl/languages/lclstrconsts.po

@@ -150,6 +150,10 @@ msgstr ""
 msgid "All files (%s)|%s|%s"
 msgstr ""
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr ""
@@ -222,6 +226,10 @@ msgstr ""
 msgid "Creating gdb catchable error:"
 msgstr ""
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr ""

lcl/languages/lclstrconsts.ru.po

@@ -161,6 +161,10 @@ msgstr "Принять"
 msgid "All files (%s)|%s|%s"
 msgstr "Все файлы (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Забой"
@@ -233,6 +237,10 @@ msgstr "Преобразовать"
 msgid "Creating gdb catchable error:"
 msgstr "Создание кешируемой ошибки gdb:"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Пользовательский"

lcl/languages/lclstrconsts.ua.po

@@ -150,6 +150,10 @@ msgstr "Прийняти"
 msgid "All files (%s)|%s|%s"
 msgstr "Всі файли (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "Забій"
@@ -222,6 +226,10 @@ msgstr "Перетворити"
 msgid "Creating gdb catchable error:"
 msgstr "Створення помилки кешування gdb:"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "Спеціальний"

lcl/languages/lclstrconsts.zh-cn.po

@@ -163,6 +163,10 @@ msgstr "接受"
 msgid "All files (%s)|%s|%s"
 msgstr "所有文件 (%s)|%s|%s"
 
+#: lclstrconsts:ifsalt
+msgid "Alt"
+msgstr ""
+
 #: lclstrconsts:ifsvk_back
 msgid "Backspace"
 msgstr "退格"
@@ -235,6 +239,10 @@ msgstr "转换"
 msgid "Creating gdb catchable error:"
 msgstr "创建 GDB 可以捕捉的错误"
 
+#: lclstrconsts:ifsctrl
+msgid "Ctrl"
+msgstr ""
+
 #: lclstrconsts:rsmtcustom
 msgid "Custom"
 msgstr "自定义"

lcl/lclstrconsts.pas

@@ -240,6 +240,8 @@ ResourceString
   ifsVK_INSERT     = 'Insert';
   ifsVK_DELETE     = 'Delete'; //= dlgeddelete
   ifsVK_HELP       = 'Help';
+  ifsCtrl          = 'Ctrl';
+  ifsAlt           = 'Alt';
   rsWholeWordsOnly = 'Whole words only';
   rsCaseSensitive = 'Case sensitive';
   rsText = 'Text';