TPDFlibShapeWatermark

Data types, page layout

描述

TPDFlibShapeWatermark 是 v3.223.0 引入的 TPDFlibWatermarkBase 具体子类，以填充色和描边色、线宽与不透明度把矢量形状盖印到页面范围

矩形、圆或椭圆由 Width 和 Height 决定尺寸；多边形、贝塞尔曲线链或直线从 SetPoints 设置的点列表取几何，坐标以形状左上角为局部原点，因此九点 Position 网格依然适用

语法

Delphi

TPDFlibShapeWatermark = Class(TPDFlibWatermarkBase)
  Public
    Shape: TPDFlibWatermarkShape;
    Width, Height: Double;
    Filled: Boolean;
    FillR, FillG, FillB: Double;
    LineR, LineG, LineB: Double;
    LineWidth: Double;
    Constructor Create; Override;
    Procedure SetPoints(Const XYPairs: Array Of Double);
    Function PointCount: Integer;
    Function Apply(Lib: TObject): Integer; Override;
  End;

参数

Shape	要绘制的矢量形状，取自 `TPDFlibWatermarkShape`
Width, Height	`wsRectangle`、`wsCircle` 和 `wsEllipse` 使用的外包尺寸
Filled	True 时填充加描边，False 时仅描边
FillR, FillG, FillB	范围 0 到 1 的填充颜色分量
LineR, LineG, LineB	范围 0 到 1 的描边颜色分量
LineWidth	以当前度量单位表示的描边宽度

方法

SetPoints	以 X,Y 对列表设置局部几何；`wsPolygon` 至少 3 个点并自动闭合，`wsLine` 恰好 2 个点，`wsCurve` 需要起点加控制点、控制点、终点三元组（1 + 3n 个点）
PointCount	返回局部点列表持有的 X,Y 对数量

返回值

Apply 返回水印落版的页数

另请参阅

ApplyWatermark, TPDFlibWatermarkBase, TPDFlibWatermarkShape, TPDFlibCompositeWatermark