diff --git a/app/DD_PM_WINDREAM/ClassControlCreator.vb b/app/DD_PM_WINDREAM/ClassControlCreator.vb
index 4aeb9ba..624eec3 100644
--- a/app/DD_PM_WINDREAM/ClassControlCreator.vb
+++ b/app/DD_PM_WINDREAM/ClassControlCreator.vb
@@ -331,6 +331,7 @@ Public Class ClassControlCreator
     Public Shared Function CreateExistingLookupControl(row As DataRow, designMode As Boolean) As LookupControl2
         Dim control As LookupControl2 = CreateBaseControl(New LookupControl2(), row, designMode)
         control.Width = row.Item("WIDTH")
+        control.ReadOnly = row.Item("READ_ONLY")
 
         If designMode Then
             control.Cursor = Cursors.Hand