Модуль FolderActions.pas обеспечивает упаковку папки и всех вложений в нее в единый файл - архив. Основные применяемые функции и процедуры представлены в таблице 4.
Таблица 4 - Основные функции и процедуры модуля FolderActions.pas
Функция или процедура
Входные данные
Выходные данные
Описание
DoFolderAction
FolderPath, ArchivePath:string - пути исходной папки с вложениями и итогового архива; ActionFunction: TActionFuntion - функция копирования одного файла в другой.
DoFolderAction: Boolean - успешное или аварийное завершение работы.
Выполняет создание архива всех вложений поданной на вход папки.
De_DoFolderAction
FolderPath, ArchivePath:string - путь архива для распаковки и путь папки для итоговой распаковки; ActionFunction: TActionFuntion - функция копирования одного файла в другой.
De_DoFolderAction: Boolean - успешное или аварийное завершение работы.
Выполняет извлечение папок и файлов из архива.
GetAllFiles
Filter, Folder: string - фильтр выбора файлов и исходная папка для обхода соотвественно.
GetAllFiles: TFilesList - итоговый список обойденных файлов.
Обход всех файлов в папке
.7.5 Модуль создания USB-ключа
Модуль Unit3.pas обеспечивает весь процесс создания USB-ключа - введение данных, проверка их корректности и справочная информация для пользователя. Основные применяемые функции и процедуры представлены в таблице 5.
Таблица 5 - Основные функции и процедуры модуля Unit3.pas
Функция или процедура
Входные данные
Выходные данные
Описание
CRC64_sum
str: string - строка, от которой вычисляется контрольная сумма (CRC64).
CRC64_sum: int64 - контрольная сумма (CRC64), полученная от строки.
Производится вычисление контрольной суммы (CRC64) от строки (буфера).
c_GetTempPath
-
c_GetTempPath: String - возвращает путь к системной временной папке TEMP.
Процедура не имеет входных параметров. При вызове возвращает путь к системной временной папке TEMP.
hexTOdec
str: string - строка, представляющая собой строковую запись шестнадцатиричного числа.
hexTOdec: cardinal - переведенное число в десятиричном формате.
Функция производит перевод шестнадцатиричного числа в десятиричное.
new_yserkey
-
Создание USB-ключа
Основная процедура модуля. Создает USB-ключ на основе введенных пользователем личных данных, пары логин-пароль и указанного USB.