IDbClass.IsObsolete

Синтаксис

IsObsolete: Boolean;

Описание

Свойство IsObsolete возвращает признак того, является ли класс устаревшим.

Комментарии

Если класс является устаревшим, то возвращается значение True, иначе - False.

Пример

Для выполнения примера подключите ссылку на системную сборку Metabase.

Sub Main;
Var
    Man: IMetabase;
    Classes: IDbClasses;
    Cl: IDbClass;
    i: Integer;
Begin
    Man := MetabaseManagerFactory.Active;
    Classes := Man.Classes;
    For i := 0 To Classes.Count - 1 Do
        Cl := Classes.Item(i);
        Debug.WriteLine("Наименование: " + Cl.Name + "; Устарел: " + Cl.IsObsolete.ToString);
    End For;
End Sub Main;

После выполнения примера в консоль будет выведен список наименований классов объектов репозитория и сообщения о том, являются ли эти классы устаревшими.

См. также:

IDbClass