Berechnung Spalten start

app/TaskFlow/ControlCreator/GridControl.vb

@@ -57,7 +57,16 @@ Namespace ControlCreator
                     Case Else
                         oColumn.DataType = GetType(String)
                 End Select
-
+                Dim oFormulaExpression = ObjectEx.NotNull(oRow.Item("FORMULA_EXPRESSION"), String.Empty)
+                If oFormulaExpression <> String.Empty Then
+                    Try
+                        oColumn.Expression = oFormulaExpression
+                        oColumn.ReadOnly = True
+                    Catch ex As Exception
+                        _Logger.Warn("⚠️ Invalid FORMULA_EXPRESSION for column {0}: {1}", oColumn.ColumnName, oFormulaExpression)
+                        _Logger.Error(ex)
+                    End Try
+                End If
                 oDataTable.Columns.Add(oColumn)
             Next
 
@@ -179,6 +188,13 @@ Namespace ControlCreator
                     Dim oReadOnlyInt As Integer
                     oIsReadOnly = Integer.TryParse(oReadOnlyValue.ToString(), oReadOnlyInt) AndAlso oReadOnlyInt = 1
                 End If
+
+                Dim oFormulaExpression = ObjectEx.NotNull(oColumnData.Item("FORMULA_EXPRESSION"), String.Empty)
+                If oFormulaExpression <> String.Empty Then
+                    oIsReadOnly = True
+                End If
+
+
                 oCol.OptionsColumn.AllowEdit = Not oIsReadOnly
 
                 Dim oColumnType As String = oColumnData.Item("TYPE_COLUMN")

app/TaskFlow/frmMain.resx

@@ -125,7 +125,7 @@
         AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
         LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
         ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
-        CAAAAk1TRnQBSQFMAgEBAgEAAbABCwGwAQsBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
+        CAAAAk1TRnQBSQFMAgEBAgEAAbgBCwG4AQsBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
         AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
         AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
         AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA