initial commit for new config program

config/ConfigFormUnit.cpp

@@ -0,0 +1,33 @@
+//---------------------------------------------------------------------------
+
+#include <vcl.h>
+#pragma hdrstop
+
+#include "ConfigFormUnit.h"
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma resource "*.dfm"
+TConfigForm *ConfigForm;
+//---------------------------------------------------------------------------
+__fastcall TConfigForm::TConfigForm(TComponent* Owner)
+	: TForm(Owner)
+{
+}
+
+void __fastcall TConfigForm::DisplayBtnClick(TObject *Sender)
+{
+	DisplayPnl->Visible = true;
+	AdvDisplayPnl->Visible = false;
+	CompatibilityPnl->Visible = false;
+}
+
+void __fastcall TConfigForm::AdvSettingsBtnClick(TObject *Sender)
+{
+	AdvDisplayPnl->Visible = true;
+	DisplayPnl->Visible = false;
+	CompatibilityPnl->Visible = false;
+}
+
+
+
+

config/ConfigFormUnit.h

@@ -0,0 +1,56 @@
+//---------------------------------------------------------------------------
+
+#ifndef ConfigFormUnitH
+#define ConfigFormUnitH
+//---------------------------------------------------------------------------
+#include <System.Classes.hpp>
+#include <Vcl.Controls.hpp>
+#include <Vcl.StdCtrls.hpp>
+#include <Vcl.Forms.hpp>
+#include <Vcl.ComCtrls.hpp>
+#include <Vcl.ExtCtrls.hpp>
+#include <Vcl.WinXCtrls.hpp>
+#include <Vcl.Buttons.hpp>
+//---------------------------------------------------------------------------
+class TConfigForm : public TForm
+{
+__published:	// Von der IDE verwaltete Komponenten
+	TPanel *MenuPnl;
+	TPanel *DisplayPnl;
+	TSpeedButton *DisplayBtn;
+	TSpeedButton *AdvSettingsBtn;
+	TSpeedButton *CompatibilityBtn;
+	TPanel *AdvDisplayPnl;
+	TPanel *CompatibilityPnl;
+	TComboBox *PresentationCbx;
+	TLabel *PresentationLbl;
+	TLabel *AspectRatioLbl;
+	TToggleSwitch *AspectRatioChk;
+	TLabel *VsyncLbl;
+	TToggleSwitch *VsyncChk;
+	TLabel *AdjmouseLbl;
+	TToggleSwitch *AdjmouseChk;
+	TLabel *DevmodeLbl;
+	TToggleSwitch *DevmodeChk;
+	TComboBox *RendererCbx;
+	TLabel *RendererLbl;
+	TLabel *BorderLbl;
+	TToggleSwitch *BorderChk;
+	TLabel *SavesettingsLbl;
+	TToggleSwitch *SavesettingsChk;
+	TComboBox *ShaderCbx;
+	TLabel *ShaderLbl;
+	TLabel *MaxfpsLbl;
+	TToggleSwitch *MaxfpsChk;
+	TLabel *BoxingLbl;
+	TToggleSwitch *BoxingChk;
+	void __fastcall DisplayBtnClick(TObject *Sender);
+	void __fastcall AdvSettingsBtnClick(TObject *Sender);
+private:	// Benutzer-Deklarationen
+public:		// Benutzer-Deklarationen
+	__fastcall TConfigForm(TComponent* Owner);
+};
+//---------------------------------------------------------------------------
+extern PACKAGE TConfigForm *ConfigForm;
+//---------------------------------------------------------------------------
+#endif

config/cnc-ddraw config.cpp

@@ -0,0 +1,38 @@
+//---------------------------------------------------------------------------
+
+#include <vcl.h>
+#pragma hdrstop
+#include <tchar.h>
+//---------------------------------------------------------------------------
+#include <Vcl.Styles.hpp>
+#include <Vcl.Themes.hpp>
+USEFORM("ConfigFormUnit.cpp", ConfigForm);
+//---------------------------------------------------------------------------
+int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
+{
+	try
+	{
+		Application->Initialize();
+		Application->MainFormOnTaskBar = true;
+		TStyleManager::TrySetStyle("Windows10 Blue");
+		Application->CreateForm(__classid(TConfigForm), &ConfigForm);
+		Application->Run();
+	}
+	catch (Exception &exception)
+	{
+		Application->ShowException(&exception);
+	}
+	catch (...)
+	{
+		try
+		{
+			throw Exception("");
+		}
+		catch (Exception &exception)
+		{
+			Application->ShowException(&exception);
+		}
+	}
+	return 0;
+}
+//---------------------------------------------------------------------------

config/cnc-ddraw configPCH1.h

@@ -0,0 +1,3 @@
+#include <vcl.h>
+#include <tchar.h>
+