TGuiCustomPixelMap

type TGuiCustomPixelMap = class(TGuiCustomMap,IPixel32Access)

protected

  FDataPointer: PPixel32Array;

  FBitmapInfo: TBitmapInfo;

  procedure HeightChanged(); override;

  procedure WidthChanged(); override;

  procedure AssignTo(); override;

  function Equal();

  procedure ReadData(); override;

  procedure WriteData(); override;

  procedure DefineProperties(); override;

public

  constructor Create; override;

  procedure Clear();

  procedure CopyParentImage();

  procedure MakeOpaque; virtual;

  procedure ResetAlpha(); virtual;

  procedure Draw();

  procedure DrawTransparent();

  procedure LoadFromStream(); override;

  procedure SaveToStream(); override;

  procedure FillRect();

  procedure FrameRect();

  procedure Line();

  procedure HorizontalLine();

  procedure VerticalLine();

  procedure Assign(); override;

  function Equals(); override;

  property DataPointer: PPixel32Array; [r]

  property Pixel []: TPixel32; [rw]

  property PixelPointer []: PPixel32; [r]

  property ScanLine []: PPixel32Array; [r]

end;

TGuiCustomPixelMap

TGuiCustomMap,IPixel32Access

TObject,IStreamPersist