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 }; JustFilesTab justFilesTab { 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 JustFilesTab : TestTab { text = "JustFiles"; FileSystemBox box { this; filesOnly = true; 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 { }