T__StyleContainerAncestor Class

Definition

Ancestor class of your styles containers.

Delphi
type T__StyleContainerAncestor = class(TDataModule)
Inheritance
TDataModule
T__StyleContainerAncestor
Derived

Remarks

In your projects : - create a descendant of this class for each style you want to use - override GetStyleName and GetStyleType functions - call the class procedure RegisterStyle() of your class in the initialization section of its unit.

Methods

GetStyleName

Returns the name of this style. This name could to be shown to end users.

GetStyleType

Returns the type (dark, light, other) of this style. It's used in the default style selection form.

Initialize

DEPRECATED. Used to register the style in the available styles list.

ReceivedProjectStyleChangeMessage(TObject, TMessage)
RegisterStyle

Register this style in the available styles list if current platform is available.

Fields