function SaveAsPdfRToStream(Stream: TStream; const Options: TPdfRSaveOptions): Boolean;
SaveAsPdfRToStream är strömmotsvarigheten till
SaveAsPdfR — samma utmatningsbyte, skrivna till en
valfri sökbar TStream som anroparen tillhandahåller. Användbar för
pipelines för dokumentfångst / arkivering som tar skannerutmatning,
bifogar PDF/R-1-markörer och pushar resultatet till ett innehållslager
utan att röra disken
Efterbearbetningen är identisk med SaveAsPdfR: katalogen nedbantad
till vitlistan i §6.3, Info-dictionaryn nedbantad till vitlistan i
§6.4.3, XMP-ström med de fyra posterna i §6.4.4 Table 1,
slutkommentaren %PDF-raster-1.0 och /ID i trailern. Endast
de fyra tillåtna Info-posterna (Creator / Producer / CreationDate /
ModDate) fylls i automatiskt från FPDF_GetMetaText;
Title / Author / Subject / Keywords övertas medvetet INTE eftersom
PDF/R förbjuder dem i Info-dictionaryn
Returnerar True vid lyckat resultat
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;