delphi - 如何使用 SynCrypto 加密大文件？

Question

SynCrypto 是SynPDF中包含的 Delphi 和 FPC 的开源数据加密库。

我使用此代码进行文件加密：

var
  inputfile : RawByteString;
  outputfile: RawByteString;
begin
  inputfile := StringFromFile('c:\test1.mp4');
  outputfile := TAESCFB.SimpleEncrypt(inputfile,'TEST',true,true);
  FileFromString(outputfile,'c:\test2.mp4');
end;

但是它不适用于大文件（> 1GB）。有没有办法加密大文件？