From 29733e8c8b6b7ea1481304c1365ddc6bd1eaae2e Mon Sep 17 00:00:00 2001 From: FunkyFr3sh Date: Tue, 6 Jul 2021 20:01:25 +0200 Subject: [PATCH] #102 add Spanish translation made by c-sanchez --- config/ConfigFormUnit.cpp | 50 ++++- config/ConfigFormUnit.dfm | 396 +++++++++++++++++++------------------- config/ConfigFormUnit.h | 2 +- 3 files changed, 248 insertions(+), 200 deletions(-) diff --git a/config/ConfigFormUnit.cpp b/config/ConfigFormUnit.cpp index 3c3a49f..751db8c 100644 --- a/config/ConfigFormUnit.cpp +++ b/config/ConfigFormUnit.cpp @@ -25,7 +25,7 @@ __fastcall TConfigForm::TConfigForm(TComponent* Owner) : TForm(Owner) { if (SysLocale.PriLangID == LANG_CHINESE) { - /* Chinese Simplified made by universal963 @ github */ + /* -Chinese Simplified- made by universal963 @ github */ ConfigForm->Caption = L"cnc-ddraw 配置"; DisplayBtn->Caption = L"显示设置"; @@ -72,6 +72,54 @@ __fastcall TConfigForm::TConfigForm(TComponent* Owner) MaxgameticksCbx->AddItem(L"25tick每秒", NULL); MaxgameticksCbx->AddItem(L"15tick每秒", NULL); } + else if (SysLocale.PriLangID == LANG_SPANISH) { + /* -Spanish- made by c-sanchez @ github */ + + ConfigForm->Caption = L"Ajustes de cnc-ddraw"; + DisplayBtn->Caption = L"Ajustes de pantalla"; + AdvancedBtn->Caption = L"Ajustes avanzados"; + CompatibilityBtn->Caption = L"Ajustes de compatibilidad"; + PresentationLbl->Caption = L"Presentación"; + MaintasLbl->Caption = L"Mantener la relación de aspecto"; + VsyncLbl->Caption = L"Activar VSync"; + AdjmouseLbl->Caption = L"Ajustar sensibilidad de ratón"; + DevmodeLbl->Caption = L"Bloquear cursor a la ventana / pantalla"; + RendererLbl->Caption = L"Renderizador"; + BorderLbl->Caption = L"Mostrar bordes en modo ventana"; + SavesettingsLbl->Caption = L"Recordar posición y tamaño de ventana"; + ShaderLbl->Caption = L"Sombreador OpenGL"; + MaxfpsLbl->Caption = L"Limitar velocidad de fotogramas"; + BoxingLbl->Caption = L"Activar encajado de ventanas / escalado de enteros"; + MaxgameticksLbl->Caption = L"Limitar velocidad de juego"; + NoactivateappLbl->Caption = L"Corregir Alt+Tab roto"; + HookLbl->Caption = L"Corregir modo ventana o ampliación de escala"; + MinfpsLbl->Caption = L"Forzar un alto FPS / Corregir retrasos en Freesync/G-Sync"; + FixpitchLbl->Caption = L"Corregir problemas de visualización de dibujos en diagonal"; + NonexclusiveLbl->Caption = L"Corregir vídeos / elementos de interfaz invisibles"; + + RendererCbx->Items->Clear(); + RendererCbx->AddItem(L"Automático", NULL); + RendererCbx->AddItem(L"Direct3D9", NULL); + RendererCbx->AddItem(L"OpenGL", NULL); + RendererCbx->AddItem(L"GDI", NULL); + + PresentationCbx->Items->Clear(); + PresentationCbx->AddItem(L"Pantalla completa", NULL); + PresentationCbx->AddItem(L"Pantalla completa ampliada", NULL); + PresentationCbx->AddItem(L"Sin bordes", NULL); + PresentationCbx->AddItem(L"Ventana", NULL); + + MaxgameticksCbx->Items->Clear(); + MaxgameticksCbx->AddItem(L"Sin límite", NULL); + MaxgameticksCbx->AddItem(L"Sincronizar con tasa de refresco de monitor", NULL); + MaxgameticksCbx->AddItem(L"Emular monitor con tasa de refresco de 60hz", NULL); + MaxgameticksCbx->AddItem(L"1000 tics por segundo", NULL); + MaxgameticksCbx->AddItem(L"500 tics por segundo", NULL); + MaxgameticksCbx->AddItem(L"60 tics por segundo", NULL); + MaxgameticksCbx->AddItem(L"30 tics por segundo", NULL); + MaxgameticksCbx->AddItem(L"25 tics por segundo", NULL); + MaxgameticksCbx->AddItem(L"15 tics por segundo", NULL); + } else { /* ConfigForm->Caption = L"cnc-ddraw config"; diff --git a/config/ConfigFormUnit.dfm b/config/ConfigFormUnit.dfm index c0261ae..735d04b 100644 --- a/config/ConfigFormUnit.dfm +++ b/config/ConfigFormUnit.dfm @@ -2682,6 +2682,199 @@ object ConfigForm: TConfigForm OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 + object AdvancedPnl: TPanel + Left = 191 + Top = 8 + Width = 499 + Height = 465 + BevelOuter = bvNone + Color = clWhite + ParentBackground = False + ShowCaption = False + TabOrder = 2 + Visible = False + StyleElements = [seFont, seBorder] + object RendererLbl: TLabel + Left = 40 + Top = 28 + Width = 64 + Height = 21 + Caption = 'Renderer' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + StyleElements = [seClient, seBorder] + end + object SavesettingsLbl: TLabel + Left = 40 + Top = 386 + Width = 256 + Height = 21 + Margins.Top = 18 + Caption = 'Remember window position and size' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + StyleElements = [seClient, seBorder] + end + object ShaderLbl: TLabel + Left = 40 + Top = 105 + Width = 108 + Height = 21 + Margins.Top = 18 + Caption = 'OpenGL shader' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + StyleElements = [seClient, seBorder] + end + object MaxfpsLbl: TLabel + Left = 40 + Top = 182 + Width = 111 + Height = 21 + Margins.Top = 18 + Caption = 'Limit frame rate' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + StyleElements = [seClient, seBorder] + end + object BorderLbl: TLabel + Left = 40 + Top = 318 + Width = 293 + Height = 21 + Margins.Top = 18 + Caption = 'Show window borders in windowed mode' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + StyleElements = [seClient, seBorder] + end + object BoxingLbl: TLabel + Left = 40 + Top = 250 + Width = 267 + Height = 21 + Margins.Top = 18 + Caption = 'Enable windowboxing / integer scaling' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + StyleElements = [seClient, seBorder] + end + object RendererPbox: TPaintBox + Left = 40 + Top = 54 + Width = 207 + Height = 31 + OnPaint = PboxPaint + end + object ShaderPbox: TPaintBox + Left = 40 + Top = 131 + Width = 427 + Height = 31 + OnPaint = PboxPaint + end + object RendererCbx: TComboBox + Left = 41 + Top = 55 + Width = 205 + Height = 29 + BevelEdges = [] + BevelInner = bvNone + BevelOuter = bvSpace + Style = csDropDownList + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + TabOrder = 0 + OnChange = RendererCbxChange + Items.Strings = ( + 'Automatic' + 'Direct3D9' + 'OpenGL' + 'GDI') + end + object BorderChk: TToggleSwitch + Left = 40 + Top = 345 + Width = 50 + Height = 20 + ShowStateCaption = False + TabOrder = 1 + OnClick = BorderChkClick + end + object SavesettingsChk: TToggleSwitch + Left = 40 + Top = 413 + Width = 50 + Height = 20 + ShowStateCaption = False + TabOrder = 2 + OnClick = SavesettingsChkClick + end + object ShaderCbx: TComboBox + Left = 41 + Top = 132 + Width = 425 + Height = 29 + BevelEdges = [] + BevelInner = bvNone + BevelOuter = bvSpace + Style = csDropDownList + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Segoe UI' + Font.Style = [] + ParentFont = False + TabOrder = 3 + OnChange = ShaderCbxChange + end + object MaxfpsChk: TToggleSwitch + Left = 40 + Top = 209 + Width = 50 + Height = 20 + ShowStateCaption = False + TabOrder = 4 + OnClick = MaxfpsChkClick + end + object BoxingChk: TToggleSwitch + Left = 40 + Top = 277 + Width = 50 + Height = 20 + ShowStateCaption = False + TabOrder = 5 + OnClick = BoxingChkClick + end + end object DisplayPnl: TPanel Left = 191 Top = 8 @@ -2770,14 +2963,14 @@ object ConfigForm: TConfigForm object PresentationPbox: TPaintBox Left = 40 Top = 54 - Width = 187 + Width = 207 Height = 31 OnPaint = PboxPaint end object PresentationCbx: TComboBox Left = 41 Top = 55 - Width = 185 + Width = 205 Height = 29 BevelEdges = [] BevelInner = bvNone @@ -2935,17 +3128,17 @@ object ConfigForm: TConfigForm ParentFont = False StyleElements = [seClient, seBorder] end - object MaxfpsPbox: TPaintBox + object MaxgameticksPbox: TPaintBox Left = 40 Top = 54 - Width = 291 + Width = 342 Height = 31 OnPaint = PboxPaint end object MaxgameticksCbx: TComboBox Left = 41 Top = 55 - Width = 289 + Width = 340 Height = 29 BevelEdges = [] BevelInner = bvNone @@ -3017,199 +3210,6 @@ object ConfigForm: TConfigForm OnClick = NonexclusiveChkClick end end - object AdvancedPnl: TPanel - Left = 191 - Top = 8 - Width = 499 - Height = 465 - BevelOuter = bvNone - Color = clWhite - ParentBackground = False - ShowCaption = False - TabOrder = 2 - Visible = False - StyleElements = [seFont, seBorder] - object RendererLbl: TLabel - Left = 40 - Top = 28 - Width = 64 - Height = 21 - Caption = 'Renderer' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - StyleElements = [seClient, seBorder] - end - object SavesettingsLbl: TLabel - Left = 40 - Top = 386 - Width = 256 - Height = 21 - Margins.Top = 18 - Caption = 'Remember window position and size' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - StyleElements = [seClient, seBorder] - end - object ShaderLbl: TLabel - Left = 40 - Top = 105 - Width = 108 - Height = 21 - Margins.Top = 18 - Caption = 'OpenGL shader' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - StyleElements = [seClient, seBorder] - end - object MaxfpsLbl: TLabel - Left = 40 - Top = 182 - Width = 111 - Height = 21 - Margins.Top = 18 - Caption = 'Limit frame rate' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - StyleElements = [seClient, seBorder] - end - object BorderLbl: TLabel - Left = 40 - Top = 318 - Width = 293 - Height = 21 - Margins.Top = 18 - Caption = 'Show window borders in windowed mode' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - StyleElements = [seClient, seBorder] - end - object BoxingLbl: TLabel - Left = 40 - Top = 250 - Width = 267 - Height = 21 - Margins.Top = 18 - Caption = 'Enable windowboxing / integer scaling' - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - StyleElements = [seClient, seBorder] - end - object RendererPbox: TPaintBox - Left = 40 - Top = 54 - Width = 187 - Height = 31 - OnPaint = PboxPaint - end - object ShaderPbox: TPaintBox - Left = 40 - Top = 131 - Width = 427 - Height = 31 - OnPaint = PboxPaint - end - object RendererCbx: TComboBox - Left = 41 - Top = 55 - Width = 185 - Height = 29 - BevelEdges = [] - BevelInner = bvNone - BevelOuter = bvSpace - Style = csDropDownList - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - TabOrder = 0 - OnChange = RendererCbxChange - Items.Strings = ( - 'Automatic' - 'Direct3D9' - 'OpenGL' - 'GDI') - end - object BorderChk: TToggleSwitch - Left = 40 - Top = 345 - Width = 50 - Height = 20 - ShowStateCaption = False - TabOrder = 1 - OnClick = BorderChkClick - end - object SavesettingsChk: TToggleSwitch - Left = 40 - Top = 413 - Width = 50 - Height = 20 - ShowStateCaption = False - TabOrder = 2 - OnClick = SavesettingsChkClick - end - object ShaderCbx: TComboBox - Left = 41 - Top = 132 - Width = 425 - Height = 29 - BevelEdges = [] - BevelInner = bvNone - BevelOuter = bvSpace - Style = csDropDownList - Font.Charset = DEFAULT_CHARSET - Font.Color = clWindowText - Font.Height = -16 - Font.Name = 'Segoe UI' - Font.Style = [] - ParentFont = False - TabOrder = 3 - OnChange = ShaderCbxChange - end - object MaxfpsChk: TToggleSwitch - Left = 40 - Top = 209 - Width = 50 - Height = 20 - ShowStateCaption = False - TabOrder = 4 - OnClick = MaxfpsChkClick - end - object BoxingChk: TToggleSwitch - Left = 40 - Top = 277 - Width = 50 - Height = 20 - ShowStateCaption = False - TabOrder = 5 - OnClick = BoxingChkClick - end - end object MenuPnl: TPanel Left = 0 Top = 8 diff --git a/config/ConfigFormUnit.h b/config/ConfigFormUnit.h index 80311ed..c49a754 100644 --- a/config/ConfigFormUnit.h +++ b/config/ConfigFormUnit.h @@ -59,7 +59,7 @@ __published: // Von der IDE verwaltete Komponenten TPaintBox *PresentationPbox; TPaintBox *RendererPbox; TPaintBox *ShaderPbox; - TPaintBox *MaxfpsPbox; + TPaintBox *MaxgameticksPbox; void __fastcall DisplayBtnClick(TObject *Sender); void __fastcall AdvancedBtnClick(TObject *Sender); void __fastcall CompatibilityBtnClick(TObject *Sender);