Class tcustomrealedit

Unit

msedataedits

Declaration

type tcustomrealedit = class(tnumedit)

Description

Hierarchy

• TObject
• TPersistent
• tcomponent
• tmsecomponent
• tactcomponent
• twidget
• tactionwidget
• tactionpublishedwidgetnwr
• tpublishedwidgetnwr
• tpublishedwidget
• tcustomedit
• tcustomdataedit
• tdataedit
• tnumedit
• tcustomrealedit

Overview

Fields

	fvalue: realty;
	fvaluedefault: realty;
	fvaluemin: realty;
	fvaluemax: realty;

Methods

	procedure setvaluedata(const source); override;
	procedure getvaluedata(out dest); override;
	procedure updatedatalist; override;
	procedure setvaluemin(const avalue: realty); virtual;
	procedure setvaluemax(const avalue: realty); virtual;
	function gettextvalue(var accept: boolean; const quiet: boolean): realty; virtual;
	procedure texttovalue(var accept: boolean; const quiet: boolean); override;
	function internaldatatotext(const data): msestring; override;
	procedure texttodata(const atext: msestring; var data); override;
	function createdatalist(const sender: twidgetcol): tdatalist; override;
	function getdatalistclass: datalistclassty; override;
	procedure valuetogrid(arow: integer); override;
	procedure gridtovalue(arow: integer); override;
	procedure defineproperties(filer: tfiler); override;
	procedure readstatvalue(const reader: tstatreader); override;
	procedure writestatvalue(const writer: tstatwriter); override;
	function getdefaultvalue: pointer; override;
	procedure setnullvalue(); override;
	procedure updatereadonlystate(); override;
	constructor create(aowner: tcomponent); override;
	procedure fillcol(const value: realty);
	procedure assigncol(const value: trealdatalist);
	function isnull: boolean; override;
	function griddata: tgridrealdatalist;

Properties

	property asstring: msestring read getasstring write setasstring;
	property asinteger: integer read getasinteger write setasinteger;
	property ascurrency: currency read getascurrency write setascurrency;
	property onsetvalue: setrealeventty read fonsetvalue write fonsetvalue;
	property onsetintvalue: setintegereventty read fonsetintvalue write fonsetintvalue;
	property value: realty read fvalue write setvalue ;
	property intvalue: integer read getintvalue write setintvalue;
	property valuedefault: realty read fvaluedefault write fvaluedefault ;
	property formatedit: msestring read fformatedit write setformatedit;
	property formatdisp: msestring read fformatdisp write setformatdisp;
	property valuerange: real read fvaluerange write setvaluerange;
	property valuestart: real read fvaluestart write setvaluestart;
	property valuemin: realty read fvaluemin write setvaluemin;
	property valuemax: realty read fvaluemax write setvaluemax;
	property gridvalue[constindex:integer]: realty read getgridvalue write setgridvalue;
	property gridintvalue[constindex:integer]: integer read getgridintvalue write setgridintvalue;
	property gridvalues: realarty read getgridvalues write setgridvalues;
	property gridintvalues: integerarty read getgridintvalues write setgridintvalues;
	property ifilink: tifireallinkcomp read getifilink write setifilink;
	property optionswidget default defaulteditwidgetoptions + [ow_mousewheel];

Description

Fields

	fvalue: realty;

	fvaluedefault: realty;

	fvaluemin: realty;

	fvaluemax: realty;

Methods

	procedure setvaluedata(const source); override;

	procedure getvaluedata(out dest); override;

	procedure updatedatalist; override;

	procedure setvaluemin(const avalue: realty); virtual;

	procedure setvaluemax(const avalue: realty); virtual;

	function gettextvalue(var accept: boolean; const quiet: boolean): realty; virtual;

	procedure texttovalue(var accept: boolean; const quiet: boolean); override;

	function internaldatatotext(const data): msestring; override;

	procedure texttodata(const atext: msestring; var data); override;

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

	function getdatalistclass: datalistclassty; override;

	procedure valuetogrid(arow: integer); override;

	procedure gridtovalue(arow: integer); override;

	procedure defineproperties(filer: tfiler); override;

	procedure readstatvalue(const reader: tstatreader); override;

	procedure writestatvalue(const writer: tstatwriter); override;

	function getdefaultvalue: pointer; override;

	procedure setnullvalue(); override;

	procedure updatereadonlystate(); override;

	constructor create(aowner: tcomponent); override;

	procedure fillcol(const value: realty);

	procedure assigncol(const value: trealdatalist);

	function isnull: boolean; override;

	function griddata: tgridrealdatalist;

Properties

	property asstring: msestring read getasstring write setasstring;

	property asinteger: integer read getasinteger write setasinteger;

	property ascurrency: currency read getascurrency write setascurrency;

	property onsetvalue: setrealeventty read fonsetvalue write fonsetvalue;

	property onsetintvalue: setintegereventty read fonsetintvalue write fonsetintvalue;

	property value: realty read fvalue write setvalue ;

	property intvalue: integer read getintvalue write setintvalue;

	property valuedefault: realty read fvaluedefault write fvaluedefault ;

	property formatedit: msestring read fformatedit write setformatedit;

	property formatdisp: msestring read fformatdisp write setformatdisp;

	property valuerange: real read fvaluerange write setvaluerange;

	property valuestart: real read fvaluestart write setvaluestart;

	property valuemin: realty read fvaluemin write setvaluemin;

	property valuemax: realty read fvaluemax write setvaluemax;

	property gridvalue[constindex:integer]: realty read getgridvalue write setgridvalue;

	property gridintvalue[constindex:integer]: integer read getgridintvalue write setgridintvalue;

	property gridvalues: realarty read getgridvalues write setgridvalues;

	property gridintvalues: integerarty read getgridintvalues write setgridintvalues;

	property ifilink: tifireallinkcomp read getifilink write setifilink;

	property optionswidget default defaulteditwidgetoptions + [ow_mousewheel];