.upptst

git-svn-id: svn://ultimatepp.org/upp/trunk@12311 f0d560ea-af0d-0410-9eb7-867de7ffcac7

upptst/DnDText/DnDText.upp

@@ -0,0 +1,9 @@
+uses
+	CtrlLib;
+
+file
+	main.cpp;
+
+mainconfig
+	"" = "GUI";
+

upptst/DnDText/main.cpp

@@ -0,0 +1,26 @@
+#include <CtrlLib/CtrlLib.h>
+
+using namespace Upp;
+
+struct MyApp : TopWindow {
+	String text;
+
+	void LeftDrag(Point, dword) {
+		VectorMap<String, ClipData> data;
+		Append(data, String("Hello world!"));
+		text = decode(DoDragAndDrop(data, CtrlImg::exclamation()), DND_MOVE, "MOVE",
+		                                                           DND_COPY, "COPY",
+		                                                           "NONE");
+		Refresh();
+	}
+
+	void Paint(Draw& w) {
+		w.DrawRect(GetSize(), White());
+		w.DrawText(10, 10, text, Arial(50));
+	}
+};
+
+GUI_APP_MAIN
+{
+	MyApp().Run();
+}