function SaveAsPdfRToStream(Stream: TStream; const Options: TPdfRSaveOptions): Boolean;
SaveAsPdfRToStream هو النظير التدفقي لـ
SaveAsPdfR — وحدات بايت الإخراج نفسها، مكتوبة في أي
TStream قابل للبحث يزوّده المستدعي. وهو مفيد لخطوط أنابيب التقاط
المستندات / الأرشفة التي تأخذ مخرجات الماسح الضوئي، وتضيف علامات
PDF/R-1، وتدفع النتيجة إلى مخزن محتوى دون
لمس القرص
المعالجة اللاحقة مطابقة لـ SaveAsPdfR: كتالوج مقشّط
إلى القائمة البيضاء للبند §6.3، وقاموس Info مقشّط إلى القائمة البيضاء
للبند §6.4.3، وتدفق XMP يحمل مدخلات §6.4.4 Table 1 الأربعة،
وتعليق تذييل %PDF-raster-1.0، و trailer /ID. لا تتعبأ
تلقائيًا من FPDF_GetMetaText سوى مدخلات Info الأربعة المسموحة
(Creator / Producer / CreationDate /
ModDate)؛ أما Title /
Author / Subject / Keywords فلا تُجسَّر عمدًا لأن
PDF/R يحظرها في قاموس Info
يُرجع True عند النجاح
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;