function SaveAsPdfRToStream(Stream: TStream; const Options: TPdfRSaveOptions): Boolean;
SaveAsPdfRToStream ist das Streaming-Gegenstück zu
SaveAsPdfR — dieselben Ausgabe-Bytes, geschrieben
in jeden seekable TStream, den der Aufrufer bereitstellt. Nützlich für
Dokument-Capture-/Archivierungs-Pipelines, die Scanner-Ausgabe aufnehmen,
PDF/R-1-Marker anhängen und das Ergebnis ohne Festplattenberührung in
einen Content-Store schieben
Die Nachbearbeitung ist identisch mit SaveAsPdfR: Katalog reduziert
auf die §6.3-White-List, Info-Dictionary reduziert auf die §6.4.3-White-List,
XMP-Stream mit den vier §6.4.4-Tabellen-1-Einträgen,
%PDF-raster-1.0-Fußkommentar und Trailer-/ID. Nur die vier
erlaubten Info-Einträge (Creator / Producer / CreationDate /
ModDate) werden automatisch aus FPDF_GetMetaText befüllt;
Title / Author / Subject / Keywords werden bewusst NICHT übernommen,
da PDF/R sie in der Info-Dictionary verbietet
Gibt bei Erfolg True zurück
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;