From 33ddd7a28bc5b605c0ce81068af81beef55e4598 Mon Sep 17 00:00:00 2001
From: Jonathan Jenne <j.jenne@digitaldata.works>
Date: Fri, 24 Sep 2021 15:47:47 +0200
Subject: [PATCH] disable regex in column configuration form

---
 app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb |  2 ++
 app/DD_PM_WINDREAM/frmControl_Detail.vb          | 15 ++++++++-------
 2 files changed, 10 insertions(+), 7 deletions(-)

diff --git a/app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb b/app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb
index aefae30..323a015 100644
--- a/app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb
+++ b/app/DD_PM_WINDREAM/frmControl_Detail.Designer.vb
@@ -279,6 +279,7 @@ Partial Class frmControl_Detail
         resources.ApplyResources(Me.REGEX_MATCHTextBox, "REGEX_MATCHTextBox")
         Me.REGEX_MATCHTextBox.MenuManager = Me.RibbonControl1
         Me.REGEX_MATCHTextBox.Name = "REGEX_MATCHTextBox"
+        Me.REGEX_MATCHTextBox.Properties.ReadOnly = True
         Me.REGEX_MATCHTextBox.StyleController = Me.LayoutControl1
         '
         'SimpleButton1
@@ -293,6 +294,7 @@ Partial Class frmControl_Detail
         resources.ApplyResources(Me.REGEX_MESSAGE_DETextBox, "REGEX_MESSAGE_DETextBox")
         Me.REGEX_MESSAGE_DETextBox.MenuManager = Me.RibbonControl1
         Me.REGEX_MESSAGE_DETextBox.Name = "REGEX_MESSAGE_DETextBox"
+        Me.REGEX_MESSAGE_DETextBox.Properties.ReadOnly = True
         Me.REGEX_MESSAGE_DETextBox.StyleController = Me.LayoutControl1
         '
         'SQL_COMMANDTextBox
diff --git a/app/DD_PM_WINDREAM/frmControl_Detail.vb b/app/DD_PM_WINDREAM/frmControl_Detail.vb
index d39009b..9ff11df 100644
--- a/app/DD_PM_WINDREAM/frmControl_Detail.vb
+++ b/app/DD_PM_WINDREAM/frmControl_Detail.vb
@@ -119,13 +119,14 @@ Public Class frmControl_Detail
     End Sub
 
     Private Sub SimpleButton1_Click(sender As Object, e As EventArgs) Handles SimpleButton1.Click
-        Dim oForm As New frmRegexEditor()
-        oForm.RegexString = REGEX_MATCHTextBox.Text
-
-        Dim oResult = oForm.ShowDialog()
-        If oResult = DialogResult.OK Then
-            REGEX_MATCHTextBox.Text = oForm.RegexString
-        End If
+        'TODO: Enable when regexes are implemented
+        'Dim oForm As New frmRegexEditor()
+        'oForm.RegexString = REGEX_MATCHTextBox.Text
+
+        'Dim oResult = oForm.ShowDialog()
+        'If oResult = DialogResult.OK Then
+        '    REGEX_MATCHTextBox.Text = oForm.RegexString
+        'End If
     End Sub
 
     Private Sub SimpleButton2_Click(sender As Object, e As EventArgs) Handles SimpleButton2.Click