ICalcCubeFormulaEdit.PutCoord

Syntax

PutCoord(Coord: ICalculatedCubeInstanceCoord; [Position: Integer = -1]): Integer;

Parameters

Coord - a cube coordinate, for which a term should be created in the editor.

Position - position in the editor to which the term is placed. Position number is determined in symbols. By default value -1 is passed, the term is inserted to the end of expression.

Description

The PutCoord method places the term to the editor corresponding to the specified cube coordinate and returns its number in the collection of component terms.

Example

Executing the example requires that the repository contains a form with the Button1 button and the CalcCubeFormulaEdit component named CalcCubeFormulaEdit1. Also repository contains a calculated cube with the ID Calc_Cube. This cube has an unrecorded dimension.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

MB: IMetabase;

CubeInst: ICalculatedCubeInstance;

Coord: ICalculatedCubeInstanceCoord;

Terms: ITermList;

i: Integer;

Begin

MB := MetabaseClass.Active;

CubeInst := MB.ItemById("Calc_Cube").Open(Null) As ICalculatedCubeInstance;

CalcCubeFormulaEdit1.Cube := CubeInst;

Coord := CubeInst.CreateCoord;

//The first coordinate

Coord.MatrixCoord.Item(0) := 0;

CalcCubeFormulaEdit1.PutCoord(Coord, 0);

Terms := CalcCubeFormulaEdit1.Terms;

i := Terms.Item(0).Text.Length;

//Sign +

CalcCubeFormulaEdit1.PutLiteral("+");

//The second coordinate

Coord.MatrixCoord.Item(0) := 1;

i := i + Terms.Item(1).Text.Length;

CalcCubeFormulaEdit1.PutCoord(Coord, i);

End Sub Button1OnClick;

After executing the example on clicking the button and data source, the cube with the Calc_Cube identifier is set for the CalcCubeFormulaEdit1 component. A component editing field contains three terms: two terms for cube coordinates and literal term corresponding to + sign.