Class tcustomtabwidget

Unit

msetabs

Declaration

type tcustomtabwidget = class(tactionwidget, iobjectpicker, istatfile)

Description

Hierarchy

• TObject
• TPersistent
• tcomponent
• tmsecomponent
• tactcomponent
• twidget
• tactionwidget
• tcustomtabwidget

Overview

Fields

	ftabs: tcustomtabbar1;
	fupdating: integer;
	fpopuptab: integer;
	factivepageindexdesign: integer;

Methods

	procedure defineproperties(filer: tfiler) override;
	procedure internaladd(const page: itabpage; aindex: integer);
	procedure internalremove(const page: itabpage);
	procedure registerchildwidget(const child: twidget); override;
	procedure unregisterchildwidget(const child: twidget); override;
	procedure pagechanged(const sender: itabpage);
	procedure GetChildren(Proc: TGetChildProc; Root: TComponent); override;
	procedure tabchanged(const synctabindex: boolean); virtual;
	procedure loaded; override;
	procedure clientrectchanged; override;
	procedure widgetregionchanged(const sender: twidget); override;
	procedure doactivepagechanged; virtual;
	procedure dopageadded(const apage: twidget); virtual;
	procedure dopageremoved(const apage: twidget); virtual;
	procedure createpagetab(const sender: tcustomtabbar; const index: integer; var tab: ttab);
	procedure dokeydown(var info: keyeventinfoty); override;
	procedure childmouseevent(const sender: twidget; var info: mouseeventinfoty); override;
	procedure dobeforepaint(const canvas: tcanvas); override;
	procedure doafterpaint(const canvas: tcanvas); override;
	procedure doclosepage(const sender: tobject); virtual;
	procedure updatepopupmenu(var amenu: tpopupmenu; var mouseinfo: mouseeventinfoty); override;
	procedure dostatread(const reader: tstatreader);
	procedure dostatwrite(const writer: tstatwriter);
	procedure statreading;
	procedure statread;
	function getstatvarname: msestring;
	function getstatpriority: integer;
	function checkpickoffset(const aoffset: pointty): pointty;
	function getcursorshape(const sender: tobjectpicker; var shape: cursorshapety): boolean;
	procedure getpickobjects(const sender: tobjectpicker; var objects: integerarty);
	procedure beginpickmove(const sender: tobjectpicker);
	procedure pickthumbtrack(const sender: tobjectpicker);
	procedure endpickmove(const sender: tobjectpicker);
	procedure cancelpickmove(const sender: tobjectpicker);
	procedure paintxorpic(const sender: tobjectpicker; const canvas: tcanvas);
	constructor create(aowner: tcomponent); override;
	destructor destroy; override;
	procedure createtabframe();
	procedure createtabface();
	procedure createtabfont();
	procedure createtabframetab();
	procedure createtabfacetab();
	procedure createtabfonttab();
	procedure createtabfaceactivetab();
	procedure createtabfontactivetab();
	procedure beginupdate;
	procedure endupdate;
	procedure synctofontheight; override;
	function indexof(const page: twidget): integer;
	function count: integer;
	procedure clear;
	procedure clearorder;
	procedure nextpage(newindex: integer; down: boolean);
	procedure changepage(step: integer);
	procedure movepage(const curindex,newindex: integer);
	procedure add(const aitem: itabpage; const aindex: integer = bigint);
	function pagebyname(const aname: string): twidget;

