Class tsimplebitmap

Unit

msegraphics

Declaration

type tsimplebitmap = class(tnullinterfacedpersistent, icanvas)

Description

Hierarchy

• TObject
• tpersistent
• tvirtualpersistent
• tnullinterfacedpersistent
• tsimplebitmap

Overview

Fields

	fgdifuncs: pgdifunctionaty;
	fcanvasclass: canvasclassty;
	fcanvas: tcanvas;
	fhandle: pixmapty;
	fsize: sizety;
	fscanlinestep: integer;
	fscanlinewords: integer;
	fscanhigh: integer;
	fkind: bitmapkindty;
	fstate: pixmapstatesty;
	fcolorbackground: colorty;
	fcolorforeground: colorty;
	fdefaultcliporigin: pointty;

Methods

	procedure updatescanline();
	function createcanvas: tcanvas; virtual;
	procedure creategc;
	procedure internaldestroyhandle;
	procedure destroyhandle; virtual;
	procedure createhandle(acopyfrom: pixmapty); virtual;
	procedure setkind(const avalue: bitmapkindty); virtual;
	function getconverttomonochromecolorbackground: colorty; virtual;
	function getmask(out apos: pointty): tsimplebitmap; virtual;
	procedure setsize(const avalue: sizety); virtual;
	function normalizeinitcolor(const acolor: colorty): colorty;
	procedure assign1(const source: tsimplebitmap; const docopy: boolean); virtual;
	function getgdiintf: pgdifunctionaty;
	procedure gcneeded(const sender: tcanvas);
	function getsize: sizety;
	function getkind: bitmapkindty;
	procedure getcanvasimage(const bgr: boolean; var aimage: maskedimagety); virtual;
	constructor create(const akind: bitmapkindty; const agdifuncs: pgdifunctionaty = nil); reintroduce;
	destructor destroy; override;
	procedure copyhandle;
	procedure releasehandle; virtual;
	procedure acquirehandle; virtual;
	procedure assign(source: tpersistent); override;
	procedure assignnegative(source: tsimplebitmap);
	procedure clear; virtual;
	procedure init(const acolor: colorty); virtual;
	procedure freecanvas;
	function canvasallocated: boolean;
	procedure copyarea(const asource: tsimplebitmap; const asourcerect: rectty; const adestpoint: pointty; const acopymode: rasteropty = rop_copy; const masked: boolean = true; const acolorforeground: colorty = cl_default; const acolorbackground: colorty = cl_default; const aopacity: colorty = cl_none); overload;
	procedure copyarea(const asource: tsimplebitmap; const asourcerect: rectty; const adestrect: rectty; const aalignment: alignmentsty = []; const acopymode: rasteropty = rop_copy; const masked: boolean = true; const acolorforeground: colorty = cl_default; const acolorbackground: colorty = cl_default; const aopacity: colorty = cl_none); overload;
	function isempty: boolean;

Properties

	property handle: pixmapty read gethandle write sethandle;
	property kind: bitmapkindty read fkind write setkind;
	property canvas: tcanvas read getcanvas;
	property size: sizety read fsize write setsize;
	property width: integer read fsize.cx write setwidth;
	property height: integer read fsize.cy write setheight;

Description

Fields

	fgdifuncs: pgdifunctionaty;

	fcanvasclass: canvasclassty;

	fcanvas: tcanvas;

	fhandle: pixmapty;

	fsize: sizety;

	fscanlinestep: integer;

	fscanlinewords: integer;

	fscanhigh: integer;

	fkind: bitmapkindty;

	fstate: pixmapstatesty;

	fcolorbackground: colorty;

	fcolorforeground: colorty;

	fdefaultcliporigin: pointty;

Methods

	procedure updatescanline();

	function createcanvas: tcanvas; virtual;

	procedure creategc;

	procedure internaldestroyhandle;

	procedure destroyhandle; virtual;

	procedure createhandle(acopyfrom: pixmapty); virtual;

	procedure setkind(const avalue: bitmapkindty); virtual;

	function getconverttomonochromecolorbackground: colorty; virtual;

	function getmask(out apos: pointty): tsimplebitmap; virtual;

	procedure setsize(const avalue: sizety); virtual;

	function normalizeinitcolor(const acolor: colorty): colorty;

	procedure assign1(const source: tsimplebitmap; const docopy: boolean); virtual;

	function getgdiintf: pgdifunctionaty;

	procedure gcneeded(const sender: tcanvas);

	function getsize: sizety;

	function getkind: bitmapkindty;

	procedure getcanvasimage(const bgr: boolean; var aimage: maskedimagety); virtual;

	constructor create(const akind: bitmapkindty; const agdifuncs: pgdifunctionaty = nil); reintroduce;

	destructor destroy; override;

	procedure copyhandle;

	procedure releasehandle; virtual;

	procedure acquirehandle; virtual;

	procedure assign(source: tpersistent); override;

	procedure assignnegative(source: tsimplebitmap);

	procedure clear; virtual;

	procedure init(const acolor: colorty); virtual;

	procedure freecanvas;

	function canvasallocated: boolean;

	procedure copyarea(const asource: tsimplebitmap; const asourcerect: rectty; const adestpoint: pointty; const acopymode: rasteropty = rop_copy; const masked: boolean = true; const acolorforeground: colorty = cl_default; const acolorbackground: colorty = cl_default; const aopacity: colorty = cl_none); overload;

	procedure copyarea(const asource: tsimplebitmap; const asourcerect: rectty; const adestrect: rectty; const aalignment: alignmentsty = []; const acopymode: rasteropty = rop_copy; const masked: boolean = true; const acolorforeground: colorty = cl_default; const acolorbackground: colorty = cl_default; const aopacity: colorty = cl_none); overload;

	function isempty: boolean;

Properties

	property handle: pixmapty read gethandle write sethandle;

	property kind: bitmapkindty read fkind write setkind;

	property canvas: tcanvas read getcanvas;

	property size: sizety read fsize write setsize;

	property width: integer read fsize.cx write setwidth;

	property height: integer read fsize.cy write setheight;