background color

This commit is contained in:
Jonathan Jenne
2019-10-17 14:19:28 +02:00
parent 037b7c6748
commit 8004ce4ffd
3 changed files with 56 additions and 29 deletions

View File

@@ -47,7 +47,7 @@ Public Class ClassControlCreator
Public Class ControlMetadata
Public Guid As Integer
Public [ReadOnly] As Boolean
Public [ReadOnly] As Boolean = False
End Class
Private Shared Function TransformDataRow(row As DataRow) As ControlDBProps
@@ -82,7 +82,6 @@ Public Class ClassControlCreator
.Guid = props.Guid,
.ReadOnly = props.ReadOnly
}
'ctrl.Tag = props.Guid
ctrl.Name = props.Name
ctrl.Location = props.Location
ctrl.Font = props.Font
@@ -93,7 +92,7 @@ Public Class ClassControlCreator
End If
If props.ReadOnly Then
ctrl.BackColor = Color.Gray
ctrl.BackColor = Color.LightGray
End If
Return ctrl