Нашли ошибку? Выделите
текст с ошибкой и нажмите кнопку "Сообщить об ошибке"
или CTRL+ENTER.
Справочная
система на версию 10.1
от 27/06/2023,
© ООО «ФОРСАЙТ»,
ReleaseCellValue(Row: Integer; Column: Integer);
Row. Индекс строки.
Column. Индекс столбца.
Метод ReleaseCellValue копирует вычисленное значение указанной ячейки в исходный ряд.
После выполнения метода будет сброшена подсветка для ячеек, в которых текущее (отображаемое) значение отличается от того, что вычислено по формуле.
Для выполнения примера предполагается наличие формы, содержащей:
кнопку с идентификатором «Button1»;
компонент LanerBox;
компонент UiErAnalyzer с идентификатором «UiErAnalyzer1» и являющегося источником данных для LanerBox. В «UiErAnalyzer1» должна быть загружена рабочая книга базы данных временных рядов.
Добавьте ссылку на системную сборку «Drawing». Пример является обработчиком события OnClick для кнопки.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Eax: IEaxAnalyzer;
LanTable: ILanerTable;
Sheet: ITabSheet;
Range: ITabRange;
lcol, trow, rcol, brow, i, j, hHeight, hWidth: Integer;
HeaderSize: IGxSize;
Begin
Eax := UiErAnalyzer1.ErAnalyzer;
Eax.BeginUpdate;
LanTable := Eax.Laner.Execute;
Sheet := Eax.Grid.TabSheet;
Range := Sheet.View.Selection.Range;
lcol := Range.Left;
trow := Range.Top;
rcol := Range.Right;
brow := Range.Bottom;
HeaderSize := Eax.Grid.HeaderSize;
hHeight := HeaderSize.Height;
hWidth := HeaderSize.Width;
For i := trow To brow Do
For j := lcol To rcol Do
LanTable.ReleaseCellValue(i - hHeight, j - hWidth);
End For;
End For;
Eax.EndUpdate;
End Sub Button1OnClick;
После выполнения примера для ячеек рабочей книги будет выполнено копирование вычисленных значений в исходные ряды.
См. также: