Class tactivatorcontroller

Unit

mseapplication

Declaration

type tactivatorcontroller = class(tlinkedpersistent)

Description

Hierarchy

• TObject
• tpersistent
• tvirtualpersistent
• tnullinterfacedpersistent
• tlinkedpersistent
• tactivatorcontroller

Overview

Fields

	fowner: tcomponent;
	fintf: iactivatorclient;

Methods

	function getinstance: tobject; override;
	procedure objectevent(const sender: tobject; const event: objecteventty); override;
	procedure setowneractive(const avalue: boolean); virtual; abstract;
	constructor create(const aowner: tcomponent; const aintf: iactivatorclient); reintroduce;
	function setactive(const value : boolean): boolean;
	procedure loaded;

Properties

property activator: tactivator read factivator write setactivator;

Description

Fields

	fowner: tcomponent;

	fintf: iactivatorclient;

Methods

	function getinstance: tobject; override;

	procedure objectevent(const sender: tobject; const event: objecteventty); override;

	procedure setowneractive(const avalue: boolean); virtual; abstract;

	constructor create(const aowner: tcomponent; const aintf: iactivatorclient); reintroduce;

	function setactive(const value : boolean): boolean;

	procedure loaded;

Properties

	property activator: tactivator read factivator write setactivator;