IStyleContainer.Key

Синтаксис

Key: Integer;

Описание

Свойство Key возвращает ключ контейнера стиля.

Пример

Sub Main;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    StyleSheet: IStyleSheet;
    Style: IStyleContainer;
    i: Integer;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById(
"Global_Style").Edit;
    StyleSheet := MObj 
As IStyleSheet;
    Style := StyleSheet.Add;
    i := Style.Key;
    MObj.Save;
End Sub Main;

После выполнения примера в таблицу стилей будет добавлен новый контейнер стиля, и в переменной «i» будет содержаться его ключ.

См. также:

IStyleContainer