IStyleSheet.FindByKey

Синтаксис

FindByKey(Key: Integer): IStyleContainer;

Параметры

Key - ключ контейнера стиля, по которому осуществляется поиск.

Описание

Метод FindByKey осуществляет поиск по ключу и возвращает контейнер стиля из таблицы стилей. Ключ, по которому осуществляется поиск, передается посредством параметра Key.

Пример

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

StyleSheet: IStyleSheet;

Style: IStyleContainer;

TabSty: ITabCellStyle;

Begin

MB := MetabaseClass.Active;

MObj := MB.ItemById("Global_Style").Edit;

StyleSheet := MObj As IStyleSheet;

Style := StyleSheet.FindByKey(4);

If Style <> Null Then

TabSty := New TabCellStyle.Create;

TabSty.LoadFromContainer(Style);

TabSty.Font.Size := TabSty.Font.Size * 2;

TabSty.SaveToContainer(Style);

End If;

MObj.Save;

End Sub Main;

После выполнения примера будет осуществлен поиск контейнера стиля с ключом "4", и в случае удачного поиска для стиля, содержащегося в данном контейнере, будет увеличен размер шрифта в два раза.

См. также:

IStyleSheet