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(0, 1).Value := 10;
Tab.Rows(0, 1).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» в заголовке формы будет отображен максимальный индекс строк и столбцов.
См. также: