Documentation HotPDF
Accueil Sommaire Méthodes THPDFPage

THPDFPage.AddTextWatermark Méthode

Syntaxe

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

Description

AddTextWatermark trace du texte transparent en rotation sur la page courante. Il enregistre un ExtGState avec des alpha de remplissage et de tracé identiques, sauvegarde l'état graphique courant, applique la police du filigrane et la couleur de remplissage, émet le texte, puis restaure l'état graphique précédent

Opacity est borné à l'intervalle 0..1 les valeurs inférieures à 1 nécessitent la prise en charge de la transparence PDF et sont Utilisez cette méthode sur des pages générées ou RegisterExtGState. Use this method on generated pages or sur des pages sélectionnées après LoadFromFile et BeginDoc

Exemple

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;

Voir aussi