Compare commits

..

2 Commits

Author SHA1 Message Date
Jonathan Jenne
3784b23641 Version 1.1.1.0 2022-09-19 10:54:48 +02:00
Jonathan Jenne
165fef44fc Fix datetime columns for TreeList 2022-09-19 10:54:28 +02:00
2 changed files with 4 additions and 7 deletions

View File

@@ -11,7 +11,7 @@ Imports System.Runtime.InteropServices
<Assembly: AssemblyCompany("Digital Data")> <Assembly: AssemblyCompany("Digital Data")>
<Assembly: AssemblyProduct("Monitor")> <Assembly: AssemblyProduct("Monitor")>
<Assembly: AssemblyCopyright("Copyright © 2022")> <Assembly: AssemblyCopyright("Copyright © 2022")>
<Assembly: AssemblyTrademark("1.1.0.0")> <Assembly: AssemblyTrademark("1.1.1.0")>
<Assembly: AssemblyCulture("")> <Assembly: AssemblyCulture("")>
' Setting ComVisible to false makes the types in this assembly not visible ' Setting ComVisible to false makes the types in this assembly not visible
@@ -32,5 +32,5 @@ Imports System.Runtime.InteropServices
' You can specify all the values or you can default the Build and Revision Numbers ' You can specify all the values or you can default the Build and Revision Numbers
' by using the '*' as shown below: ' by using the '*' as shown below:
' [assembly: AssemblyVersion("1.0.*")] ' [assembly: AssemblyVersion("1.0.*")]
<Assembly: AssemblyVersion("1.1.0.0")> <Assembly: AssemblyVersion("1.1.1.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.1.0")>

View File

@@ -209,11 +209,8 @@ Public Class frmMonitor
' Show all columns in DisplayColumns List ' Show all columns in DisplayColumns List
For Each oColumn In TreeListResults.Columns For Each oColumn In TreeListResults.Columns
oColumn.Visible = DisplayColumns.Contains(oColumn.FieldName) oColumn.Visible = DisplayColumns.Contains(oColumn.FieldName)
If oColumn.FieldName = "ADDED_WHEN" Then
oColumn.Format.FormatType = FormatType.DateTime
oColumn.Format.FormatString = "dd.MM.yyyy HH:MM:ss"
End If
Next Next
GridBuilder.SetDateTimeColumns(TreeListResults)
Dim oStateColumn As TreeListColumn = TreeListResults.Columns.Item("STATE") Dim oStateColumn As TreeListColumn = TreeListResults.Columns.Item("STATE")
For Each oNode As TreeListNode In TreeListResults.Nodes For Each oNode As TreeListNode In TreeListResults.Nodes