sql editor and fix read only

app/DD-Record-Organiser/ClassControlBuilder.vb

@@ -587,10 +587,11 @@ Public Class ClassControlBuilder
                 control.Cursor = Cursors.Hand
             End If
 
-            If Not read_only Then
+            If Not read_only Or _designMode Then
                 Me.SetEventHandlers(control)
             End If
 
+
             Me.CurrentControl = DirectCast(control, TextBox)
             If Not IsNothing(parent) Then
                 control.Parent = parent
@@ -932,7 +933,7 @@ Public Class ClassControlBuilder
                 control.Size = New Size(vwidth, vheight)
             End If
 
-            If Not read_only Then
+            If Not read_only Or _designMode Then
                 Me.SetEventHandlers(control)
             End If
 
@@ -973,6 +974,8 @@ Public Class ClassControlBuilder
         control.Parent = _master_panel
         control.ReadOnly = read_only
 
+
+
         column.HeaderText = ""
         column.Name = "column1"
         control.Columns.Add(column)