TProjectStyle Class

Definition

A singleton to manage current style in the project and get its properties.

Delphi

type TProjectStyle = class(TObject)

Don't create or destroy instances of this class. Only use "Current()" method to access to its global unique instance.

Create	Instance constructor method for this class.
Destroy	Instance destructor method for this class. don't call it. Use ".Free()" or "FreeAndNil()".

StyleName	Name of the current style.
StylesCount	Number of available registered styles.
Styles[Integer]	Give access to each registered styles as style item instances.

Current	Returns the global TProjectStyle singleton class.
GetStyles(TProjectStyleType)	Returns an array of strings corresponding on registered styles name.
RegisterStyle(string, TProjectStyleType)	Add a style to the available styles for this project.