Delphi Database, Delphi Components from ComponentAce

TZipForge.DeleteFiles
TZipForge Example

Top

Deletes files stored within the archive.

procedure DeleteFiles; overload;
procedure DeleteFiles(
         FileMask:    String;
         SearchAttr:    Word = faAnyFile;
         ExclusionMask: String = ''); overload;

Description
Use DeleteFiles to delete files from the open archive file. If Options.Recurse is set to True, DeleteFiles will search files recursively.

DeleteFiles variant without parameters uses FileMasks, ExclusionMasks and Options.SearchAttr to specify search conditions and to exclude files from delete operation.

The FileMask parameter is the directory and file name mask, including wildcard characters. For example, 'TEST\*.*' specifies all files in the TEST directory stored within the archive file. All files that meets FileMask and SearchAttr will be deleted.

The SearchAttr parameter specifies the special files to include in addition to all normal files. This parameter is similar to the Attr parameter in FindFirst function from SysUtils unit. You can set it to any combination of faReadOnly, faHidden, faSysFile, faVolumeID, faDirectory, faArchive constants defined in SysUtils or value faAnyFile meaning that any file meets search condition.

The ExclusionMask specifies files to be excluded from delete operation.

Note: If some errors occurs an exception will be raised. Write an OnProcessFileFailure event handler to perform your own error handling.

Apr 16, 2024