jj: Required/Readonly überprüfen

This commit is contained in:
Jonathan Jenne 2018-06-04 13:15:47 +02:00
parent bf985f81e6
commit 748850991f
2 changed files with 16 additions and 5 deletions

View File

@ -264,6 +264,11 @@ Public Class ClassControlCreator
control.AutoSize = True
control.Text = row.Item("CTRL_TEXT")
If Not designMode Then
control.Enabled = Not row.Item("READ_ONLY")
control.TabStop = Not row.Item("READ_ONLY")
End If
Return control
End Function
@ -283,6 +288,11 @@ Public Class ClassControlCreator
col.Width = control.Width - 30
control.Columns.Add(col)
If Not designMode Then
control.Enabled = Not row.Item("READ_ONLY")
control.TabStop = Not row.Item("READ_ONLY")
End If
Return control
End Function
@ -305,6 +315,11 @@ Public Class ClassControlCreator
control.Columns.Add(col)
Next
If Not designMode Then
control.Enabled = Not row.Item("READ_ONLY")
control.TabStop = Not row.Item("READ_ONLY")
End If
Return control
End Function

View File

@ -1,15 +1,11 @@
Imports WINDREAMLib
Imports DLLLicenseManager
Imports DevExpress.LookAndFeel
Imports DevExpress.LookAndFeel
Imports System.Globalization
Imports DevExpress.Utils
Imports DevExpress.XtraGrid.Views.Grid.ViewInfo
Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraGrid
Imports System.Collections.ObjectModel
Imports DevExpress.XtraNavBar
Imports DevExpress.XtraGrid.Columns
Imports DevExpress.Images
Imports DevExpress.XtraCharts
Public Class frmMain