fix a fucking idiot snappanel

This commit is contained in:
Jonathan Jenne
2021-03-12 16:27:02 +01:00
parent 60104989ab
commit 56106732c7
9 changed files with 1259 additions and 1567 deletions

View File

@@ -3664,19 +3664,20 @@ Public Class frmValidator
Private Sub btnSave_Click(sender As System.Object, e As System.EventArgs) Handles btnSave.Click
btnSave.Enabled = False
Dim oGrids = (From oControl In pnldesigner.Controls
Where TypeOf oControl Is GridControl
Select oControl).ToList()
' TODO: Use when working on Validation
'Dim oGrids = (From oControl In pnldesigner.Controls
' Where TypeOf oControl Is GridControl
' Select oControl).ToList()
For Each oGrid As GridControl In oGrids
Dim oView As GridView = oGrid.MainView
'For Each oGrid As GridControl In oGrids
' Dim oView As GridView = oGrid.MainView
For index = 0 To oView.RowCount - 1
oView.FocusedRowHandle = index
oView.UpdateCurrentRow()
Next
' For index = 0 To oView.RowCount - 1
' oView.FocusedRowHandle = index
' oView.UpdateCurrentRow()
' Next
Next
'Next
'Return