function SaveAsPdfEToStream(Stream: TStream; const Options: TPdfESaveOptions): Boolean;
SaveAsPdfEToStream, SaveAsPdfE'nin akış karşılığidir —
aynı PDF/E-1 çıktısını üretir ancak sonucu çağıranın sağladığı aranabilir
herhangi bir TStream'e yazar. PDF/E yüklerinin diske dokunmadan doğrudan
PLM / PDM sistemlerine, BLOB sütunlarına, arşiv kapsayıcılarına veya
HTTP yükleme işlem hatlarına itildiği mühendislik iş akışı tümleştirmesi
için kullanışlıdır.
Son işleme mantığı SaveAsPdfE(FileName, Options) ile
aynıdır: önce temel SaveAs çalışır, ardından artımlı bir güncelleme XMP
meta veri akışını (pdfe:ISO_PDFEVersion ve uzantı şeması açıklamasıyla)
enjekte eder, zorunlu /ISO_PDFEVersion (PDF/E-1) girdisini
eklemek için Belge Bilgi Sözlüğünü yeniden yazar, yeni XMP'yi başvurmak
üzere kataloğu günceller ve taze bir /ID dizisi içeren bir
trailer yayar. Boş bırakılan Options alanları PDFium okuyucularından
(FPDF_GetMetaText, FPDF_GetFileIdentifier)
otomatik olarak doldurulur; bu nedenle tipik bir çağıran yalnızca
varsayılan olmayan Part / Amd / Corr değerleri için Version alanını
geçersiz kılmalıdır.
Başarı durumunda True döndürür. Çıktı akışı, yazılan son
bayttan sonraki konumda bırakılır. Temel SaveAs başarısız olursa veya
son işlemesi eklenemezse False döndürür.
/ISO_PDFEVersion ekler. Mevcut PDF/E sürüm değerleri değiştirilir.
var
Stream: TMemoryStream;
Opts: TPdfESaveOptions;
begin
Stream := TMemoryStream.Create;
try
Opts := TPdfESaveOptions.Default;
Opts.Producer := 'CAD-Workflow 2026';
if Pdf1.SaveAsPdfEToStream(Stream, Opts) then
begin
Stream.Position := 0;
PushToPLM(Stream);
end;
finally
Stream.Free;
end;
end;