Properties

	property items[constindex:integer]: twidget read getitems;
	property itemsintf[constindex:integer]: itabpage read getitemsintf;
	property activepage: twidget read getactivepage write setactivepage;
	property activepageintf: itabpage read getactivepageintf;
	property idents: integerarty read getidents;
	property activepageindex: integer read getactivepageindex write setactivepageindex1 default -1;
	property onactivepagechanged: notifyeventty read fonactivepagechanged write fonactivepagechanged;
	property onpageadded: widgeteventty read fonpageadded write fonpageadded;
	property onpageremoved: widgeteventty read fonpageremoved write fonpageremoved;
	property optionswidget default defaulttaboptionswidget;
	property font: twidgetfont read getfont write setfont stored isfontstored;
	property fontempty: twidgetfontempty read getfontempty write setfontempty stored isfontemptystored;
	property tab_options: tabbaroptionsty read gettab_options write settab_options default [];
	property tab_frame: tstepboxframe1 read gettab_frame write settab_frame;
	property tab_face: tface read gettab_face write settab_face;
	property tab_color: colorty read gettab_color write settab_color default cl_default;
	property tab_colortab: colorty read gettab_colortab write settab_colortab default cl_default;
	property tab_coloractivetab: colorty read gettab_coloractivetab write settab_coloractivetab default cl_default;
	property tab_font: ttab_font read gettab_font write settab_font stored istab_fontstored;
	property tab_fonttab: ttab_fonttab read gettab_fonttab write settab_fonttab stored istab_fonttabstored;
	property tab_fontactivetab: ttab_fontactivetab read gettab_fontactivetab write set_tabfontactivetab stored istab_fontactivetabstored;
	property tab_imagepos: imageposty read gettab_imagepos write settab_imagepos default defaultimagepos;
	property tab_textflags: textflagsty read gettab_textflags write settab_textflags default defaultcaptiontextflags;
	property tab_width: integer read gettab_width write settab_width default 0;
	property tab_widthmin: integer read gettab_widthmin write settab_widthmin default 0;
	property tab_widthmax: integer read gettab_widthmax write settab_widthmax default 0;
	property tab_shift: integer read gettab_shift write settab_shift default defaulttabshift;
	property tab_edge_level: int32 read getedge_level write setedge_level default defaultedgelevel;
	property tab_edge_colordkshadow: colorty read getedge_colordkshadow write setedge_colordkshadow default cl_default;
	property tab_edge_colorshadow: colorty read getedge_colorshadow write setedge_colorshadow default cl_default;
	property tab_edge_colorlight: colorty read getedge_colorlight write setedge_colorlight default cl_default;
	property tab_edge_colorhighlight: colorty read getedge_colorhighlight write setedge_colorhighlight default cl_default;
	property tab_edge_colordkwidth: int32 read getedge_colordkwidth write setedge_colordkwidth default -1;
	property tab_edge_colorhlwidth: int32 read getedge_colorhlwidth write setedge_colorhlwidth default -1;
	property tab_edge_imagelist: timagelist read getedge_imagelist write setedge_imagelist;
	property tab_edge_imageoffset: int32 read getedge_imageoffset write setedge_imageoffset default 0;
	property tab_edge_imagepaintshift: int32 read getedge_imagepaintshift write setedge_imagepaintshift default 0;
	property tab_frametab: ttabframe read gettab_frametab write settab_frametab;
	property tab_facetab: tface read gettab_facetab write settab_facetab;
	property tab_faceactivetab: tface read gettab_faceactivetab write settab_faceactivetab;
	property tab_size: integer read ftab_size write settab_size;
	property tab_sizemin: integer read ftab_sizemin write settab_sizemin default defaulttabsizemin;
	property tab_sizemax: integer read ftab_sizemax write settab_sizemax default defaulttabsizemax;
	property tab_optionswidget: optionswidgetty read gettab_optionswidget write settab_optionswidget default defaultoptionswidgettab;
	property tab_optionsskin: optionsskinty read gettab_optionsskin write settab_optionsskin default [];
	property tab_optionswidget1: optionswidget1ty read gettab_optionswidget1 write settab_optionswidget1 default defaultoptionswidget1tab;
	property statfile: tstatfile read fstatfile write setstatfile;
	property statvarname: msestring read getstatvarname write fstatvarname;
	property statpriority: integer read fstatpriority write fstatpriority default 0;

Description

Fields

	ftabs: tcustomtabbar1;

	fupdating: integer;

	fpopuptab: integer;

	factivepageindexdesign: integer;

Methods

	procedure defineproperties(filer: tfiler) override;

	procedure internaladd(const page: itabpage; aindex: integer);

	procedure internalremove(const page: itabpage);

	procedure registerchildwidget(const child: twidget); override;

	procedure unregisterchildwidget(const child: twidget); override;

	procedure pagechanged(const sender: itabpage);

	procedure GetChildren(Proc: TGetChildProc; Root: TComponent); override;

	procedure tabchanged(const synctabindex: boolean); virtual;

	procedure loaded; override;

	procedure clientrectchanged; override;

	procedure widgetregionchanged(const sender: twidget); override;

	procedure doactivepagechanged; virtual;

	procedure dopageadded(const apage: twidget); virtual;

	procedure dopageremoved(const apage: twidget); virtual;

	procedure createpagetab(const sender: tcustomtabbar; const index: integer; var tab: ttab);

	procedure dokeydown(var info: keyeventinfoty); override;

	procedure childmouseevent(const sender: twidget; var info: mouseeventinfoty); override;

	procedure dobeforepaint(const canvas: tcanvas); override;

	procedure doafterpaint(const canvas: tcanvas); override;

	procedure doclosepage(const sender: tobject); virtual;

	procedure updatepopupmenu(var amenu: tpopupmenu; var mouseinfo: mouseeventinfoty); override;

	procedure dostatread(const reader: tstatreader);

	procedure dostatwrite(const writer: tstatwriter);

	procedure statreading;

	procedure statread;

	function getstatvarname: msestring;

	function getstatpriority: integer;

	function checkpickoffset(const aoffset: pointty): pointty;

	function getcursorshape(const sender: tobjectpicker; var shape: cursorshapety): boolean;

	procedure getpickobjects(const sender: tobjectpicker; var objects: integerarty);

	procedure beginpickmove(const sender: tobjectpicker);

	procedure pickthumbtrack(const sender: tobjectpicker);

	procedure endpickmove(const sender: tobjectpicker);

	procedure cancelpickmove(const sender: tobjectpicker);

	procedure paintxorpic(const sender: tobjectpicker; const canvas: tcanvas);

	constructor create(aowner: tcomponent); override;

	destructor destroy; override;

	procedure createtabframe();

	procedure createtabface();

	procedure createtabfont();

	procedure createtabframetab();

	procedure createtabfacetab();

	procedure createtabfonttab();

	procedure createtabfaceactivetab();

	procedure createtabfontactivetab();

	procedure beginupdate;

	procedure endupdate;

	procedure synctofontheight; override;

	function indexof(const page: twidget): integer;

	function count: integer;

	procedure clear;

	procedure clearorder;

	procedure nextpage(newindex: integer; down: boolean);

	procedure changepage(step: integer);

	procedure movepage(const curindex,newindex: integer);

	procedure add(const aitem: itabpage; const aindex: integer = bigint);

	function pagebyname(const aname: string): twidget;

