actually apply readonly to lookupgrid :D
This commit is contained in:
parent
4e651f99a1
commit
c8eab919ef
@ -331,6 +331,7 @@ Public Class ClassControlCreator
|
|||||||
Public Shared Function CreateExistingLookupControl(row As DataRow, designMode As Boolean) As LookupControl2
|
Public Shared Function CreateExistingLookupControl(row As DataRow, designMode As Boolean) As LookupControl2
|
||||||
Dim control As LookupControl2 = CreateBaseControl(New LookupControl2(), row, designMode)
|
Dim control As LookupControl2 = CreateBaseControl(New LookupControl2(), row, designMode)
|
||||||
control.Width = row.Item("WIDTH")
|
control.Width = row.Item("WIDTH")
|
||||||
|
control.ReadOnly = row.Item("READ_ONLY")
|
||||||
|
|
||||||
If designMode Then
|
If designMode Then
|
||||||
control.Cursor = Cursors.Hand
|
control.Cursor = Cursors.Hand
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user