Class tdialmarker

Unit

msedial

Declaration

type tdialmarker = class(tdialprop, iframe, iface)

Description

Hierarchy

• TObject
• tpersistent
• tvirtualpersistent
• townedpersistent
• tdialprop
• tdialmarker

Overview

Fields

finfo: markerinfoty;

Methods

	procedure defineproperties(filer: tfiler); override;
	procedure updatemarker;
	procedure setframeinstance(instance: tcustomframe);
	procedure setstaticframe(value: boolean);
	function getstaticframe: boolean;
	procedure scrollwidgets(const dist: pointty);
	procedure clientrectchanged;
	function getcomponentstate: tcomponentstate;
	function getmsecomponentstate: msecomponentstatesty;
	procedure invalidate;
	procedure invalidatewidget;
	procedure invalidaterect(const rect: rectty; const org: originty = org_client; const noclip: boolean = false);
	function getwidget: twidget;
	function getwidgetrect: rectty;
	function getframestateflags: framestateflagsty;
	function translatecolor(const acolor: colorty): colorty;
	function getclientrect: rectty;
	procedure setlinkedvar(const source: tmsecomponent; var dest: tmsecomponent; const linkintf: iobjectlink = nil);
	procedure widgetregioninvalid;
	constructor create(aowner: tobject); override;
	destructor destroy; override;
	procedure createframe;
	procedure createface;
	function pos: integer;
	procedure paint(const acanvas: tcanvas);

Properties

	property visible: boolean read getvisible write setvisible;
	property active: boolean read finfo.active;
	property limited: boolean read finfo.limited;
	property value: realty read finfo.value write setvalue ;
	property options: dialmarkeroptionsty read finfo.options write setoptions default [];
	property hintcaption: msestring read fhintcaption write fhintcaption;
	property bar_color: colorty read finfo.bar_color write setbar_color default cl_none;
	property bar_width: integer read finfo.bar_width write setbar_width default defaultmarkerwidth;
	property bar_shift: integer read finfo.bar_shift write setbar_shift default 0;
	property bar_frame: tframe read getbar_frame write setbar_frame;
	property bar_face: tface read getbar_face write setbar_face;

Description

Fields

	finfo: markerinfoty;

Methods

	procedure defineproperties(filer: tfiler); override;

	procedure updatemarker;

	procedure setframeinstance(instance: tcustomframe);

	procedure setstaticframe(value: boolean);

	function getstaticframe: boolean;

	procedure scrollwidgets(const dist: pointty);

	procedure clientrectchanged;

	function getcomponentstate: tcomponentstate;

	function getmsecomponentstate: msecomponentstatesty;

	procedure invalidate;

	procedure invalidatewidget;

	procedure invalidaterect(const rect: rectty; const org: originty = org_client; const noclip: boolean = false);

	function getwidget: twidget;

	function getwidgetrect: rectty;

	function getframestateflags: framestateflagsty;

	function translatecolor(const acolor: colorty): colorty;

	function getclientrect: rectty;

	procedure setlinkedvar(const source: tmsecomponent; var dest: tmsecomponent; const linkintf: iobjectlink = nil);

	procedure widgetregioninvalid;

	constructor create(aowner: tobject); override;

	destructor destroy; override;

	procedure createframe;

	procedure createface;

	function pos: integer;

	procedure paint(const acanvas: tcanvas);

Properties

	property visible: boolean read getvisible write setvisible;

	property active: boolean read finfo.active;

	property limited: boolean read finfo.limited;

	property value: realty read finfo.value write setvalue ;

	property options: dialmarkeroptionsty read finfo.options write setoptions default [];

	property hintcaption: msestring read fhintcaption write fhintcaption;

	property bar_color: colorty read finfo.bar_color write setbar_color default cl_none;

	property bar_width: integer read finfo.bar_width write setbar_width default defaultmarkerwidth;

	property bar_shift: integer read finfo.bar_shift write setbar_shift default 0;

	property bar_frame: tframe read getbar_frame write setbar_frame;

	property bar_face: tface read getbar_face write setbar_face;