DEADSOFTWARE

gui: redesign menu
[d2df-editor.git] / src / editor / g_language.pas
index 0ba24c1550d1b554320cf93529881b3e01e4eb39..4d3ae7ed69acbbee655e126627a2d6ae45f6282f 100644 (file)
@@ -657,7 +657,7 @@ Uses
   SysUtils, e_log, f_main, f_about, f_activationtype,
   f_addresource_sky, f_addresource_sound,
   f_addresource_texture, f_choosetype, f_keys, f_mapcheck,
-  f_mapoptions, f_maptest, f_mapoptimization, f_options,
+  f_mapoptions, f_mapoptimization, f_options,
   f_packmap, f_savemap, f_saveminimap, f_selectmap, Forms, utils;
 
 Const
@@ -1313,24 +1313,24 @@ Const
 
     ('MENU FILE',                      'File',
                                        'Файл'),
-    ('MENU FILE NEW',                  'New Map',
-                                       'Ð\9dоваÑ\8f ÐºÐ°Ñ\80Ñ\82а'),
-    ('MENU FILE OPEN',                 'Open Map',
-                                       'Открыть карту'),
-    ('MENU FILE SAVE',                 'Save Map',
-                                       'Сохранить карту'),
-    ('MENU FILE SAVE AS',              'Save Map As...',
-                                       'Сохранить карту как...'),
-    ('MENU FILE OPEN WAD',             'Select Map',
-                                       'Выбрать карту'),
-    ('MENU FILE REOPEN',               'Reopen Map',
+    ('MENU FILE NEW',                  'New',
+                                       'СоздаÑ\82Ñ\8c'),
+    ('MENU FILE OPEN',                 'Open...',
+                                       'Открыть...'),
+    ('MENU FILE SAVE',                 'Save',
+                                       'Сохранить'),
+    ('MENU FILE SAVE AS',              'Save As...',
+                                       'Сохранить как...'),
+    ('MENU FILE OPEN WAD',             'Select Map...',
+                                       'Выбрать карту...'),
+    ('MENU FILE REOPEN',               'Revert to Saved',
                                        'Открыть заново'),
-    ('MENU FILE SAVE MINI',            'Save Mini-map',
-                                       'Сохранить мини-карту'),
-    ('MENU FILE DELETE',               'Delete Map from WAD...',
-                                       'УдалиÑ\82Ñ\8c ÐºÐ°Ñ\80Ñ\82Ñ\83 Ð¸Ð· WAD...'),
-    ('MENU FILE PACK MAP',             'Pack Map',
-                                       'УпаковаÑ\82Ñ\8c ÐºÐ°Ñ\80Ñ\82Ñ\83'),
+    ('MENU FILE SAVE MINI',            'Save Minimap...',
+                                       'Сохранить мини-карту...'),
+    ('MENU FILE DELETE',               'Delete from WAD...',
+                                       'Удалить из WAD...'),
+    ('MENU FILE PACK MAP',             'Pack to WAD...',
+                                       'УпаковаÑ\82Ñ\8c Ð² WAD...'),
     ('MENU FILE EXIT',                 'Exit',
                                        'Выход'),
 
@@ -1355,32 +1355,32 @@ Const
                                        'Инструменты'),
     ('MENU TOOLS SNAP GRID',           'Snap to Grid',
                                        'Привязка к сетке'),
-    ('MENU TOOLS MINIMAP',             'Show Mini-map',
-                                       'Ð\9cини-каÑ\80Ñ\82а'),
-    ('MENU TOOLS STEP GRID',           'Switch Grid step',
-                                       'Сменить шаг сетки'),
-    ('MENU TOOLS SHOW EDGES',          'Switch Map edges',
-                                       'Ð\93раницы карты'),
+    ('MENU TOOLS MINIMAP',             'Show Minimap',
+                                       'Ð\9fоказаÑ\82Ñ\8c Ð\9cини-каÑ\80Ñ\82Ñ\83'),
+    ('MENU TOOLS STEP GRID',           'Switch Grid Granularity',
+                                       'Ð\9fеÑ\80еклÑ\8eÑ\87ить шаг сетки'),
+    ('MENU TOOLS SHOW EDGES',          'Show Map Bounds',
+                                       'Ð\9fоказÑ\8bваÑ\82Ñ\8c Ð³раницы карты'),
     ('MENU TOOLS LAYERS',              'Layers',
                                        'Слои'),
 
     ('MENU SERV',                      'Service',
                                        'Сервис'),
-    ('MENU SERV TEST',                 'Check the Map',
-                                       'Проверка карты'),
-    ('MENU SERV OPT',                  'Optimize the Map',
-                                       'Оптимизация карты'),
-    ('MENU SERV PREVIEW',              'Map Preview',
+    ('MENU SERV TEST',                 'Analyse Map...',
+                                       'Проверка карты...'),
+    ('MENU SERV OPT',                  'Optimize Map...',
+                                       'Оптимизация карты...'),
+    ('MENU SERV PREVIEW',              'Preview Mode',
                                        'Предварительный просмотр'),
-    ('MENU SERV LAUNCH',               'In-game test',
+    ('MENU SERV LAUNCH',               'Run Test',
                                        'Тест карты в игре'),
 
     ('MENU SETS',                      'Settings',
                                        'Настройка'),
-    ('MENU SETS MAP',                  'Map parameters',
-                                       'Ð\9fаÑ\80амеÑ\82Ñ\80Ñ\8b ÐºÐ°Ñ\80Ñ\82Ñ\8b'),
-    ('MENU SETS EDITOR',               'Editor settings',
-                                       'Настройки редактора'),
+    ('MENU SETS MAP',                  'Map Properties...',
+                                       'СвойÑ\81Ñ\82ва ÐºÐ°Ñ\80Ñ\82Ñ\8b...'),
+    ('MENU SETS EDITOR',               'Preferences...',
+                                       'Настройки...'),
     ('MENU SETS LAUNCH',               'In-game test settings',
                                        'Настройки теста в игре'),
 
@@ -1424,7 +1424,7 @@ Const
                                        'Включить/Отключить отображение сетки'),
     ('MENU TB GRID STEP',              'Switch Grid step',
                                        'Изменить шаг сетки'),
-    ('MENU TB LAUNCH',                 'In-game test',
+    ('MENU TB LAUNCH',                 'Run Test',
                                        'Тест карты в игре'),
 
     ('MENU LAUNCH SETS',               'Settings...',
@@ -1448,21 +1448,21 @@ Const
                                        'Выберите текстуру'),
     ('CAP KEYS',                       'Keys',
                                        'Ключи'),
-    ('CAP TEST',                       'Map Checking',
+    ('CAP TEST',                       'Analyse Map',
                                        'Проверка карты'),
-    ('CAP OPT',                        'Map Optimization',
+    ('CAP OPT',                        'Optimize Map',
                                        'Оптимизация карты'),
-    ('CAP SETS',                       'Map Parameters',
-                                       'Ð\9fаÑ\80амеÑ\82Ñ\80Ñ\8b карты'),
+    ('CAP SETS',                       'Map Properties',
+                                       'СвойÑ\81Ñ\82ва карты'),
     ('CAP LAUNCH',                     'In-game test Settings',
                                        'Настройки теста в игре'),
-    ('CAP ES',                         'Editor Settings',
+    ('CAP ES',                         'Editor Preferences',
                                        'Настройки редактора'),
     ('CAP PACK',                       'Pack Map',
                                        'Упаковать карту'),
     ('CAP SAVE',                       'Save Map',
                                        'Сохранить карту'),
-    ('CAP MINI',                       'Save Mini-map',
+    ('CAP MINI',                       'Save Minimap',
                                        'Сохранить мини-карту'),
     ('CAP SELECT',                     'Select Map',
                                        'Выберите карту'),
@@ -1829,10 +1829,10 @@ Const
     ('WAD SPECIAL TEXS',               '<EXTRA TEXTURES>',
                                        '<СПЕЦТЕКСТУРЫ>'),
 
-    ('FILE FILTER ALL',                'Doom 2D: Forever Maps (*.dfz, *.wad)|*.dfz;*.wad|Doom 2D: Forever 0.30 Maps (*.ini)|*.ini|Все файлы (*.*)|*.*',
-                                       'Карты Doom 2D: Forever (*.dfz, *.wad)|*.dfz;*.wad|Старые карты Doom 2D: Forever 0.30 (*.ini)|*.ini|Все файлы (*.*)|*.*'),
-    ('FILE FILTER WAD',                'Doom 2D: Forever Maps (*.dfz)|*.dfz|Doom 2D: Forever Maps (*.wad)|*.wad|Все файлы (*.*)|*.*',
-                                       'Карты Doom 2D: Forever (*.dfz)|*.dfz|Карты Doom 2D: Forever (*.wad)|*.wad|Все файлы (*.*)|*.*'),
+    ('FILE FILTER ALL',                'Doom 2D: Forever Maps (*.dfz, *.dfzip, *.zip, *.wad)|*.dfz;*.dfzip;*.zip;*.wad|Doom 2D: Forever 0.30 Maps (*.ini)|*.ini|All Files (*.*)|*.*',
+                                       'Карты Doom 2D: Forever (*.dfz, *.dfzip, *.zip, *.wad)|*.dfz;*.dfzip;*.zip;*.wad|Старые карты Doom 2D: Forever 0.30 (*.ini)|*.ini|Все файлы (*.*)|*.*'),
+    ('FILE FILTER WAD',                'Doom 2D: Forever Maps (*.dfz)|*.dfz|Doom 2D: Forever Maps (*.dfzip)|*.dfzip|Doom 2D: Forever Maps (*.zip)|*.zip|Doom 2D: Forever Maps (*.wad)|*.wad|All Files (*.*)|*.*',
+                                       'Карты Doom 2D: Forever (*.dfz)|*.dfz|Карты Doom 2D: Forever (*.dfzip)|*.dfzip|Карты Doom 2D: Forever (*.zip)|*.zip|Карты Doom 2D: Forever (*.wad)|*.wad|Все файлы (*.*)|*.*'),
 
     ('EDITOR TITLE',                   'Doom 2D: Forever Map Editor',
                                        'Редактор карт Doom 2D: Forever'),
@@ -2056,15 +2056,16 @@ begin
 end;
 
 procedure SetupCaptions();
-var
-  i: Integer;
-
+  var i: Integer; s: AnsiString;
 begin
 // Главная форма:
   with MainForm do
   begin
   // Заголовок:
-    FormCaption := _lc[I_EDITOR_TITLE];
+    s := g_GetBuildHash(false);
+    if s = 'custom build' then
+      s := s + ' by ' + g_GetBuilderName() + ' ' + EDITOR_BUILDDATE + ' ' + EDITOR_BUILDTIME;
+    FormCaption := _lc[I_EDITOR_TITLE] + ' (' + s + ')';
     i := Pos('-', Caption);
     if i > 0 then
       begin
@@ -2095,7 +2096,6 @@ begin
     miToFore.Caption := _lc[I_MENU_EDIT_TO_FORE];
     miToBack.Caption := _lc[I_MENU_EDIT_TO_BACK];
   // "Инструменты":
-    miMenuTools.Caption := _lc[I_MENU_TOOLS];
     miSnapToGrid.Caption := _lc[I_MENU_TOOLS_SNAP_GRID];
     miMiniMap.Caption := _lc[I_MENU_TOOLS_MINIMAP];
     miSwitchGrid.Caption := _lc[I_MENU_TOOLS_STEP_GRID];
@@ -2110,17 +2110,14 @@ begin
     miLayer7.Caption := _lc[I_MENU_LAYER_MONSTER];
     miLayer8.Caption := _lc[I_MENU_LAYER_AREA];
     miLayer9.Caption := _lc[I_MENU_LAYER_TRIGGER];
+    miMapOptions.Caption := _lc[I_MENU_SETS_MAP];
+    miOptions.Caption := _lc[I_MENU_SETS_EDITOR];
   // "Сервис":
     miMenuService.Caption := _lc[I_MENU_SERV];
     miCheckMap.Caption := _lc[I_MENU_SERV_TEST];
     miOptimmization.Caption := _lc[I_MENU_SERV_OPT];
     miMapPreview.Caption := _lc[I_MENU_SERV_PREVIEW];
     miTestMap.Caption := _lc[I_MENU_SERV_LAUNCH];
-  // "Настройка":
-    miMenuSettings.Caption := _lc[I_MENU_SETS];
-    miMapOptions.Caption := _lc[I_MENU_SETS_MAP];
-    miOptions.Caption := _lc[I_MENU_SETS_EDITOR];
-    miMapTestSettings.Caption := _lc[I_MENU_SETS_LAUNCH];
   // "Справка":
     miMenuHelp.Caption := _lc[I_MENU_HELP];
     miAbout.Caption := _lc[I_MENU_HELP_ABOUT];
@@ -2145,8 +2142,6 @@ begin
     miLayerP7.Caption := _lc[I_MENU_LAYER_MONSTER];
     miLayerP8.Caption := _lc[I_MENU_LAYER_AREA];
     miLayerP9.Caption := _lc[I_MENU_LAYER_TRIGGER];
-  // Всплывающее меню для кнопки теста карты:
-    miMapTestPMSet.Caption := _lc[I_MENU_LAUNCH_SETS];
 
   // Кнопка применения свойств:
     bApplyProperty.Caption := _lc[I_BTN_APPLY_PROPS];
@@ -2326,18 +2321,33 @@ begin
     bCancel.Caption := _lc[I_BTN_CANCEL];
   end;
 
-// Форма "Настройки теста карты":
-  with MapTestForm do
+// From "Editor settings":
+  with OptionsForm do
   begin
-    Caption := _lc[I_CAP_LAUNCH];
+    Caption := _lc[I_CAP_ES];
     bOK.Caption := _lc[I_BTN_OK];
     bCancel.Caption := _lc[I_BTN_CANCEL];
-  // Режим игры:
+  // TabGeneral:
+    cbShowDots.Caption := _lc[I_CTRL_ES_GRID];
+    cbShowTexture.Caption := _lc[I_CTRL_ES_TEXTURE];
+    cbShowSize.Caption := _lc[I_CTRL_ES_PANEL_SIZE];
+    cbCheckerboard.Caption := _lc[I_CTRL_ES_CHECKERBOARD];
+    LabelGrid.Caption := _lc[I_LAB_ES_GRID];
+    LabelGridCol.Caption := _lc[I_LAB_ES_GRID_COLOR];
+    LabelGridSize.Caption := _lc[I_LAB_ES_GRID_SIZE];
+    LabelBack.Caption := _lc[I_LAB_ES_BACK];
+    LabelPreview.Caption := _lc[I_LAB_ES_PREVIEW];
+    LabelMinimap.Caption := _lc[I_LAB_ES_MINIMAP];
+    LabelLanguage.Caption := _lc[I_LAB_ES_LANGUAGE];
+  // TabFiles:
+    cbCompress.Caption := _lc[I_LAB_ES_COMPRESS];
+    cbBackup.Caption := _lc[I_LAB_ES_BACKUP];
+    LabelRecent.Caption := _lc[I_LAB_ES_RECENT];
+  // TabTesting:
     rbDM.Caption := _lc[I_CTRL_LAUNCH_DM];
     rbTDM.Caption := _lc[I_CTRL_LAUNCH_TDM];
     rbCTF.Caption := _lc[I_CTRL_LAUNCH_CTF];
     rbCOOP.Caption := _lc[I_CTRL_LAUNCH_COOP];
-  // Опции:
     cbTwoPlayers.Caption := _lc[I_CTRL_LAUNCH_2P];
     cbTeamDamage.Caption := _lc[I_CTRL_LAUNCH_FF];
     cbAllowExit.Caption := _lc[I_CTRL_LAUNCH_EXIT];
@@ -2347,36 +2357,11 @@ begin
     LabelTime.Caption := _lc[I_LAB_LAUNCH_TIME];
     LabelSecs.Caption := _lc[I_LAB_LAUNCH_SECS];
     LabelScore.Caption := _lc[I_LAB_LAUNCH_SCORE];
-  // Путь:
     LabelPath.Caption := _lc[I_LAB_LAUNCH_PATH];
     FindD2dDialog.Title := _lc[I_CTRL_LAUNCH_OPEN];
-
     LabelArgs.Caption := _lc[I_LAB_LAUNCH_ARGS];
   end;
 
-// Форма "Настройки редактора":
-  with OptionsForm do
-  begin
-    Caption := _lc[I_CAP_ES];
-    bOK.Caption := _lc[I_BTN_OK];
-    bCancel.Caption := _lc[I_BTN_CANCEL];
-  // Настройки:
-    cbShowDots.Caption := _lc[I_CTRL_ES_GRID];
-    cbShowTexture.Caption := _lc[I_CTRL_ES_TEXTURE];
-    cbShowSize.Caption := _lc[I_CTRL_ES_PANEL_SIZE];
-    cbCheckerboard.Caption := _lc[I_CTRL_ES_CHECKERBOARD];
-    cbCompress.Caption := _lc[I_LAB_ES_COMPRESS];
-    cbBackup.Caption := _lc[I_LAB_ES_BACKUP];
-    LabelGrid.Caption := _lc[I_LAB_ES_GRID];
-    LabelGridCol.Caption := _lc[I_LAB_ES_GRID_COLOR];
-    LabelGridSize.Caption := _lc[I_LAB_ES_GRID_SIZE];
-    LabelBack.Caption := _lc[I_LAB_ES_BACK];
-    LabelPreview.Caption := _lc[I_LAB_ES_PREVIEW];
-    LabelMinimap.Caption := _lc[I_LAB_ES_MINIMAP];
-    LabelRecent.Caption := _lc[I_LAB_ES_RECENT];
-    LabelLanguage.Caption := _lc[I_LAB_ES_LANGUAGE];
-  end;
-
 // Форма "Упаковать карту":
   with PackMapForm do
   begin