function SaveAsPdfRToStream(Stream: TStream; const Options: TPdfRSaveOptions): Boolean;
SaveAsPdfRToStream est le pendant de streaming de SaveAsPdfR — mêmes octets de sortie, écrits dans n’importe quel TStream positionnable fourni par l’appelant. Utile pour les pipelines de capture / archivage de documents qui prennent la sortie de scanner, attachent des marqueurs PDF/R-1 et poussent le résultat vers un magasin de contenu sans toucher le disque
Le post-traitement est identique à SaveAsPdfR : catalogue réduit à la liste blanche §6.3, dictionnaire Info réduit à la liste blanche §6.4.3, flux XMP portant les quatre entrées du §6.4.4 Tableau 1, commentaire de pied de page %PDF-raster-1.0 et /ID de trailer. Seules les quatre entrées Info autorisées (Creator / Producer / CreationDate / ModDate) sont auto-remplies depuis FPDF_GetMetaText ; Title / Author / Subject / Keywords ne sont volontairement PAS pontés car PDF/R les interdit dans le dictionnaire Info
Renvoie True en cas de succès
var
Stream: TMemoryStream;
Opts: TPdfRSaveOptions;
begin
Stream := TMemoryStream.Create;
try
Opts := TPdfRSaveOptions.Default;
Opts.Producer := 'PDFium Delphi Component scan pipeline';
if Pdf1.SaveAsPdfRToStream(Stream, Opts) then
begin
Stream.Position := 0;
ArchiveScan(Stream);
end;
finally
Stream.Free;
end;
end;