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

MS Anpassungen Structure Nodes etc

Browse Source
This commit is contained in:
Digital Data - Marlon Schreiber
2018-07-12 11:56:29 +02:00
parent 0876b7b4e4
commit 8103f5d055
31 changed files with 7605 additions and 4379 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
app/DD-Record-Organizer/ClassCustomComboBox.vb
View File

@@ -28,15 +28,20 @@
If (Me.Items(e.Index).GetType() = GetType(String)) Then
label = Me.Items(e.Index).ToString()
Else
'Wenn die Items aus einer Datatable kommen, wird der DisplayMember ausgelesen
Dim rowView As DataRowView = Me.Items(e.Index)
Dim rowCount As Integer = rowView.Row.ItemArray.Count
Try
'Wenn die Items aus einer Datatable kommen, wird der DisplayMember ausgelesen
Dim rowView As DataRowView = Me.Items(e.Index)
Dim rowCount As Integer = rowView.Row.ItemArray.Count
If rowCount = 1 Then
label = rowView.Item(0)
ElseIf rowCount = 2 Then
label = rowView.Item(1)
End If
Catch ex As Exception
ClassLogger.Add("Unexpected error in OnDrawItem (datatable): " & ex.Message, True)
End Try
If rowCount = 1 Then
label = rowView.Item(0)
ElseIf rowCount = 2 Then
label = rowView.Item(1)
End If
End If
If e.State = (DrawItemState.Disabled Or DrawItemState.NoAccelerator Or DrawItemState.NoFocusRect Or DrawItemState.ComboBoxEdit) Then