function SaveAsPadesDssToStream(Stream: TStream; const Options: TPadesDssOptions): Boolean;
将当前文档字节保存到自定义流,同时向文档的全局 /DSS 字典注入 X.509 验证材料(证书、CRL 和 OCSP 响应)
TPadesDssOptions.Vris 写入签名专属的间接 VRI 字典,其证书、OCSP 和 CRL 数组引用去重后的全局材料流
| Stream | 用于写入输出字节的目标流 |
| Options | 完整的 DSS 配置,包含验证材料和签名专属的 VRI 条目 |
Active 为 True/Contents 值(含填充)的大写 SHA-1EPadesCrypto,且不会改变目标流
var
MemStream: TMemoryStream;
DssOpts: TPadesDssOptions;
begin
if not Pdf1.Active then Exit;
MemStream := TMemoryStream.Create;
try
DssOpts := TPadesDssOptions.Default;
Pdf1.SaveAsPadesDssToStream(MemStream, DssOpts);
finally
MemStream.Free;
end;
end;