add 1024x576 to config

This commit is contained in:
FunkyFr3sh 2024-02-17 03:49:32 +01:00
parent b9eead1947
commit 608cb6fa68
2 changed files with 6 additions and 5 deletions

View file

@ -749,7 +749,7 @@ void __fastcall TConfigForm::FormCreate(TObject *Sender)
int reso = hd_ini->ReadInteger("Game", "Resolution", 4);
if (!cwidth || !cheight) {
ResolutionCbx->ItemIndex = reso <= 10 ? reso : 4;
ResolutionCbx->ItemIndex = reso <= 11 ? reso : 4;
}
else {
ResolutionCbx->AddItem(IntToStr(cwidth) + "x" + IntToStr(cheight), NULL);
@ -956,14 +956,14 @@ void TConfigForm::SaveSettings()
break;
}
if (ResolutionCbx->ItemIndex <= 10) {
if (ResolutionCbx->ItemIndex <= 11) {
hd_ini->WriteInteger("Game", "Resolution", ResolutionCbx->ItemIndex);
hd_ini->WriteInteger("Game", "Width", 0);
hd_ini->WriteInteger("Game", "Height", 0);
if (ResolutionCbx->Items->Count == 12) {
ResolutionCbx->Items->Delete(11);
if (ResolutionCbx->Items->Count == 13) {
ResolutionCbx->Items->Delete(12);
}
}