Software components for data protection, secure storage and transfer
procedure ZipWholeDir(Path: string; zipWrtr: TElZipWriter);
if FindFirst(Path + '*.*', faAnyFile, SR) = 0 then
if (SR.Attr <> faDirectory) then
if (sr.name<>'.') and (sr.name<>'..') then
until FindNext(SR) <> 0;
Number of guests: 1, registered members: 0,
in total hidden: 0
Copyright (c) 2016, /n software, Inc.
As of July 15, 2016 EldoS Corporation will operate as a division of /n software inc. For more information, please read the announcement.