TPDFCanvas

type TPDFCanvas = class(TFPCustomCanvas)

protected

  procedure SetWidth(); override;

  function GetWidth; override;

  procedure SetHeight(); override;

  function GetHeight; override;

  procedure SetColor(); override;

  function GetColor(); override;

  function DoCreateDefaultFont; override;

  function DoCreateDefaultPen; override;

  function DoCreateDefaultBrush; override;

  procedure DoTextOut(); override;

  procedure DoGetTextSize(); override;

  function DoGetTextHeight(); override;

  function DoGetTextWidth(); override;

  function DoGetTextMetrics(); override;

  function GetNativeTextOrigin; override;

  procedure DoMoveTo(); override;

  procedure DoLineTo(); override;

  procedure DoLine(); override;

  procedure DoRectangle(); override;

  procedure DoRectangleFill(); override;

  procedure DoEllipse(); override;

  procedure DoEllipseFill(); override;

  procedure DoPolygon(); override;

  procedure DoPolygonFill(); override;

  procedure DoPolyline(); override;

  procedure DoPolyBezier(); override;

  procedure DoRadialPie(); override;

  procedure DoChord(); override;

  procedure DoRoundRect(); override;

  procedure DoFloodFill(); override;

  procedure DoFloodFillStyle(); override;

  procedure DoCopyRect(); override;

  procedure DoDraw(); override;

  procedure DoStretchDraw(); override;

public

  constructor Create();

  destructor Destroy; override;

  procedure Arc(); override; overload;

  procedure GradientFill(); override;

  procedure ClearShadow;

  property Document: TPDFDocument; [r]

  property Page: TPDFPage; [rw]

  property Shadow: Boolean; [rw]

end;

TPDFCanvas

TObject