TRGBMask

type TRGBMask = class(TRGB8BitmapCore)

protected

  procedure AddPixel();

  procedure RemovePixel();

  procedure XORPixel();

  procedure CreatePens; virtual;

  function GetFillProcedure; virtual;

  function GetMaskedPixelsCount;

public

  constructor Create(); override;

  constructor CreateAsCopy(); override;

  destructor Destroy; override;

  procedure LoadFromLazIntfImageAlpha(); override;

  procedure SwapWith(); override;

  procedure Assign(); override;

  procedure UpdateMaskedPixels;

  procedure Draw();

  procedure DrawShapeTo();

  procedure StretchDrawShapeTo();

  procedure StretchDrawShapePortionTo();

  procedure DrawTo();

  procedure StretchTrunc(); virtual;

  procedure Rectangle();

  procedure Ellipse();

  procedure Clear; override;

  procedure ClearWhite; override;

  procedure Invert; override;

  function IsEmpty;

  function GetMaskedRect;

  property BackgroundPen: TPen; [r]

  property ForegroundPen: TPen; [r]

  property FillMode: TMaskFillMode; [rw]

end;

TRGBMask

TRGB8BitmapCore

TRGBBitmapCore

TObject