From 3ac505ae1b0444caf7f7ff531c813e31b01dbfd7 Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 14 May 2019 13:33:23 +0200 Subject: [PATCH] validation --- app/DD_PM_WINDREAM/ClassControlCreator.vb | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/app/DD_PM_WINDREAM/ClassControlCreator.vb b/app/DD_PM_WINDREAM/ClassControlCreator.vb index 4938526..867690c 100644 --- a/app/DD_PM_WINDREAM/ClassControlCreator.vb +++ b/app/DD_PM_WINDREAM/ClassControlCreator.vb @@ -374,13 +374,20 @@ Public Class ClassControlCreator oControl.DataSource = oDatatable - AddHandler oView.CellValueChanged, Function(sender As Object, e As CellValueChangedEventArgs) - ' TODO: Do the validation - End Function + AddHandler oView.CellValueChanged, AddressOf HandleCellValueChanged Return oControl End Function + Public Shared Function HandleCellValueChanged(sender As Object, e As CellValueChangedEventArgs) + ' TODO: Do the validation + Dim oCurrentView As GridView = DirectCast(sender, GridView) + Dim oCurrentControl As GridControl = oCurrentView.GridControl + Dim oCurrentDatasource As DataTable = oCurrentControl.DataSource + Dim oColumn = oCurrentDatasource.Columns.Item(e.Column.FieldName) + + Dim foo = 1 + End Function Public Shared Function CreateExistingLine(row As DataRow, designMode As Boolean) As LineLabel Dim control As LineLabel = CreateBaseControl(New LineLabel(), row, designMode)