وثائق HotPDF
الصفحة الرئيسية المحتويات THPDFPage Methods

THPDFPage.AddTextWatermark Method

الصياغة

procedure AddTextWatermark(
  const Text    : WideString;
  X, Y          : Single;
  Angle         : Extended;
  Opacity       : Single;
  const FontName: AnsiString;
  FontStyle     : TFontStyles;
  FontSize      : Single;
  Color         : TColor);

الوصف

يرسم AddTextWatermark نصًا شفافًا مدورًا على الصفحة الحالية. يسجل ExtGState بقيم alpha مطابقة للملء والحد، ويحفظ graphics state الحالي، ويطبق خط watermark ولون الملء، ويصدر النص، ثم يستعيد graphics state السابق

تقيد Opacity إلى النطاق 0..1. القيم الأقل من 1 تتطلب دعم شفافية PDF وترفضها بوابات PDF/A وPDF/X نفسها المستخدمة في RegisterExtGState. استخدم هذا الأسلوب على الصفحات المولدة أو الصفحات المحددة بعد LoadFromFile وBeginDoc

مثال

PDF.LoadFromFile('Input.pdf');
PDF.FileName := 'Watermarked.pdf';
PDF.BeginDoc;
for I := 0 to PDF.PagesCount - 1 do
begin
  PDF.CurrentPageNumber := I;
  PDF.CurrentPage.AddTextWatermark(
    'CONFIDENTIAL', 105, 430, -35, 0.22, 'Arial', [fsBold], 56, clSilver);
end;
PDF.EndDoc;

انظر أيضا