Class tdbbooleaneditradio

Unit

msedbedit

Declaration

type tdbbooleaneditradio = class(tcustombooleaneditradio, idbeditfieldlink, ireccontrol)

Description

Hierarchy

• TObject
• TPersistent
• tcomponent
• tmsecomponent
• tactcomponent
• twidget
• tactionwidget
• tactionpublishedwidgetnwr
• tactionpublishedwidget
• tgraphdataedit
• ttogglegraphdataedit
• tcustombooleanedit
• tcustombooleaneditradio
• tdbbooleaneditradio

Overview

Methods

	procedure defineproperties(filer: tfiler); override;
	procedure griddatasourcechanged; override;
	function getgriddatasource: tdatasource;
	function createdatalist(const sender: twidgetcol): tdatalist; override;
	function checkvalue(const quiet: boolean = false): boolean; reintroduce;
	function docheckvalue(var avalue; const quiet: boolean): boolean; override;
	procedure modified; override;
	procedure doshortcut(var info: keyeventinfoty; const sender: twidget); override;
	function getrowdatapo(const arow: integer): pointer; override;
	procedure valuetofield;
	procedure fieldtovalue;
	procedure getfieldtypes(var afieldtypes: fieldtypesty);
	procedure setmaxlength(const avalue: integer);
	function getfieldlink: tcustomeditwidgetdatalink;
	procedure recchanged;
	constructor create(aowner: tcomponent); override;
	destructor destroy; override;

Properties

	property datalink: teditwidgetdatalink read fdatalink write setdatalink;
	property onsetvalue;
	property bounds_cx default defaultboxsize;
	property bounds_cy default defaultboxsize;
	property group;

Description

Methods

	procedure defineproperties(filer: tfiler); override;

	procedure griddatasourcechanged; override;

	function getgriddatasource: tdatasource;

	function createdatalist(const sender: twidgetcol): tdatalist; override;

	function checkvalue(const quiet: boolean = false): boolean; reintroduce;

	function docheckvalue(var avalue; const quiet: boolean): boolean; override;

	procedure modified; override;

	procedure doshortcut(var info: keyeventinfoty; const sender: twidget); override;

	function getrowdatapo(const arow: integer): pointer; override;

	procedure valuetofield;

	procedure fieldtovalue;

	procedure getfieldtypes(var afieldtypes: fieldtypesty);

	procedure setmaxlength(const avalue: integer);

	function getfieldlink: tcustomeditwidgetdatalink;

	procedure recchanged;

	constructor create(aowner: tcomponent); override;

	destructor destroy; override;

Properties

	property datalink: teditwidgetdatalink read fdatalink write setdatalink;

	property onsetvalue;

	property bounds_cx default defaultboxsize;

	property bounds_cy default defaultboxsize;

	property group;