Class tfacetemplate

Unit

msegui

Declaration

type tfacetemplate = class(tpersistenttemplate, iface1)

Description

Hierarchy

• TObject
• tpersistent
• tvirtualpersistent
• tnullinterfacedpersistent
• tlinkedpersistent
• tpersistenttemplate
• tfacetemplate

Overview

Methods

	procedure doassignto(dest: tpersistent); override;
	function getinfosize: integer; override;
	function getinfoad: pointer; override;
	procedure copyinfo(const source: tpersistenttemplate); override;
	procedure internalcreate; override;
	procedure defineproperties(filer: tfiler); override;
	function translatecolor(const acolor: colorty): colorty;
	constructor create(const owner: tmsecomponent; const onchange: notifyeventty); override;
	destructor destroy; override;
	procedure paint(const canvas: tcanvas; const arect: rectty);

Properties

	property options: faceoptionsty read fi.options write setoptions default [];
	property framei_left: integer read fi.framei.left write setframei_left default 0;
	property framei_top: integer read fi.framei.top write setframei_top default 0;
	property framei_right: integer read fi.framei.right write setframei_right default 0;
	property framei_bottom: integer read fi.framei.bottom write setframei_bottom default 0;
	property image: tfacebitmap read fi.image write setimage;
	property fade_pos: trealarrayprop read fi.fade_pos write setfade_pos;
	property fade_color: tfadecolorarrayprop read fi.fade_color write setfade_color;
	property fade_opapos: trealarrayprop read fi.fade_opapos write setfade_opapos;
	property fade_opacolor: tfadeopacolorarrayprop read fi.fade_opacolor write setfade_opacolor;
	property fade_direction: graphicdirectionty read fi.fade_direction write setfade_direction default gd_right;
	property fade_opacity: colorty read fi.fade_opacity write setfade_opacity default cl_none;
	property frameimage_list: timagelist read fi.frameimage_list write setframeimage_list;
	property frameimage_offset: integer read fi.frameimage_offset write setframeimage_offset default 0;
	property onbeforepaint: beforefacepainteventty read fonbeforepaint write fonbeforepaint;
	property onafterpaint: afterfacepainteventty read fonafterpaint write fonafterpaint;

Description

Methods

	procedure doassignto(dest: tpersistent); override;

	function getinfosize: integer; override;

	function getinfoad: pointer; override;

	procedure copyinfo(const source: tpersistenttemplate); override;

	procedure internalcreate; override;

	procedure defineproperties(filer: tfiler); override;

	function translatecolor(const acolor: colorty): colorty;

	constructor create(const owner: tmsecomponent; const onchange: notifyeventty); override;

	destructor destroy; override;

	procedure paint(const canvas: tcanvas; const arect: rectty);

Properties

	property options: faceoptionsty read fi.options write setoptions default [];

	property framei_left: integer read fi.framei.left write setframei_left default 0;

	property framei_top: integer read fi.framei.top write setframei_top default 0;

	property framei_right: integer read fi.framei.right write setframei_right default 0;

	property framei_bottom: integer read fi.framei.bottom write setframei_bottom default 0;

	property image: tfacebitmap read fi.image write setimage;

	property fade_pos: trealarrayprop read fi.fade_pos write setfade_pos;

	property fade_color: tfadecolorarrayprop read fi.fade_color write setfade_color;

	property fade_opapos: trealarrayprop read fi.fade_opapos write setfade_opapos;

	property fade_opacolor: tfadeopacolorarrayprop read fi.fade_opacolor write setfade_opacolor;

	property fade_direction: graphicdirectionty read fi.fade_direction write setfade_direction default gd_right;

	property fade_opacity: colorty read fi.fade_opacity write setfade_opacity default cl_none;

	property frameimage_list: timagelist read fi.frameimage_list write setframeimage_list;

	property frameimage_offset: integer read fi.frameimage_offset write setframeimage_offset default 0;

	property onbeforepaint: beforefacepainteventty read fonbeforepaint write fonbeforepaint;

	property onafterpaint: afterfacepainteventty read fonafterpaint write fonafterpaint;