DataRights(Row: Integer; Column: Integer): CubeDataRights;
Row. Row index.
Column. Column index.
The DataRights property returns the information about the data access permissions for a defined cell.
Executing the example requires a form with the following components: the Button component named Button1, the TabSheetBox component named TabSheetBox1, and the UiErAnalyzer component named UiErAnalyzer1. UiErAnalyzer1 is a data source for TabSheetBox1. A workbook of the time series database should be loaded to UiErAnalyzer1.
The example is a handler of the OnClick event for the Button1 component.
Add links to the Cubes, Express, ExtCtrls, Forms, Laner, MathFin, and Tab system assemblies.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
EaxAn: IEaxAnalyzer;
Laner: ILaner;
Tbl: ILanerTable;
Col, Row: Integer;
Begin
EaxAn := UiErAnalyzer1.ErAnalyzer;
Laner := EaxAn.Laner;
Tbl := Laner.Execute;
Tbl.Edit;
For Col := 0 To Tbl.ColumnCount - 1 Do
For Row := 0 To Tbl.RowCount - 1 Do
If Tbl.DataRights(Row, Col) = CubeDataRights.ReadWrite Then
Tbl.Cell(Row, Col) := Math.RandBetweenI(0, 5);
End If;
End For;
End For;
End Sub Button1OnClick;
After executing the example the data in the table cells is changed if the data read and change access permissions are available.
See also: