.reference

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

reference/DragAndDropImg/DragAndDropImg.upp

@@ -0,0 +1,11 @@
+description "Example of basic DnD API\377";
+
+uses
+	CtrlLib;
+
+file
+	main.cpp;
+
+mainconfig
+	"" = "GUI SSE2";
+

reference/DragAndDropImg/init

@@ -0,0 +1,4 @@
+#ifndef _DragAndDropImg_icpp_init_stub
+#define _DragAndDropImg_icpp_init_stub
+#include "CtrlLib/init"
+#endif

reference/DragAndDropImg/main.cpp

@@ -0,0 +1,46 @@
+#include <CtrlLib/CtrlLib.h>
+
+using namespace Upp;
+
+struct MyApp : TopWindow {
+	virtual void CancelMode();
+	virtual void Paint(Draw& w);
+	virtual void DragAndDrop(Point p, PasteClip& d);
+	virtual void DragLeave();
+
+	Image img;
+	bool  dnd;
+	
+	MyApp() { dnd = false; }
+};
+
+void MyApp::Paint(Draw& w)
+{
+	Size sz = GetSize();
+	w.DrawRect(sz, dnd ? SColorInfo() : SColorFace());
+	w.DrawImage(0, 0, img);
+}
+
+void MyApp::DragAndDrop(Point p, PasteClip& d)
+{
+	if(AcceptImage(d))
+		img = GetImage(d);
+	dnd = d.IsAccepted();
+	Refresh();
+}
+
+void MyApp::DragLeave()
+{
+	CancelMode();
+}
+
+void MyApp::CancelMode()
+{
+	dnd = false;
+	Refresh();
+}
+
+GUI_APP_MAIN
+{
+	MyApp().Run();
+}