TLazCanvas

type TLazCanvas = class(TFPImageCanvas)

protected

  procedure SetColor(); override;

  function DoCreateDefaultFont; override;

  procedure DoRectangle(); override;

  procedure DoRectangleFill(); override;

  procedure DoPolygonFill(); override;

  procedure DoLine(); override;

  procedure DoCopyRect(); override;

  procedure DoDraw(); override;

public

  HasNoImage: Boolean;

  NativeDC: PtrInt;

  ExtraFontData: TObject;

  ImageFormat: TLazCanvasImageFormat;

  SelectedBitmap: TObject;

  constructor create();

  destructor destroy; override;

  procedure SetLazClipRegion();

  function SaveState;

  procedure RestoreState();

  procedure ResetCanvasState;

  procedure AlphaBlend();

  procedure AlphaBlendIgnoringDestPixels();

  procedure AlphaBlend_Image();

  procedure DoDrawImage();

  procedure CanvasCopyRect();

  procedure FillColor();

  procedure Polygon(); overload;

  procedure AssignPenData();

  procedure AssignBrushData();

  procedure AssignFontData();

  property AssignedPen: TFPCustomPen; [rw]

  property AssignedBrush: TFPCustomBrush; [rw]

  property AssignedFont: TFPCustomFont; [rw]

  property BaseWindowOrg: TPoint; [rw]

  property WindowOrg: TPoint; [rw]

end;

TLazCanvas

TObject