IMetabaseCustomExtender.ResetObjectImages

Syntax

ResetObjectImages();

Description

The ResetObjectImages method sets system icons for classes.

Example

To execute the example, create a form and place a button on it.

Add a link to the Metabase system assembly.

The example is an event handler for the following button:

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    MB: IMetabase;
    Extender: IMetabaseCustomExtender;
Begin
    MB := MetabaseClass.Active;
    Extender := MB.SpecialObject(MetabaseSpecialObject.CustomExtender).Edit As IMetabaseCustomExtender;
    Extender.ResetObjectImages;
    (Extender As IMetabaseObject).Save;
End Sub Button1OnClick;

After executing the example the system icons will be used for the classes.