CalcFileCRC32, CopyFile, CopyFiles, CreateFolder, CurrentFolder, DeleteFile, DeleteFiles, FileExists, FileDeny, FileGetAttr, FileMaskEquate, FileSetAttr, FileSize, FolderExists, ForceFolders, MoveFile, MoveFiles, RemoveFolder, RenameFile, RenameFolder, SetCurrentFolder, XDelFolder
procedure CalcFileCRC32(FileName :string; var CRCvalue: Cardinal; var TotalBytes: Int64; var error: Word);
Процедура вычисляет контрольную сумму файла "FileName" (CRC32) и помещает ее в переменную "CRCvalue". В переменную "TotalBytes" заносится размер файла в байтах, в "error" — код ошибки, если таковая была.
procedure CopyFile(FileFrom, FileTo :string; Rewrite :boolean);
Скопировать файл "FileFrom" в "FileTo", если "Rewrite" равен "True", то перезаписывать файл, если таковой будет в результирующей папке, если "False" — то пропустить файл.
procedure CopyFiles(PathFrom, PathTo, Mask :string; Rewrite :boolean);
Скопировать файлы из папки "PathFrom" в папку "PathTo" по маске "Mask", если "Rewrite" равен "True", то перезаписывать файлы, если таковые будут в результирующей папке, если "False" — то пропускать файлы.
procedure CreateFolder(FolderName :string);
Создать папку с именем "FolderName".
function CurrentFolder :string;
Возвращает текущий каталог.
procedure DeleteFile(FileName :string);
Удалить файл "FileName".
procedure DeleteFiles(FilesPath, Mask :string);
Удалить файлы из папки "FilesPath" по маске "Mask".
function FileExists(FileName:string) :boolean;
Существует ли указанный файл? "True" — да, "False" — нет.
function FileDeny(FileName :string) :boolean;
Если файл "FileName" занят каким-либо приложением, функция возвращает "True".
function FileGetAttr(FileName: string): integer;
Функция для получения списка атрибутов файла либо каталога. Если при определении атрибутов произошла ошибка (файла нет, он недоступен или что-то еще), то функция вернет -1.
Список возможных атрибутов:
"faReadOnly" — только для чтения;
"faSysFile" — системный;
"faHidden" — скрытый;
"faDirectory" — каталог;
"faArchive" — архивный;
"faSymLink" — символическая ссылка;
"faAnyFile" — любой атрибут.
function FileMaskEquate(FileName, Mask :string) :boolean;
Соответствует ли файл "FileName" заданной маске "Mask"? Если да — "True", нет — "False".
function FileSetAttr(FileName: string; Attr: integer): integer;
Функция для установки атрибутов для указанного файла. Если попытка установки атрибутов закончилась неудачей — функция возвращает -1.
function FileSize(FileName :string) :int64;
Функция возвращает размер указанного файла в байтах. Если файла не существует или он не доступен, функция возвращает "-1".
function FolderExists(FolderName :string) :boolean;
Если папка "FolderName" существует — функция возвращает "True", иначе "False".
function ForceFolders(FolderName :string) :boolean;
Создать папку с необходимыми подкаталогами. "True" — если создание прошло успешно, "False" — попытка создания не удалась.
procedure MoveFile(FileFrom, FileTo :string; Rewrite :boolean);
перенести файл из "FileFrom" в "FileTo", если "Rewrite" равен "True", то перезаписывать файл, если таковой будет в результирующей папке, если "False" — то пропустить файл.
procedure MoveFiles(PathFrom, PathTo, Mask :string; Rewrite :boolean);
Перенести файлы из папки "PathFrom" в папку "PathTo" по маске "Mask", если "Rewrite" равен "True", то перезаписывать файлы, если таковые будут в результирующей папке, если "False" — то пропускать файлы.
function RemoveFolder(FolderName :string) :boolean;
Удалить папку "FolderName". Если папка удалена — "True", если нет — "False".
procedure RenameFile(FileName1, FileName2);
Переименовать файл "FileName1" в "FileName2".
function RenameFolder(FolderName1, FolderName2 :string) :boolean;
Переименовать папку "FolderName1" в "FolderName2". Если переименование прошло успешно — функция возвращает "True", если нет — "False".
function SetCurrentFolder(FolderName :string) :boolean;
Установить "FolderName" текущим каталогом. Если попытка не удалась — функция возвращает "False".
procedure XDelFolder(path :string);
Процедура удаляет указанный каталог со всем содержимым. Если какой-то файл либо подкаталог не может быть удален — он пропускается.






