introducing test app for the FileSystemBox class of libede

[ede] / tests / libede / fileSystemBoxTestApp / FileSystemBoxTestApp.ec

diff --git a/tests/libede/fileSystemBoxTestApp/FileSystemBoxTestApp.ec b/tests/libede/fileSystemBoxTestApp/FileSystemBoxTestApp.ec
new file mode 100644 (file)
index 0000000..2f6d75a
--- /dev/null
+++ b/tests/libede/fileSystemBoxTestApp/FileSystemBoxTestApp.ec
@@ -0,0 +1,148 @@
+import "ecere"
+import "ede"
+
+class FileSystemBoxTestWindow : Window
+{
+   text = "FileSystemBox Test Window";
+   background = activeBorder;
+   borderStyle = sizable;
+   hasMaximize = true;
+   hasMinimize = true;
+   hasClose = true;
+   size = { 840, 480 };
+
+   TabControl tabControl { this, background = activeBorder, anchor = { left = 4, top = 4, right = 4, bottom = 4 } };
+
+   FileListTab fileListTab { tabControl };
+   FolderListTab folderListTab { tabControl };
+   FileTreeTab fileTreeTab { tabControl };
+   FolderTreeTab folderTreeTab { tabControl };
+   FileDetails fileDetails { tabControl };
+   FilteredList filteredList { tabControl };
+   FilteredTree filteredTree { tabControl };
+   RootList rootList { tabControl };
+   RootTree rootTree { tabControl };
+}
+
+FileSystemBoxTestWindow testWindow { };
+
+class TestTab : Tab
+{
+   background = activeBorder;
+}
+
+class FileListTab : TestTab
+{
+   text = "FileList";
+
+   FileSystemBox box
+   {
+      this;
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+   };
+}
+
+class FolderListTab : TestTab
+{
+   text = "FolderList";
+
+   FileSystemBox box
+   {
+      this;
+      foldersOnly = true;
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+   };
+}
+
+class FileTreeTab : TestTab
+{
+   text = "FileTree";
+
+   FileSystemBox box
+   {
+      this;
+      treeBranches = true;
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+   };
+}
+
+class FolderTreeTab : TestTab
+{
+   text = "FolderTree";
+
+   FileSystemBox box
+   {
+      this;
+      treeBranches = true;
+      foldersOnly = true;
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+   };
+}
+
+class FileDetails : TestTab
+{
+   text = "FileDetails";
+
+   FileSystemBox box
+   {
+      this;
+      details = true; // TODO: figure out why commented out (see FileSystemBox) code crashes the form designer
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+   };
+}
+
+class FilteredList : TestTab
+{
+   text = "FilteredList";
+
+   FileSystemBox box
+   {
+      this;
+      extensions = "epj, ec";
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+   };
+}
+
+class FilteredTree : TestTab
+{
+   text = "FilteredTree";
+
+   FileSystemBox box
+   {
+      this;
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+
+      extensions = "txt, text, nfo, info";
+      treeBranches = true;
+   };
+}
+
+class RootList : TestTab
+{
+   text = "RootList";
+
+   FileSystemBox box
+   {
+      this;
+      path = "/";
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+   };
+}
+
+class RootTree : TestTab
+{
+   text = "RootTree";
+
+   FileSystemBox box
+   {
+      this;
+      path = "/";
+      anchor = { left = 4, top = 4, right = 4, bottom = 4 };
+
+      treeBranches = true;
+   };
+}
+
+class FileSystemBoxTestApp : GuiApplication
+{
+}