reference: FileSelPreview example

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

reference/FileSelPreview/FileSelPreview.upp

@@ -0,0 +1,13 @@
+description "Demonstrates the file preview option of FileSel\377";
+
+uses
+	CtrlLib,
+	plugin\jpg,
+	plugin\gif;
+
+file
+	main.cpp;
+
+mainconfig
+	"" = "GUI";
+

reference/FileSelPreview/init

@@ -0,0 +1,6 @@
+#ifndef _FileSelPreview_icpp_init_stub
+#define _FileSelPreview_icpp_init_stub
+#include "CtrlLib/init"
+#include "plugin\jpg/init"
+#include "plugin\gif/init"
+#endif

reference/FileSelPreview/main.cpp

@@ -0,0 +1,25 @@
+#include <CtrlLib/CtrlLib.h>
+
+using namespace Upp;
+
+class PreviewImage : public ImageCtrl {
+	void SetData(const Value& val) {
+		String path = val;
+		if(IsNull(path.IsEmpty()))
+			SetImage(Null);
+		else
+			SetImage(StreamRaster::LoadFileAny(~path));
+	}
+};
+
+
+GUI_APP_MAIN
+{
+	PreviewImage img;
+	FileSel      fs; 
+	
+	fs.Type("Image file(s)", "*.jpg *.gif *.png *.bmp");
+	fs.Preview(img);
+	
+	fs.ExecuteOpen();
+}