AddTextWatermark 會在目前頁面上繪製旋轉的透明文字。它會註冊具有相符 fill 與 stroke alpha 的 ExtGState、儲存目前 graphics state、套用 watermark font 與 fill color、輸出文字,並還原先前的 graphics state

Syntax

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

說明

AddTextWatermark 會在目前頁面繪製旋轉的透明文字。它會註冊帶有相符 fill 與 stroke alpha 的 ExtGState、儲存目前 graphics state、套用 watermark font 與 fill color、輸出文字,然後還原先前的 graphics stateAddTextWatermark

Opacity 會限制在 0..1 範圍 低於 1 的值需要 PDF 透明支援,會被與 RegisterExtGState 相同的 PDF/A 與 PDF/X profile 閘門拒絕。請在產生的頁面上,或在 LoadFromFile 與 BeginDoc 之後選取的頁面上使用本方法

Example

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;

請參閱