Коллекция Columns объектов TableColumn хранит все столбцы в окне таблицы (объект TableWindow). Коллекция доступна через свойство Columns объекта TableWindow. Методы и свойства коллекции Columns позволяют перебирать столбцы, добавлять и удалать столбцы из коллекции и изменять заголовки столбцов.
Как и любая другая коллекция, коллекция Columns имеет свойство Count, которое возвращает количество столбцов в таблице, и метод Item, который возвращает выбранный столбец (объект TableColumn) из коллекции. При использовании метода Item можно сослаться на столбец по его номеру (номер первого, крайнего левого столбца равен 1, последний, самый правый столбец имеет номер, равный Columns.Count), или по физической величине, которая отображается в столбце (имеет тип QfQuantity). Метод Item используется по умолчанию для коллекции Columns, поэтому его можно не писать. Невозможно изменить порядок столбцов в таблице - это жестко задано для каждого типа задач.
Коллекция Columns имеет следующие методы и свойства:
|
Метод Item (index типа Long,
|
Возвращает столбец таблицы (объект TableColumn) по его номеру (считая слева) или через соответствующую физическую величину. |
|
Свойство Count. Тип Long.
|
Возвращает число столбцов в таблице |
|
Метод Add (quantity типа QfQuantity). Тип TableColumn. |
Добавляет новый столбец (объект TableColumn) соответствующий заданной физической величине, или возвращает столбец, если тот уже есть в таблице. |
|
Метод Remove (col типа TableColumn). |
Удаляет столбец из таблицы. |
|
Метод SetWidth (w типа qfColWidth).
|
Устанавливает ширину столбцов таблицы по содержимому столбца или заголовка. |
|
Свойство ShowNotation. Тип Boolean.
|
Включает и выключает показ обозначения физической величины в заголовке столбцов таблицы. |
|
Свойство ShowUnit. Тип Boolean.
|
Включает и выключает показ размерности физической величины в заголовке столбцов таблицы. |
|
Свойство ShowDescription. Тип Boolean.
|
Включает и выключает показ названия физической величины в заголовке столбцов таблицы. |
Следующий пример создает окно таблицы (объект TableWindow), включает показ названия физической величины и устанавливает ширину столбца по заголовку. Потом удаляются первые 10 столбцов из таблицы и вставляется столбец, отображающий расстояние от начала контура.
dim res As ELCUT.Result
dim cont As ELCUT.Contour
.......
dim table As ELCUT.TableWindow
dim col As ELCUT.TableColumn
set table = res.GetTable(cont)
table.Columns.ShowDescription = True
table.Columns.SetWidth (qfByHeader)
For i = 1 To 10
Set col = table.Columns(1) ' получение самого левого столбца
If Not col Is Nothing Then
table.Columns.Remove col
' и его удаление
End If
Next
set col = table.Columns.Add(qfCoordL)