mirror of
https://github.com/FunkyFr3sh/cnc-ddraw.git
synced 2025-03-25 01:57:47 +01:00
remember custom .ini settings
This commit is contained in:
FunkyFr3sh
parent
9d4cea12d1
commit
3686a54e60
@ -12,6 +12,13 @@
|
|||||||
#pragma resource "*.dfm"
|
#pragma resource "*.dfm"
|
||||||
TConfigForm *ConfigForm;
|
TConfigForm *ConfigForm;
|
||||||
bool Initialized;
|
bool Initialized;
|
||||||
|
|
||||||
|
/* Save previous settings so we don't override custom settings */
|
||||||
|
int Maxfps;
|
||||||
|
int Savesettings;
|
||||||
|
int Hook;
|
||||||
|
int Minfps;
|
||||||
|
|
||||||
//---------------------------------------------------------------------------
|
//---------------------------------------------------------------------------
|
||||||
__fastcall TConfigForm::TConfigForm(TComponent* Owner)
|
__fastcall TConfigForm::TConfigForm(TComponent* Owner)
|
||||||
: TForm(Owner)
|
: TForm(Owner)
|
||||||
@ -97,14 +104,14 @@ void __fastcall TConfigForm::FormCreate(TObject *Sender)
|
|||||||
{
|
{
|
||||||
}
|
}
|
||||||
|
|
||||||
int maxfps = ini->ReadInteger("ddraw", "maxfps", -1);
|
Maxfps = ini->ReadInteger("ddraw", "maxfps", -1);
|
||||||
MaxfpsChk->State = maxfps != 0 ? tssOn : tssOff;
|
MaxfpsChk->State = Maxfps != 0 ? tssOn : tssOff;
|
||||||
|
|
||||||
BoxingChk->State = GetBool(ini, "boxing", false) ? tssOn : tssOff;
|
BoxingChk->State = GetBool(ini, "boxing", false) ? tssOn : tssOff;
|
||||||
BorderChk->State = GetBool(ini, "border", false) ? tssOn : tssOff;
|
BorderChk->State = GetBool(ini, "border", false) ? tssOn : tssOff;
|
||||||
|
|
||||||
int savesettings = ini->ReadInteger("ddraw", "savesettings", 1);
|
Savesettings = ini->ReadInteger("ddraw", "savesettings", 1);
|
||||||
SavesettingsChk->State = savesettings != 0 ? tssOn : tssOff;
|
SavesettingsChk->State = Savesettings != 0 ? tssOn : tssOff;
|
||||||
|
|
||||||
/* Compatibility Settings */
|
/* Compatibility Settings */
|
||||||
|
|
||||||
@ -117,6 +124,9 @@ void __fastcall TConfigForm::FormCreate(TObject *Sender)
|
|||||||
case -2:
|
case -2:
|
||||||
MaxgameticksCbx->ItemIndex = 1;
|
MaxgameticksCbx->ItemIndex = 1;
|
||||||
break;
|
break;
|
||||||
|
case 0:
|
||||||
|
MaxgameticksCbx->ItemIndex = 2;
|
||||||
|
break;
|
||||||
case 1000:
|
case 1000:
|
||||||
MaxgameticksCbx->ItemIndex = 3;
|
MaxgameticksCbx->ItemIndex = 3;
|
||||||
break;
|
break;
|
||||||
@ -135,16 +145,21 @@ void __fastcall TConfigForm::FormCreate(TObject *Sender)
|
|||||||
case 15:
|
case 15:
|
||||||
MaxgameticksCbx->ItemIndex = 8;
|
MaxgameticksCbx->ItemIndex = 8;
|
||||||
break;
|
break;
|
||||||
case 0:
|
|
||||||
default:
|
default:
|
||||||
MaxgameticksCbx->ItemIndex = 2;
|
MaxgameticksCbx->AddItem(IntToStr(maxgameticks), NULL);
|
||||||
|
MaxgameticksCbx->ItemIndex = 9;
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
NoactivateappChk->State = GetBool(ini, "noactivateapp", false) ? tssOn : tssOff;
|
NoactivateappChk->State = GetBool(ini, "noactivateapp", false) ? tssOn : tssOff;
|
||||||
HookChk->State = ini->ReadInteger("ddraw", "hook", 4) == 2 ? tssOn : tssOff;
|
|
||||||
MinfpsChk->State = ini->ReadInteger("ddraw", "minfps", 0) != 0 ? tssOn : tssOff;
|
Hook = ini->ReadInteger("ddraw", "hook", 4);
|
||||||
|
HookChk->State = Hook == 2 ? tssOn : tssOff;
|
||||||
|
|
||||||
|
Minfps = ini->ReadInteger("ddraw", "minfps", 0);
|
||||||
|
MinfpsChk->State = Minfps != 0 ? tssOn : tssOff;
|
||||||
|
|
||||||
FixpitchChk->State = GetBool(ini, "fixpitch", false) ? tssOn : tssOff;
|
FixpitchChk->State = GetBool(ini, "fixpitch", false) ? tssOn : tssOff;
|
||||||
NonexclusiveChk->State = GetBool(ini, "nonexclusive", false) ? tssOn : tssOff;
|
NonexclusiveChk->State = GetBool(ini, "nonexclusive", false) ? tssOn : tssOff;
|
||||||
|
|
||||||
@ -204,10 +219,12 @@ void TConfigForm::SaveSettings()
|
|||||||
ini->WriteString("ddraw", "renderer", LowerCase(RendererCbx->Text));
|
ini->WriteString("ddraw", "renderer", LowerCase(RendererCbx->Text));
|
||||||
ini->WriteString("ddraw", "shader", ShaderCbx->Text);
|
ini->WriteString("ddraw", "shader", ShaderCbx->Text);
|
||||||
|
|
||||||
|
int maxfps = Maxfps == 0 ? -1 : Maxfps;
|
||||||
|
|
||||||
ini->WriteInteger(
|
ini->WriteInteger(
|
||||||
"ddraw",
|
"ddraw",
|
||||||
"maxfps",
|
"maxfps",
|
||||||
MaxfpsChk->State == tssOn ? -1 : 0);
|
MaxfpsChk->State == tssOn ? maxfps : 0);
|
||||||
|
|
||||||
ini->WriteString(
|
ini->WriteString(
|
||||||
"ddraw",
|
"ddraw",
|
||||||
@ -219,10 +236,19 @@ void TConfigForm::SaveSettings()
|
|||||||
"border",
|
"border",
|
||||||
BorderChk->State == tssOn ? "true" : "false");
|
BorderChk->State == tssOn ? "true" : "false");
|
||||||
|
|
||||||
|
int savesettings = Savesettings == 0 ? 1 : Savesettings;
|
||||||
|
|
||||||
ini->WriteInteger(
|
ini->WriteInteger(
|
||||||
"ddraw",
|
"ddraw",
|
||||||
"savesettings",
|
"savesettings",
|
||||||
SavesettingsChk->State == tssOn ? 1 : 0);
|
SavesettingsChk->State == tssOn ? savesettings : 0);
|
||||||
|
|
||||||
|
if (Savesettings != 0 && SavesettingsChk->State == tssOff) {
|
||||||
|
ini->WriteInteger("ddraw", "width", 0);
|
||||||
|
ini->WriteInteger("ddraw", "height", 0);
|
||||||
|
ini->WriteInteger("ddraw", "posX", -32000);
|
||||||
|
ini->WriteInteger("ddraw", "posY", -32000);
|
||||||
|
}
|
||||||
|
|
||||||
/* Compatibility Settings */
|
/* Compatibility Settings */
|
||||||
|
|
||||||
@ -254,6 +280,9 @@ void TConfigForm::SaveSettings()
|
|||||||
case 8:
|
case 8:
|
||||||
ini->WriteInteger("ddraw", "maxgameticks", 15);
|
ini->WriteInteger("ddraw", "maxgameticks", 15);
|
||||||
break;
|
break;
|
||||||
|
case 9:
|
||||||
|
ini->WriteString("ddraw", "maxgameticks", MaxgameticksCbx->Text);
|
||||||
|
break;
|
||||||
default:
|
default:
|
||||||
break;
|
break;
|
||||||
}
|
}
|
||||||
@ -263,18 +292,22 @@ void TConfigForm::SaveSettings()
|
|||||||
"noactivateapp",
|
"noactivateapp",
|
||||||
NoactivateappChk->State == tssOn ? "true" : "false");
|
NoactivateappChk->State == tssOn ? "true" : "false");
|
||||||
|
|
||||||
|
int hook = Hook != 2 ? Hook : 4;
|
||||||
|
|
||||||
ini->WriteInteger(
|
ini->WriteInteger(
|
||||||
"ddraw",
|
"ddraw",
|
||||||
"hook",
|
"hook",
|
||||||
HookChk->State == tssOn ? 2 : 4);
|
HookChk->State == tssOn ? 2 : hook);
|
||||||
|
|
||||||
if (HookChk->State == tssOn)
|
if (HookChk->State == tssOn)
|
||||||
ini->WriteString("ddraw", "renderer", "gdi");
|
ini->WriteString("ddraw", "renderer", "gdi");
|
||||||
|
|
||||||
|
int minfps = Minfps == 0 ? -1 : Minfps;
|
||||||
|
|
||||||
ini->WriteInteger(
|
ini->WriteInteger(
|
||||||
"ddraw",
|
"ddraw",
|
||||||
"minfps",
|
"minfps",
|
||||||
MinfpsChk->State == tssOn ? -1 : 0);
|
MinfpsChk->State == tssOn ? minfps : 0);
|
||||||
|
|
||||||
ini->WriteString(
|
ini->WriteString(
|
||||||
"ddraw",
|
"ddraw",
|
||||||
|
|||||||
@ -2682,184 +2682,6 @@ object ConfigForm: TConfigForm
|
|||||||
OnCreate = FormCreate
|
OnCreate = FormCreate
|
||||||
PixelsPerInch = 96
|
PixelsPerInch = 96
|
||||||
TextHeight = 13
|
TextHeight = 13
|
||||||
object AdvDisplayPnl: TPanel
|
|
||||||
Left = 191
|
|
||||||
Top = 8
|
|
||||||
Width = 499
|
|
||||||
Height = 465
|
|
||||||
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 = 212
|
|
||||||
Height = 21
|
|
||||||
Margins.Top = 18
|
|
||||||
Caption = 'Save 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 = 110
|
|
||||||
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 = 220
|
|
||||||
Height = 21
|
|
||||||
Margins.Top = 18
|
|
||||||
Caption = '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 RendererCbx: TComboBox
|
|
||||||
Left = 48
|
|
||||||
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 = 48
|
|
||||||
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
|
object DisplayPnl: TPanel
|
||||||
Left = 191
|
Left = 191
|
||||||
Top = 8
|
Top = 8
|
||||||
@ -3178,6 +3000,184 @@ object ConfigForm: TConfigForm
|
|||||||
OnClick = NonexclusiveChkClick
|
OnClick = NonexclusiveChkClick
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
|
object AdvDisplayPnl: TPanel
|
||||||
|
Left = 191
|
||||||
|
Top = 8
|
||||||
|
Width = 499
|
||||||
|
Height = 465
|
||||||
|
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 = 212
|
||||||
|
Height = 21
|
||||||
|
Margins.Top = 18
|
||||||
|
Caption = 'Save 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 = 110
|
||||||
|
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 = 220
|
||||||
|
Height = 21
|
||||||
|
Margins.Top = 18
|
||||||
|
Caption = '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 RendererCbx: TComboBox
|
||||||
|
Left = 48
|
||||||
|
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 = 48
|
||||||
|
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
|
object MenuPnl: TPanel
|
||||||
Left = 0
|
Left = 0
|
||||||
Top = 8
|
Top = 8
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user