IMetabaseManager.Classes

Syntax

Description

The Classes property returns the collection of object classes available in the platform.

Comments

The property returns the collection of only system classes implemented in the platform.

Example

To execute the example, add a link to the Metabase assembly.

Sub UserProc;
Var
    Man: IMetabaseManager;
    Classes: IDbClasses;
    Cls: IDbClass;
    i, c: Integer;
Begin
    Man := MetabaseManagerFactory.Active;
    Classes := Man.Classes;
    c := Classes.Count;
    For i := 0 To c - 1 Do
        Cls := Classes.Item(i);
        Debug.WriteLine("Class: " + Cls.Name + " (Identifier: " + Cls.Id + "; Key: " + Cls.Key.ToString + ')');
    End For;
End Sub UserProc;

After executing the example the development environment console displays information about all object classes available in the platform.