Объект LabelBlock представляет самый общий набор физических данных, который применим для метки блока.
Чтобы изменить физические свойства метки блока, необходимо сначала получить объект LabelBlock, используя свойство Content объекта Label, затем изменить объект LabelBlock, используя его свойства и методы, и вернуть его обратно объекту Label (задать свойству Content объекта Label значение LabelBlock). Смотрите примеры объектов Label
Точный тип объекта LabelBlock, который получается через Label.Content зависит от типа задачи:
|
Тип задачи |
Тип объекта LabelBlock |
|
Задача электростатики |
|
|
Задача нестационарного электрического поля |
|
|
Задача электрического поля постоянных токов |
|
|
Задача электрического поля переменных токов |
|
|
Задача магнитостатики и нестационарного магнитного поля |
|
|
Задача магнитного поля переменных токов |
|
|
Задача теплопередачи (стационарной и нестационарной) |
|
|
Задача теории упругости |
Объект LabelBlock имеет только те свойства, которые есть у каждого из его специальных типов:
|
Только для чтения |
Возвращает величину типа qfBlock, показывающую, какие данные может содержать метка блока. |
|
|
Только для чтения |
Возвращает тип задачи. |
|
|
Только для чтения |
Если имеет значение True, то физические данные содержат две координатных составляющих величины. |
|
|
Только для чтения |
Имеет значение True, если физические данные зависят от величины поля. |
|
|
Чтение и установка |
Имеет значение True, если физические данные зависят от направления (если есть), выбранного в полярной системе координат. |
|
|
Только для чтения |
Имеет значение True, если физические данные не указаны для этого объекта. |
|
|
Метод |
Удаляет физические данные, связанные с объектом LabelBlock. |
Каждый специальный объект LabelBlock наследует все методы и свойства базового объекта LabelBlock.
Следующий пример перебирает метки рёбер в документе и переводит все анизотропные данные в полярную систему координат:
dim lb As ELCUT.Label
For Each lb In prb.DataDoc.Labels(qfBlock)
Dim blockData As LabelBlock
Set blockData = lb.Content
With blockData
If .Anisotropic Then .Polar = True
End With
lb.Content = blockData
Next