From c3da7697cc9a56c33fc92f2ef966fb1236e0f504 Mon Sep 17 00:00:00 2001 From: Digital Data - Marlon Schreiber Date: Thu, 16 Jan 2020 11:45:00 +0100 Subject: [PATCH] MS --- .../ClassWindreamDocGrid.vb | 26 +++++++++---------- 1 file changed, 13 insertions(+), 13 deletions(-) diff --git a/app/DD-Record-Organizer/ClassWindreamDocGrid.vb b/app/DD-Record-Organizer/ClassWindreamDocGrid.vb index 4c33371..47a352e 100644 --- a/app/DD-Record-Organizer/ClassWindreamDocGrid.vb +++ b/app/DD-Record-Organizer/ClassWindreamDocGrid.vb @@ -317,25 +317,25 @@ Public Class ClassWindreamDocGrid gridView.Columns.Item("DocID").Visible = False End If - Dim created, changed As String + Dim oCreatedFieldName, oChangedFieldName As String If USER_LANGUAGE <> "de-DE" Then - changed = "Changed" - created = "Created" + oChangedFieldName = "Changed" + oCreatedFieldName = "Created" Else - changed = "Geändert" - created = "Erstellt" + oChangedFieldName = "Geändert" + oCreatedFieldName = "Erstellt" End If - Dim createdColumn = gridView.Columns(created) - If Not IsNothing(createdColumn) Then - createdColumn.DisplayFormat.FormatType = FormatType.DateTime - createdColumn.DisplayFormat.FormatString = CURRENT_DATE_FORMAT & " HH:MM:ss" + Dim oCreatedColumn = gridView.Columns(oCreatedFieldName) + If Not IsNothing(oCreatedColumn) Then + oCreatedColumn.DisplayFormat.FormatType = FormatType.DateTime + oCreatedColumn.DisplayFormat.FormatString = CURRENT_DATE_FORMAT & " HH:MM:ss" End If - Dim changedColumn = gridView.Columns(changed) - If Not IsNothing(changedColumn) Then - changedColumn.DisplayFormat.FormatType = FormatType.DateTime - changedColumn.DisplayFormat.FormatString = CURRENT_DATE_FORMAT & " HH:MM:ss" + Dim oChangedColumn = gridView.Columns(oChangedFieldName) + If Not IsNothing(oChangedColumn) Then + oChangedColumn.DisplayFormat.FormatType = FormatType.DateTime + oChangedColumn.DisplayFormat.FormatString = CURRENT_DATE_FORMAT & " HH:MM:ss" End If If GridDocResult_BestFitColumns Then