AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS_21.04.2016

Browse Source
This commit is contained in:
SchreiberM
2016-04-22 07:25:19 +02:00
parent fa5397cd24
commit 89224ad272
3 changed files with 13 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
app/DD-Record-Organiser/ClassControlBuilder.vb
View File

@@ -349,7 +349,7 @@ Public Class ClassControlBuilder
Case "CheckedListBoxControl"
Dim chklistbox As DevExpress.XtraEditors.CheckedListBoxControl = CType(control, DevExpress.XtraEditors.CheckedListBoxControl)
AddHandler chklistbox.ItemCheck, AddressOf RecordChanged
AddHandler chklistbox.EnabledChanged, AddressOf OnEnabledChanged
' AddHandler chklistbox.EnabledChanged, AddressOf OnEnabledChanged
Case "DataGridView"
Dim gridview As DataGridView = CType(control, DataGridView)
@@ -1576,7 +1576,8 @@ Public Class ClassControlBuilder
control.TabIndex = tabindex
control.TabStop = tabstop
control.Parent = _master_panel
'Bei clicken checken
control.CheckOnClick = True
If Not _designMode And read_only Then
control.Enabled = Not read_only
End If
@@ -1586,8 +1587,8 @@ Public Class ClassControlBuilder
Dim selectAll As New ToolStripMenuItem()
Dim deselectAll As New ToolStripMenuItem()
selectAll.Text = "Alle auswählen"
deselectAll.Text = "Keine auswählen"
selectAll.Text = "Select all"
deselectAll.Text = "Deselect all"
AddHandler selectAll.Click, AddressOf selectAll_Click
AddHandler deselectAll.Click, AddressOf deselectAll_Click
@@ -1640,8 +1641,7 @@ Public Class ClassControlBuilder
End If
End If
End If
'Bei clicken checken
control.CheckOnClick = True
' Wenn statische liste vorhanden, werte splitten und einfügen
If static_list.Length > 0 Then