Разработка файловой оболочки
Информация - Компьютеры, программирование
Другие материалы по предмету Компьютеры, программирование
st(ExpandFileName(FileName), faAnyFile, SearchRec) = 0 then
Result := SearchRec.Size
else Result := -1;
end;
function FileDateTime(const FileName: string): System.TDateTime;
begin
Result := FileDateToDateTime(FileAge(FileName));
end;
function HasAttr(const FileName: string; Attr: Word): Boolean;
begin
Result := (FileGetAttr(FileName) and Attr) = Attr;
end;
function ExecuteFile(const FileName, Params, DefaultDir: string;
ShowCmd: Integer): THandle;
var
zFileName, zParams, zDir: array[0..79] of Char;
begin
Result := ShellExecute(Application.MainForm.Handle, nil,
StrPCopy(zFileName, FileName), StrPCopy(zParams, Params),
StrPCopy(zDir, DefaultDir), ShowCmd);
end;
end.
Краткое руководство пользователя.
Программа предназначена для управления файловой системой операционной системы Windows95/98, в программе предусмотрены следующие возможности:
Копирование, переименование, перенос, удаление файлов и директорий;
Определение и установка атрибутов файлов;
Расширенный поиск файлов по маске;
Запуск программ со строкой параметров;
Применение маски-фильтра при просмотре списка файлов;
Создание директорий;
Определение размера директории;
Определение суммарного объёма дискового пространства занимаемого группой файлов;
Получение информации о текущем диске;
Запуск внешних программ редакторов для просмотра и редактирования файлов;
Установка интерфейсных параметров программы.
Обзор интерфейса программы МС.
Интерфейс программы на четыре функциональные части
Главное меню программы;
Панель инструментов;
Список файлов;
Список директорий;
Главное меню программы содержит с себе три компоненты управления программой:
File
View
Options
Компонента File содержит в себе основные функции управления файлами и директориями (см. рис. 1). Функция запуска программ Run доступна только тогда, когда выделенный файл является исполняемой программой. При выборе данного пункта. Появляется форма, содержащая строку параметров, а также параметр запуска вид формы окна запуска (см. рис. 2).
Рис 1. Меню File.
Рис 2. Форма запуска файлов со строкой параметров.
Функции Cut, Copy, Paste, Delete (Вырезать, Копировать, Вставить, Удалить) стандартные функции управления файлами/директориями. При невозможности выполнения выше перечисленных действий, данные функции недоступны. Функция Rename (Переименовать) запрашивает у пользователя новое имя для файла / директории в форме показанной на рисунке 3.
Рис 3. Переименование файлов / директорий
Функция Delete (Удаления), удаляет выделенные элементы в зависимости от активной рабочей области. Если последнее, перед вызовом этой функции, выделение производилось в области файлов, то будут удалены выделенные файлы, если же активная область директорий то удалена будет директория.
Функция Find (Найти) обеспечивает расширенный поиск файлов по маске в области поиска указанной пользователем. Параметры и маска поиска задается в форме показанной на рисунке 4
Рис 4. Поиск файлов.
Параметрами поиска являются задание области поиска, возможны три области: текущая директория, текущий диск и все жесткие диски (включая подключённые сетевые диски). Также есть возможность расширенного поиска с указанием ограничений в дате создания файла создания и его предполагаемых размерах. Во время поиска в строке статуса формы отражается количество найденных файлов, директория в которой осуществляется поиск. После того как были найдены файлы, возможен возврат в главную форму программы и переход к месту положения выбранного файла, а также запуск интересующего файла (редактирование во внешнем редакторе, если выбранный файл не является приложением). Для удобства задания маски поиска предусмотрено хранение 10-и последних масок в открывающемся списке.
Функция Exit (Выход) производит выход из программы.
Всем выше описанным функциям сопоставлены горячие клавиши.
Компонента View содержит в себе функции фильтра, получения информации о диске, получение и установка атрибутов файла, получение размера текущей директории, выделения всех файлов находящихся в текущей директории и инверсное выделение файлов.
Функция File Mask (Маска фильтра) запрашивает у пользователя в форме Get File Mask маску для отображения файлов. Для отмены маски необходим повторный вызов функции и задание маски предлагаемой по умолчанию.
Функция Info (Информация) предоставляет пользователю информацию о текущем диске (объём свободного и занятого пространства), а также информацию о текущей директории.
Функция File Attributes (Атрибуты файла) дает возможность просмотра текущих атрибутов файла и изменения этих атрибутов. В случае нескольких файлов возможно групповое присвоение новых атрибутов.
Функция Size Directory (Размер директории) выводит в статус строке списка директорий размер текущей директории.
Функция Select All выделяет все файлы, находящиеся в данной директории.
Функция Invert Select инвертирует выделение файлов. С файлов которые были выделены, выделение снимается, а остальные файлы выделяются.
Компонента Options (Параметры) выводит на экран форму параметров программы см рис 5, в которой пользователь
Рис 5. Параметры программы
может установить параметры интерфейса программы.
Параметры наличие статус строки, количество колонок в списке файлов (от 1 до 3), запрашивать подтверждение при выходе из программы. Так же существует механизм установки значения параметров по умолчанию (Запрашивать подтверждение при выходе, Наличие статус строки, 1 колонка