function SaveAsPdfVTToStream(Stream: TStream; const Options: TPdfVTSaveOptions): Boolean;
SaveAsPdfVTToStream er streaming-modstykket til
SaveAsPdfVT — samme output-bytes (PDF/X-4-markører
plus PDF/VT-identifikation), skrevet til enhver søgbar TStream som
kalderen leverer. Nyttig til variabel-data-print-pipelines hvor
hvert renderet job skubbes til et digitalt tryk eller til et fakturerings- /
transaktions-dokumentarkiv uden at røre disk.
Efterbehandlingen er identisk med SaveAsPdfVT: markør-
injektion (XMP-stream + ICC-stream + OutputIntent-dict + omskrevet
Info-dict + omskrevet Catalog-dict), en minimal DPart-hierarki når
nødvendigt, og en trailer med /ID.
Options-felter der efterlades tomme auto-udfyldes fra
FPDF_GetMetaText / FPDF_GetFileIdentifier.
Returnerer True ved succes.
var
Stream: TMemoryStream;
Opts: TPdfVTSaveOptions;
begin
Stream := TMemoryStream.Create;
try
Opts := TPdfVTSaveOptions.Default;
Opts.Producer := 'PDFiumPas VT pipeline';
if Pdf1.SaveAsPdfVTToStream(Stream, Opts) then
begin
Stream.Position := 0;
PushToPress(Stream);
end;
finally
Stream.Free;
end;
end;