diff --git a/reference/SelectFile/SelectFile.upp b/reference/SelectFile/SelectFile.upp
new file mode 100644
index 000000000..ebd307700
--- /dev/null
+++ b/reference/SelectFile/SelectFile.upp
@@ -0,0 +1,11 @@
+description "Demostrates the usage of FileSel Select* family of functions and classes\377";
+
+uses
+	CtrlLib;
+
+file
+	main.cpp;
+
+mainconfig
+	"" = "GUI";
+
diff --git a/reference/SelectFile/init b/reference/SelectFile/init
new file mode 100644
index 000000000..0928b063c
--- /dev/null
+++ b/reference/SelectFile/init
@@ -0,0 +1,4 @@
+#ifndef _SelectFile_icpp_init_stub
+#define _SelectFile_icpp_init_stub
+#include "CtrlLib/init"
+#endif
diff --git a/reference/SelectFile/main.cpp b/reference/SelectFile/main.cpp
new file mode 100644
index 000000000..07969bb44
--- /dev/null
+++ b/reference/SelectFile/main.cpp
@@ -0,0 +1,22 @@
+#include <CtrlLib/CtrlLib.h>
+
+using namespace Upp;
+
+GUI_APP_MAIN
+{
+	PromptOK(DeQtf(SelectFileOpen("Text files\t*.txt\nAll files\t*.*")));
+
+	PromptOK(DeQtf(SelectFileSaveAs("Text files\t*.txt\nAll files\t*.*")));
+	
+	SelectFileIn in("Text files\t*.txt");
+	if(in) {
+		int n = 0;
+		while(!in.IsEof()) {
+			in.GetLine();
+			n++;
+		}
+		PromptOK("There is " + AsString(n) + " lines in the file.");
+	}
+	
+	PromptOK("[{1} \1" + SelectLoadFile("Text files\t*.txt"));
+}