IRubricatorFormulaData.FormulaKey

Синтаксис

FormulaKey: Integer;

Описание

Свойство FormulaKey возвращает ключ формулы.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1» и компонента Memo с наименованием «Memo1». В «Memo1» должна содержаться формула в виде XML кода. В репозитории должна присутствовать база данных временных рядов с идентификатором «OBJ_RUBRICATOR», содержащая справочник формул.

Пример будет выполняться при нажатии на кнопку.

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

Var

mb: IMetabase;

Rub: IMetabaseObject;

RubInst: IRubricatorInstance;

ForLoo: IRubricatorFormulasLookup;

formulaData: IRubricatorFormulaData;

Begin

mb := MetabaseClass.Active;

Rub := mb.ItemById("OBJ_RUBRICATOR").Edit;

RubInst := Rub.Open(Null) As IRubricatorInstance;

ForLoo := RubInst.CreateFormulasLookup;

ForLoo.WhereXML := Memo1.Text;

formulaData := ForLoo.LookupData;

Memo1.Clear;

If formulaData <> Null

Then Memo1.Text := "Формула найдена. Ключ формулы: " + formulaData.FormulaKey.ToString;

Else Memo1.Text := "Формула не найдена";

End If;

End Sub Button1OnClick;

После выполнения примера будет создан объект, осуществляющий поиск в базе данных временных рядов формулы по указанному XML коду. Если формула будет найдена, то в «Memo1» будет выведен ее ключ.

См. также:

IRubricatorFormulaData