diff --git a/upptst/Switch/Switch.upp b/upptst/Switch/Switch.upp
new file mode 100644
index 000000000..5872304d3
--- /dev/null
+++ b/upptst/Switch/Switch.upp
@@ -0,0 +1,9 @@
+uses
+	CtrlLib;
+
+file
+	main.cpp;
+
+mainconfig
+	"" = "GUI";
+
diff --git a/upptst/Switch/main.cpp b/upptst/Switch/main.cpp
new file mode 100644
index 000000000..6073350b5
--- /dev/null
+++ b/upptst/Switch/main.cpp
@@ -0,0 +1,15 @@
+#include <CtrlLib/CtrlLib.h>
+
+using namespace Upp;
+
+GUI_APP_MAIN
+{
+	TopWindow win;
+	Switch sw;
+	sw.Add("one");
+	sw.Add("two");
+	sw.Add("three");
+	sw.DisableCase(1);
+	win.Add(sw.SizePos());
+	win.Run();
+}