jj 02.05.16

This commit is contained in:
JenneJ
2016-05-02 14:52:40 +02:00
parent 31063ef93c
commit fcc521a994
3 changed files with 8 additions and 2 deletions

View File

@@ -83,7 +83,7 @@ Public Class ClassDatabase
Dim match As System.Text.RegularExpressions.Match = regex.Match(sql)
If match.Success Then
Return Nothing
'Return Nothing
End If
Dim connectionString As String

View File

@@ -363,6 +363,9 @@
<data name="TCDetails.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 25</value>
</data>
<data name="pnlDetails.AutoScroll" type="System.Boolean, mscorlib">
<value>True</value>
</data>
<data name="pnlDetails.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value>
</data>

View File

@@ -718,6 +718,9 @@ Public Class frmConstructor_Main
Check_Record_Changed()
DisableEditMode()
VerknüpfungenAnzeigenToolStripMenuItem.Enabled = True
' muss vor show selected record data kommen,
' sodass die datasource für die angehakten werte existiert (checked list box)
ClassControlValues.LoadControlValuesListWithPlaceholders(ENTITY_ID, Grid_RecordID, PARENT_ID, CtrlBuilder.AllControls, ENTITY_ID)
Show_Selected_Record_Data(Grid_RecordID, False)
RIGHT_ONLY_READ = False
@@ -1460,7 +1463,7 @@ Public Class frmConstructor_Main
' Abhängige Listen laden
CtrlBuilder.WatchRecordChanges = False
ClassControlValues.LoadControlValuesListWithPlaceholders(ENTITY_ID, RECORD_ID, PARENT_ID, CtrlBuilder.AllControls, ENTITY_ID)
'ClassControlValues.LoadControlValuesListWithPlaceholders(ENTITY_ID, RECORD_ID, PARENT_ID, CtrlBuilder.AllControls, ENTITY_ID)
ClassControlValues.Enable_Depending_Controls(ENTITY_ID, RECORD_ID, PARENT_ID, CtrlBuilder.AllControls, ENTITY_ID)
CtrlBuilder.WatchRecordChanges = True