function SaveAsPdfVTToStream(Stream: TStream; const Options: TPdfVTSaveOptions): Boolean;
SaveAsPdfVTToStream é a contraparte em streaming de
SaveAsPdfVT — mesmos bytes de saída (marcadores
PDF/X-4 mais identificação PDF/VT), gravados em qualquer TStream
com seek que o chamador fornecer. Útil para pipelines de
impressão de dados variáveis em que cada trabalho renderizado é
enviado a uma imprensa digital ou a um arquivo de documentos de
faturamento / transacionais sem tocar o disco
O pós-processamento é idêntico ao de SaveAsPdfVT: injeção de
marcadores (fluxo XMP + fluxo ICC + dicionário OutputIntent +
dicionário Info reescrito + dicionário Catalog reescrito), uma
hierarquia DPart mínima quando necessário e um trailer com
/ID. Campos de Options deixados vazios são
preenchidos automaticamente a partir de
FPDF_GetMetaText / FPDF_GetFileIdentifier
Retorna True em caso de sucesso
var
Stream: TMemoryStream;
Opts: TPdfVTSaveOptions;
begin
Stream := TMemoryStream.Create;
try
Opts := TPdfVTSaveOptions.Default;
Opts.Producer := 'PDFium Delphi Component VT pipeline';
if Pdf1.SaveAsPdfVTToStream(Stream, Opts) then
begin
Stream.Position := 0;
PushToPress(Stream);
end;
finally
Stream.Free;
end;
end;