Value: Variant;
Value: Variant;
Свойство Value определяет значение, которое будет содержаться в ячейке после завершения редактирования.
Используя данное свойство можно изменить значение ячейки перед завершением редактирования.
Для выполнения примера предполагается наличие формы, расположенного на ней компонента LanerBox с наименованием «LanerBox1» и компонента UiErAnalyzer являющегося источником данных для «LanerBox1». UiErAnalyzer подключен к какой-либо рабочей книге базы данных временных рядов.
Данная процедура установлена в качестве обработчика события OnBeforeCellChange компонента «LanerBox1».
Sub LanerBox1OnBeforeCellChange(Sender: Object; Args: ITabCellBeforeChangeBaseEventArgs);
Var
New_val, Old_val: Variant;
Begin
Old_val := Args.TabSheet.CellValue(Args.Row, Args.Column);
New_val := Args.Value;
End Sub LanerBox1OnBeforeCellChange;
После выполнения события в переменной «Old_val» будет содержаться старое значение ячейки, а в переменной «New_val» - значение, которое будет занесено в ячейку после завершения редактирования.
Для выполнения примера предполагается наличие формы, расположенного на ней компонента LanerBoxNet с наименованием «LanerBoxNet1» и компонента UiErAnalyzerNet являющегося источником данных для «LanerBoxNet1». UiErAnalyzerNet подключен к какой-либо рабочей книге базы данных временных рядов.
Данная процедура установлена в качестве обработчика события OnBeforeCellChange компонента «LanerBoxNet1».
Private Sub lanerBoxNet1_OnBeforeCellChange(Sender: System.Object; Args: Prognoz.Platform.Interop.Tab.TabCellBeforeChangeBaseEventArgs);
Var
New_val, Old_val: object;
Begin
Old_val := Args.TabSheet.CellValue[Args.Row, Args.Column];
New_val := Args.Value;
End Sub;
После выполнения события в переменной «Old_val» будет содержаться старое значение ячейки, а в переменной «New_val» - значение, которое будет занесено в ячейку после завершения редактирования.
См. также: