ITabSheet.Columns

Синтаксис

Columns(Start: Integer; Finish: Integer): ITabRange;

Параметры

Start. Номер первого столбца диапазона.

Finish. Номер последнего столбца диапазона.

Допустимое значение всех параметров находится в диапазоне [0; ColumnsCount).

Описание

Свойство Columns возвращает столбцы таблицы, диапазон которых передается в качестве входных параметров Start и Finish.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента UiTabSheet с наименованием «UiTabSheet1» и компонента TabSheetBox.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Tab: ITabSheet;
Begin
    Tab := UiTabSheet1.TabSheet;
    Tab.RowsCount := 5;
    Tab.ColumnsCount := 5;
    Tab.Columns(01).Value := 10;
    Tab.Rows(01).Value := 10;
End Sub Button1OnClick;

Sub Button2OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    r, c: integer;
    Tab: ITabSheet;
Begin
    Tab := UiTabSheet1.TabSheet;
    r := Tab.MaxUsedRow;
    c := Tab.MaxUsedColumn;
    Self.Text := "Количество используемых строк: " + r.ToString + ". Количество используемых столбцов: " + c.ToString;
End Sub Button2OnClick;

После нажатия на кнопку «Button1» будет ограничено количество строк и столбцов до 5. Столбцам и строкам будут присвоены значения «10». При нажатии на кнопку «Button2» в заголовке формы будет отображен максимальный индекс строк и столбцов.

См. также:

ITabSheet