#include <CtrlLib/CtrlLib.h>

using namespace Upp;

struct MainWindow : public TopWindow{
	MenuBar menu;

	MainWindow() {
		Title("Dynamic Theming Sample").Sizeable();
		AddFrame(menu);
		menu.Set([=](Bar& bar) {
			bar.Sub("Theme",[=](Bar& bar) {
				bar.Add("System",[=] { Ctrl::SetSkin(ChHostSkin); });
#ifdef WIN32
				bar.Add("Light",[=] { Ctrl::SetSkin(ChHostSkinLight); });
				bar.Add("Dark",[=] { Ctrl::SetSkin(ChHostSkinDark); });
#endif
				bar.Add("Custom",[=] { Ctrl::SetSkin(ChStdSkin); });
			});
		});
	}
	
};

GUI_APP_MAIN{
	Ctrl::SkinChangeSensitive(true);
	Ctrl::SetDarkThemeEnabled(true);

	MainWindow().Run();
}

#include <CtrlLib/CtrlLib.h>

using namespace Upp;

#ifndef WIN32
#error Sorry, but this program is only available for Windows at this time.
#endif

struct App : TrayIcon {
    typedef App CLASSNAME;
	
	bool IsSystemThemeDark(){
		return !GetWinRegInt("AppsUseLightTheme", "Software\\Microsoft\\Windows\\CurrentVersion\\Themes\\Personalize", HKEY_CURRENT_USER);
	}
	
	void SetDarkTheme(){
		SetWinRegInt(0, "SystemUsesLightTheme", "Software\\Microsoft\\Windows\\CurrentVersion\\Themes\\Personalize", HKEY_CURRENT_USER);
		SetWinRegInt(0, "AppsUseLightTheme", "Software\\Microsoft\\Windows\\CurrentVersion\\Themes\\Personalize", HKEY_CURRENT_USER);
		SetWinRegInt(0, "AccentColorMenu", "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Accent", HKEY_CURRENT_USER);
		Sleep(500);
		SetWinRegInt(0xff1d3f58, "AccentColorMenu", "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Accent", HKEY_CURRENT_USER);
	}
	
	void SetLightTheme(){
		SetWinRegInt(1, "SystemUsesLightTheme", "Software\\Microsoft\\Windows\\CurrentVersion\\Themes\\Personalize", HKEY_CURRENT_USER);
		SetWinRegInt(1, "AppsUseLightTheme", "Software\\Microsoft\\Windows\\CurrentVersion\\Themes\\Personalize", HKEY_CURRENT_USER);
		SetWinRegInt(0, "AccentColorMenu", "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Accent", HKEY_CURRENT_USER);
		Sleep(500);
		SetWinRegInt(0xff1d3f58, "AccentColorMenu", "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\Accent", HKEY_CURRENT_USER);
	}
	
	virtual void LeftUp() {
		if(IsSystemThemeDark()) SetLightTheme();
		else SetDarkTheme();
	}

	virtual void Menu(Bar& bar) {
		bool dark = IsSystemThemeDark();
		bar.Add("Light", [=](){ SetLightTheme(); }).Check(!dark);
		bar.Add("Dark", [=](){ SetDarkTheme(); }).Check(dark);
		bar.Separator();
		bar.Add("Exit", [=](){ Break(); });
	}

	App() {
		Icon(Image::Hand());
	}
};

GUI_APP_MAIN
{
	Ctrl::SetDarkThemeEnabled(true);
#if (UPP_VERSION>=0x20241100)
	Ctrl::SkinChangeSensitive(true);
#endif
	App().Run();
}

	Ctrl::SkinChangeSensitive(true);
	Ctrl::SetDarkThemeEnabled(true);