![]() ![]() ![]() |
Encrypting a file
EasyCompression Library provides a file stream interface with TECLFileStream class that can be easily used to compress/encrypt and decompress/decrypt a file.
Encrypting a file.
To encrypt a file to file you need to perform the following 3 steps:
Example:
var
CompFS: TECLFileStream;
begin
CompFS := TECLFileStream.Create('c:\test_comp.ecl', fmCreate, 'password', zlibFastest);
CompFS.LoadFromFile('c:\test.txt');
CompFS.Free;
end;
Decrypting a file.
To decrypt and decompress a file to file you need to perform the following 3 steps:
Example:
var
CompFS: TECLFileStream;
begin
CompFS := TECLFileStream.Create('c:\test_comp.ecl', fmOpenRead or fmShareDenyNone, 'password');
CompFS.SaveToFile('c:\test_decomp.txt');
CompFS.Free;
end;