1
0
mirror of https://github.com/FunkyFr3sh/cnc-ddraw.git synced 2025-03-15 06:04:49 +01:00

#102 add Spanish translation made by c-sanchez

This commit is contained in:
FunkyFr3sh 2021-07-06 20:01:25 +02:00
parent c25e28c953
commit 29733e8c8b
3 changed files with 248 additions and 200 deletions

View File

@ -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";

View File

@ -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

View File

@ -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);