Properties

	property items[constindex:integer]: twidget read getitems;

	property itemsintf[constindex:integer]: itabpage read getitemsintf;

	property activepage: twidget read getactivepage write setactivepage;

	property activepageintf: itabpage read getactivepageintf;

	property idents: integerarty read getidents;

	property activepageindex: integer read getactivepageindex write setactivepageindex1 default -1;

	property onactivepagechanged: notifyeventty read fonactivepagechanged write fonactivepagechanged;

	property onpageadded: widgeteventty read fonpageadded write fonpageadded;

	property onpageremoved: widgeteventty read fonpageremoved write fonpageremoved;

	property optionswidget default defaulttaboptionswidget;

	property font: twidgetfont read getfont write setfont stored isfontstored;

	property fontempty: twidgetfontempty read getfontempty write setfontempty stored isfontemptystored;

	property tab_options: tabbaroptionsty read gettab_options write settab_options default [];

	property tab_frame: tstepboxframe1 read gettab_frame write settab_frame;

	property tab_face: tface read gettab_face write settab_face;

	property tab_color: colorty read gettab_color write settab_color default cl_default;

	property tab_colortab: colorty read gettab_colortab write settab_colortab default cl_default;

	property tab_coloractivetab: colorty read gettab_coloractivetab write settab_coloractivetab default cl_default;

	property tab_font: ttab_font read gettab_font write settab_font stored istab_fontstored;

	property tab_fonttab: ttab_fonttab read gettab_fonttab write settab_fonttab stored istab_fonttabstored;

	property tab_fontactivetab: ttab_fontactivetab read gettab_fontactivetab write set_tabfontactivetab stored istab_fontactivetabstored;

	property tab_imagepos: imageposty read gettab_imagepos write settab_imagepos default defaultimagepos;

	property tab_textflags: textflagsty read gettab_textflags write settab_textflags default defaultcaptiontextflags;

	property tab_width: integer read gettab_width write settab_width default 0;

	property tab_widthmin: integer read gettab_widthmin write settab_widthmin default 0;

	property tab_widthmax: integer read gettab_widthmax write settab_widthmax default 0;

	property tab_shift: integer read gettab_shift write settab_shift default defaulttabshift;

	property tab_edge_level: int32 read getedge_level write setedge_level default defaultedgelevel;

	property tab_edge_colordkshadow: colorty read getedge_colordkshadow write setedge_colordkshadow default cl_default;

	property tab_edge_colorshadow: colorty read getedge_colorshadow write setedge_colorshadow default cl_default;

	property tab_edge_colorlight: colorty read getedge_colorlight write setedge_colorlight default cl_default;

	property tab_edge_colorhighlight: colorty read getedge_colorhighlight write setedge_colorhighlight default cl_default;

	property tab_edge_colordkwidth: int32 read getedge_colordkwidth write setedge_colordkwidth default -1;

	property tab_edge_colorhlwidth: int32 read getedge_colorhlwidth write setedge_colorhlwidth default -1;

	property tab_edge_imagelist: timagelist read getedge_imagelist write setedge_imagelist;

	property tab_edge_imageoffset: int32 read getedge_imageoffset write setedge_imageoffset default 0;

	property tab_edge_imagepaintshift: int32 read getedge_imagepaintshift write setedge_imagepaintshift default 0;

	property tab_frametab: ttabframe read gettab_frametab write settab_frametab;

	property tab_facetab: tface read gettab_facetab write settab_facetab;

	property tab_faceactivetab: tface read gettab_faceactivetab write settab_faceactivetab;

	property tab_size: integer read ftab_size write settab_size;

	property tab_sizemin: integer read ftab_sizemin write settab_sizemin default defaulttabsizemin;

	property tab_sizemax: integer read ftab_sizemax write settab_sizemax default defaulttabsizemax;

	property tab_optionswidget: optionswidgetty read gettab_optionswidget write settab_optionswidget default defaultoptionswidgettab;

	property tab_optionsskin: optionsskinty read gettab_optionsskin write settab_optionsskin default [];

	property tab_optionswidget1: optionswidget1ty read gettab_optionswidget1 write settab_optionswidget1 default defaultoptionswidget1tab;

	property statfile: tstatfile read fstatfile write setstatfile;

	property statvarname: msestring read getstatvarname write fstatvarname;

	property statpriority: integer read fstatpriority write fstatpriority default 0;

---

Generated by PasDoc 0.16.0.