add raw data view

This commit is contained in:
Jonathan Jenne
2019-07-05 16:11:09 +02:00
parent 0ab3acddb4
commit e8dfe68eef
10 changed files with 252 additions and 14 deletions

View File

@@ -11,6 +11,7 @@ Public Class WorkflowItem
Public Property Title As String
Public Property CreatedAt As DateTime
Public Property Process As String
Public Property Raw As DataRow
Public Property IconMap As Dictionary(Of String, String)
Public Property StateImage As Image
@@ -28,6 +29,8 @@ Public Class WorkflowItem
Me.IconMap = IconMap
End Sub
Private Function GetIcon(StateName As String, IconMap As Dictionary(Of String, String)) As Image
If IconMap.ContainsKey(StateName) Then
Dim IconName = IconMap.Item(StateName)