Class tcustomstepframe

Unit

msewidgets

Declaration

type tcustomstepframe = class(tcustomcaptionframe, iframe)

Description

Hierarchy

• TObject
• tpersistent
• tvirtualpersistent
• tnullinterfacedpersistent
• toptionalpersistent
• tcustomframe
• tcustomcaptionframe
• tcustomstepframe

Overview

Fields

	fforceinvisiblebuttons: stepkindsty;
	fforcevisiblebuttons: stepkindsty;
	fstepstate: stepframestatesty;
	fdim: rectty;

Methods

	procedure dorepeat(const sender: tobject);
	procedure killrepeater;
	procedure layoutchanged;
	procedure updaterects; override;
	procedure getpaintframe(var frame: framety); override;
	procedure updatelayout;
	procedure execute(const tag: integer; const info: mouseeventinfoty);
	procedure setframeinstance(instance: tcustomframe);
	procedure setstaticframe(value: boolean);
	function getstaticframe: boolean;
	function getwidgetrect: rectty;
	function getcomponentstate: tcomponentstate;
	function getmsecomponentstate: msecomponentstatesty;
	procedure scrollwidgets(const dist: pointty);
	procedure clientrectchanged;
	procedure invalidate;
	procedure invalidatewidget;
	procedure invalidaterect(const rect: rectty; const org: originty = org_client; const noclip: boolean = false);
	function getwidget: twidget;
	function getframestateflags: framestateflagsty; virtual;
	procedure internalpaintoverlay(const canvas: tcanvas; const arect: rectty) override;
	constructor create(const aintf: icaptionframe; const stepintf: istepbar);
	destructor destroy; override;
	procedure createbuttonface;
	procedure createbuttonframe;
	procedure updatemousestate(const sender: twidget; const info: mouseeventinfoty); override;
	procedure mouseevent(var info: mouseeventinfoty); virtual;
	procedure domousewheelevent(var info: mousewheeleventinfoty); virtual;
	procedure checktemplate(const sender: tobject); override;
	procedure updatebuttonstate(const first,delta,count: integer);
	function canstep: boolean;
	function executestepevent(const event: stepkindty; const stepinfo: framestepinfoty; const aindex: integer): integer;

Properties

	property neededbuttons: stepkindsty read fneededbuttons write setneededbuttons;
	property buttonsize: integer read fbuttonsize write setbuttonsize default defaultstepbuttonsize;
	property colorbutton: colorty read fcolorbutton write setcolorbutton default cl_default;
	property colorglyph: colorty read fcolorglyph write setcolorglyph default cl_default;
	property buttonface: tface read getbuttonface write setbuttonface;
	property buttonframe: tframe read getbuttonframe write setbuttonframe;
	property disabledbuttons: stepkindsty read fdisabledbuttons write setdisabledbuttons default [];
	property buttonsinvisible: stepkindsty read fforceinvisiblebuttons write setbuttonsinvisible default [sk_first,sk_last];
	property buttonsvisible: stepkindsty read fforcevisiblebuttons write setbuttonsvisible default [];
	property buttonpos: stepbuttonposty read fbuttonpos write setbuttonpos default sbp_right;
	property buttonslast: boolean read fbuttonslast write setbuttonslast default false;
	property buttonsinline: boolean read fbuttonsinline write setbuttonsinline default false;
	property mousewheel: boolean read fmousewheel write fmousewheel default true;

Description

Fields

	fforceinvisiblebuttons: stepkindsty;

	fforcevisiblebuttons: stepkindsty;

	fstepstate: stepframestatesty;

	fdim: rectty;

Methods

	procedure dorepeat(const sender: tobject);

	procedure killrepeater;

	procedure layoutchanged;

	procedure updaterects; override;

	procedure getpaintframe(var frame: framety); override;

	procedure updatelayout;

	procedure execute(const tag: integer; const info: mouseeventinfoty);

	procedure setframeinstance(instance: tcustomframe);

	procedure setstaticframe(value: boolean);

	function getstaticframe: boolean;

	function getwidgetrect: rectty;

	function getcomponentstate: tcomponentstate;

	function getmsecomponentstate: msecomponentstatesty;

	procedure scrollwidgets(const dist: pointty);

	procedure clientrectchanged;

	procedure invalidate;

	procedure invalidatewidget;

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

	function getwidget: twidget;

	function getframestateflags: framestateflagsty; virtual;

	procedure internalpaintoverlay(const canvas: tcanvas; const arect: rectty) override;

	constructor create(const aintf: icaptionframe; const stepintf: istepbar);

	destructor destroy; override;

	procedure createbuttonface;

	procedure createbuttonframe;

	procedure updatemousestate(const sender: twidget; const info: mouseeventinfoty); override;

	procedure mouseevent(var info: mouseeventinfoty); virtual;

	procedure domousewheelevent(var info: mousewheeleventinfoty); virtual;

	procedure checktemplate(const sender: tobject); override;

	procedure updatebuttonstate(const first,delta,count: integer);

	function canstep: boolean;

	function executestepevent(const event: stepkindty; const stepinfo: framestepinfoty; const aindex: integer): integer;

Properties

	property neededbuttons: stepkindsty read fneededbuttons write setneededbuttons;

	property buttonsize: integer read fbuttonsize write setbuttonsize default defaultstepbuttonsize;

	property colorbutton: colorty read fcolorbutton write setcolorbutton default cl_default;

	property colorglyph: colorty read fcolorglyph write setcolorglyph default cl_default;

	property buttonface: tface read getbuttonface write setbuttonface;

	property buttonframe: tframe read getbuttonframe write setbuttonframe;

	property disabledbuttons: stepkindsty read fdisabledbuttons write setdisabledbuttons default [];

	property buttonsinvisible: stepkindsty read fforceinvisiblebuttons write setbuttonsinvisible default [sk_first,sk_last];

	property buttonsvisible: stepkindsty read fforcevisiblebuttons write setbuttonsvisible default [];

	property buttonpos: stepbuttonposty read fbuttonpos write setbuttonpos default sbp_right;

	property buttonslast: boolean read fbuttonslast write setbuttonslast default false;

	property buttonsinline: boolean read fbuttonsinline write setbuttonsinline default false;

	property mousewheel: boolean read fmousewheel write fmousewheel default true;