This commit is contained in:
JenneJ
2016-05-18 13:46:18 +02:00
parent 41f2760a88
commit fc54eae3ab
3 changed files with 94 additions and 46 deletions

View File

@@ -166,7 +166,8 @@ Public Class ClassControlBuilder
If match.Success Then
' DependingControlId bezeichnet das Control, das die Abhängigkeit enthält
Dim dependingControlId As Integer = row.Item("GUID")
Dim panel As Panel = DirectCast(control.Parent, Panel)
'Dim panel As Panel = DirectCast(control.Parent, Panel)
Dim panel As Panel = CtrlBuilder.MasterPanel
' Über die Id das Control finden
Dim dependingControl As Control = panel.Controls.OfType(Of Control)().Where(Function(c As Control)
Return DirectCast(c.Tag, ClassControlMetadata).Id = dependingControlId