diff --git a/config/ConfigFormUnit.cpp b/config/ConfigFormUnit.cpp index f7b3579..d5a3357 100644 --- a/config/ConfigFormUnit.cpp +++ b/config/ConfigFormUnit.cpp @@ -181,17 +181,26 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"25tick每秒", NULL); MaxgameticksCbx->AddItem(L"15tick每秒", NULL); - auto upscaleHint = - L"必须启用升级才能使此设置发挥作用。\n\n" - "要启用放大功能,请将演示文稿设置为'拉伸至全屏'、\n" + System::UnicodeString shaderHint = + L"某些着色器仅在启用升级时才起作用。\n\n"; + + System::UnicodeString upscaleHint = + L"必须启用升级才能使此设置发挥作用。\n\n"; + + System::UnicodeString enableUpscaleHint = + L"要启用放大功能,请将演示文稿设置为'拉伸至全屏'、\n" "'无边框'或以'窗口化'模式启动游戏并调整窗口大小。"; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } else if (lang == "spanish" || (lang == "auto" && priID == LANG_SPANISH)) { LanguageImg->Visible = true; @@ -252,18 +261,27 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"25 tics por segundo", NULL); MaxgameticksCbx->AddItem(L"15 tics por segundo", NULL); - auto upscaleHint = - L"La ampliación debe estar habilitada para que esta configuración funcione. \n\n" - "Para habilitar la mejora, configura tu presentación en 'Sin bordes', \n" + System::UnicodeString shaderHint = + L"Algunos de los sombreadores solo funcionan cuando la ampliación está habilitada. \n\n"; + + System::UnicodeString upscaleHint = + L"La ampliación debe estar habilitada para que esta configuración funcione. \n\n"; + + System::UnicodeString enableUpscaleHint = + L"Para habilitar la mejora, configura tu presentación en 'Sin bordes', \n" "'Pantalla completa ampliada' o inicia el juego en modo 'Ventana' \n" "y cambia el tamaño de la ventana."; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } else if (lang == "german" || (lang == "auto" && priID == LANG_GERMAN)) { LanguageImg->Visible = true; @@ -324,18 +342,27 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"25 Ticks pro Sekunde", NULL); MaxgameticksCbx->AddItem(L"15 Ticks pro Sekunde", NULL); - auto upscaleHint = - L"Damit diese Einstellung funktioniert, muss die Hochskalierung aktiviert sein. \n\n" - "Um die Hochskalierung zu aktivieren, stellen Sie Ihre Darstellung \n" + System::UnicodeString shaderHint = + L"Einige der Shader funktionieren nur, wenn die Hochskalierung aktiviert ist. \n\n"; + + System::UnicodeString upscaleHint = + L"Damit diese Einstellung funktioniert, muss die Hochskalierung aktiviert sein. \n\n"; + + System::UnicodeString enableUpscaleHint = + L"Um die Hochskalierung zu aktivieren, stellen Sie Ihre Darstellung \n" "entweder auf 'Ränderfreies Fenster', 'Hochskaliertes Vollbild' ein \n" "oder starten Sie das Spiel im 'Fenstermodus' und ändern Sie die Fenstergröße."; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } else if (lang == "russian" || (lang == "auto" && priID == LANG_RUSSIAN)) { LanguageImg->Visible = true; @@ -397,18 +424,27 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"25 тиков в секунду", NULL); MaxgameticksCbx->AddItem(L"15 тиков в секунду", NULL); - auto upscaleHint = - L"Чтобы этот параметр работал, необходимо включить масштабирование. \n\n" - "Чтобы включить масштабирование, установите для презентации режим \n" + System::UnicodeString shaderHint = + L"Некоторые шейдеры работают только при включенном масштабировании. \n\n"; + + System::UnicodeString upscaleHint = + L"Чтобы этот параметр работал, необходимо включить масштабирование. \n\n"; + + System::UnicodeString enableUpscaleHint = + L"Чтобы включить масштабирование, установите для презентации режим \n" "'Без границ', 'Полноэкранный масштабированный' или запустите игру \n" "в 'Оконный' режиме и измените размер окна."; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } else if (lang == "hungarian" || (lang == "auto" && priID == LANG_HUNGARIAN)) { LanguageImg->Visible = true; @@ -469,18 +505,27 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"25 tick másodpercenként", NULL); MaxgameticksCbx->AddItem(L"15 tick másodpercenként", NULL); - auto upscaleHint = - L"A beállítás működéséhez engedélyezni kell a felskálázást. \n\n" - "A felskálázás engedélyezéséhez állítsa be a prezentációt 'Keret nélkül', \n" + System::UnicodeString shaderHint = + L"Néhány árnyékoló csak akkor működik, ha a felskálázás engedélyezve van. \n\n"; + + System::UnicodeString upscaleHint = + L"A beállítás működéséhez engedélyezni kell a felskálázást. \n\n"; + + System::UnicodeString enableUpscaleHint = + L"A felskálázás engedélyezéséhez állítsa be a prezentációt 'Keret nélkül', \n" "'Teljes képernyő felskálázva' értékre, vagy indítsa el a játékot 'Ablakban' \n" "módban, és méretezze át az ablakot."; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } else if (lang == "french" || (lang == "auto" && priID == LANG_FRENCH)) { LanguageImg->Visible = true; @@ -541,18 +586,27 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"25 tics par seconde", NULL); MaxgameticksCbx->AddItem(L"15 tics par seconde", NULL); - auto upscaleHint = - L"La mise à l'échelle doit être activée pour que ce paramètre fonctionne. \n\n" - "Pour activer la mise à l'échelle, définissez votre présentation sur 'Sans Bordure', \n" + System::UnicodeString shaderHint = + L"Certains shaders ne fonctionnent que lorsque la mise à l'échelle est activée. \n\n"; + + System::UnicodeString upscaleHint = + L"La mise à l'échelle doit être activée pour que ce paramètre fonctionne. \n\n"; + + System::UnicodeString enableUpscaleHint = + L"Pour activer la mise à l'échelle, définissez votre présentation sur 'Sans Bordure', \n" "'Plein Écran Mis à l'Échelle' ou démarrez le jeu en mode 'Fenêtré' \n" "et redimensionnez la fenêtre."; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } else if (lang == "italian" || (lang == "auto" && priID == LANG_ITALIAN)) { LanguageImg->Visible = true; @@ -613,18 +667,27 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"25 tick al secondo", NULL); MaxgameticksCbx->AddItem(L"15 tick al secondo", NULL); - auto upscaleHint = - L"Affinché questa impostazione funzioni, è necessario abilitare l'upscaling. \n\n" - "Per abilitare l'upscaling, imposta la presentazione su 'Senza Bordi', \n" + System::UnicodeString shaderHint = + L"Alcuni shader funzionano solo quando l'upscaling è abilitato. \n\n"; + + System::UnicodeString upscaleHint = + L"Affinché questa impostazione funzioni, è necessario abilitare l'upscaling. \n\n"; + + System::UnicodeString enableUpscaleHint = + L"Per abilitare l'upscaling, imposta la presentazione su 'Senza Bordi', \n" "'Schermo Intero Ridimensionato' oppure avvia il gioco in modalità \n" "'In Finestra' e ridimensiona la finestra."; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } else { IsEnglish = true; @@ -731,18 +794,27 @@ void TConfigForm::ApplyTranslation(TIniFile *ini) MaxgameticksCbx->AddItem(L"15 ticks per second", NULL); */ - auto upscaleHint = - L"Upscaling must be enabled for this setting to work. \n\n" - "To enable upscaling, set your presentation to either 'Borderless', \n" + System::UnicodeString shaderHint = + L"Some of the shaders only work when upscaling is enabled. \n\n"; + + System::UnicodeString upscaleHint = + L"Upscaling must be enabled for this setting to work. \n\n"; + + System::UnicodeString enableUpscaleHint = + L"To enable upscaling, set your presentation to either 'Borderless', \n" "'Fullscreen Upscaled' or start the game in 'Windowed' mode and \n" "resize the window."; - MaintasLbl->Hint = upscaleHint; - MaintasChk->Hint = upscaleHint; - AdjmouseLbl->Hint = upscaleHint; - AdjmouseChk->Hint = upscaleHint; - BoxingLbl->Hint = upscaleHint; - BoxingChk->Hint = upscaleHint; + ShaderLbl->Hint = shaderHint + enableUpscaleHint; + ShaderD3DCbx->Hint = shaderHint + enableUpscaleHint; + ShaderCbx->Hint = shaderHint + enableUpscaleHint; + + MaintasLbl->Hint = upscaleHint + enableUpscaleHint; + MaintasChk->Hint = upscaleHint + enableUpscaleHint; + AdjmouseLbl->Hint = upscaleHint + enableUpscaleHint; + AdjmouseChk->Hint = upscaleHint + enableUpscaleHint; + BoxingLbl->Hint = upscaleHint + enableUpscaleHint; + BoxingChk->Hint = upscaleHint + enableUpscaleHint; } ToggleWindowedKeyLbl->Caption = GetKeyText(VK_MENU) + L" +"; diff --git a/config/ConfigFormUnit.dfm b/config/ConfigFormUnit.dfm index b1e29df..6ed9761 100644 --- a/config/ConfigFormUnit.dfm +++ b/config/ConfigFormUnit.dfm @@ -3125,6 +3125,8 @@ object ConfigForm: TConfigForm Font.Name = 'Segoe UI' Font.Style = [] ParentFont = False + ParentShowHint = False + ShowHint = True end object MaxfpsLbl: TLabel Left = 40 @@ -3200,6 +3202,8 @@ object ConfigForm: TConfigForm Font.Name = 'Segoe UI' Font.Style = [] ParentFont = False + ParentShowHint = False + ShowHint = True TabOrder = 6 Visible = False OnChange = ShaderD3DCbxChange @@ -3266,6 +3270,8 @@ object ConfigForm: TConfigForm Font.Name = 'Segoe UI' Font.Style = [] ParentFont = False + ParentShowHint = False + ShowHint = True TabOrder = 3 OnChange = ShaderCbxChange end