Class tactivator

Unit

mseapplication

Declaration

type tactivator = class(tactcomponent)

Description

Hierarchy

• TObject
• TPersistent
• tcomponent
• tmsecomponent
• tactcomponent
• tactivator

Overview

Fields

	fclientnames: stringarty;
	fclients: pointerarty;

Methods

	procedure setactive(const avalue: boolean); override;
	procedure registerclient(const aclient: iobjectlink);
	procedure unregisterclient(const aclient: iobjectlink);
	procedure updateorder;
	function getclientnames: stringarty;
	procedure defineproperties(filer: tfiler); override;
	procedure doasyncevent(var atag: integer); override;
	procedure loaded; override;
	procedure unlink(const source,dest: iobjectlink; valuepo: pointer = nil); override;
	procedure objevent(const sender: iobjectlink; const event: objecteventty); override;
	procedure doterminated(const sender: tobject);
	constructor create(aowner: tcomponent); override;
	destructor destroy; override;
	class procedure addclient(const aactivator: tactivator; const aclient: iobjectlink; var dest: tactivator);
	procedure activaterecursive;
	procedure deactivaterecursive;
	procedure activateclients;
	procedure deactivateclients;

Properties

	property activated: boolean read factivated;
	property activecount: integer read factivecount;
	property clientinstances[constindex:integer]: tobject read getclientinstances;
	property clientinterfaces[constindex:integer]: iobjectlink read getclientinterfaces;
	property clientcount: integer read getclients;
	property clients: integer read getclients write setclients;
	property options: activatoroptionsty read foptions write setoptions default defaultactivatoroptions;
	property active: boolean read factive write setactive default false;
	property abortaction: activatorabortactionty read fabortaction write fabortaction default aaa_abortexception;
	property onbeforeactivate: notifyeventty read fonbeforeactivate write fonbeforeactivate;
	property onactivateerror: activateerroreventty read fonactivateerror write fonactivateerror;
	property onabort: activatoraborteventty read fonabort write fonabort;
	property onafteractivate: notifyeventty read fonafteractivate write fonafteractivate;
	property onbeforedeactivate: notifyeventty read fonbeforedeactivate write fonbeforedeactivate;
	property onafterdeactivate: notifyeventty read fonafterdeactivate write fonafterdeactivate;
	property activator;

Description

Fields

	fclientnames: stringarty;

	fclients: pointerarty;

Methods

	procedure setactive(const avalue: boolean); override;

	procedure registerclient(const aclient: iobjectlink);

	procedure unregisterclient(const aclient: iobjectlink);

	procedure updateorder;

	function getclientnames: stringarty;

	procedure defineproperties(filer: tfiler); override;

	procedure doasyncevent(var atag: integer); override;

	procedure loaded; override;

	procedure unlink(const source,dest: iobjectlink; valuepo: pointer = nil); override;

	procedure objevent(const sender: iobjectlink; const event: objecteventty); override;

	procedure doterminated(const sender: tobject);

	constructor create(aowner: tcomponent); override;

	destructor destroy; override;

	class procedure addclient(const aactivator: tactivator; const aclient: iobjectlink; var dest: tactivator);

	procedure activaterecursive;

	procedure deactivaterecursive;

	procedure activateclients;

	procedure deactivateclients;

Properties

	property activated: boolean read factivated;

	property activecount: integer read factivecount;

	property clientinstances[constindex:integer]: tobject read getclientinstances;

	property clientinterfaces[constindex:integer]: iobjectlink read getclientinterfaces;

	property clientcount: integer read getclients;

	property clients: integer read getclients write setclients;

	property options: activatoroptionsty read foptions write setoptions default defaultactivatoroptions;

	property active: boolean read factive write setactive default false;

	property abortaction: activatorabortactionty read fabortaction write fabortaction default aaa_abortexception;

	property onbeforeactivate: notifyeventty read fonbeforeactivate write fonbeforeactivate;

	property onactivateerror: activateerroreventty read fonactivateerror write fonactivateerror;

	property onabort: activatoraborteventty read fonabort write fonabort;

	property onafteractivate: notifyeventty read fonafteractivate write fonafteractivate;

	property onbeforedeactivate: notifyeventty read fonbeforedeactivate write fonbeforedeactivate;

	property onafterdeactivate: notifyeventty read fonafterdeactivate write fonafterdeactivate;

	property activator;