Status Anzeige

This commit is contained in:
PitzM 2023-12-04 16:24:45 +01:00
parent cb44e25fea
commit 99008dfbe7
4 changed files with 24 additions and 4 deletions

View File

@ -48,6 +48,17 @@ Public Class EnvelopeReceiver
Public Property SignedDate As DateTime = DateTime.MinValue
Public ReadOnly Property SignedDateDisplayValue As String
Get
If SignedDate = DateTime.MinValue Then
Return "-"
Else
Return SignedDate.ToString("G")
End If
End Get
End Property
Public ReadOnly Property HasId As Boolean
Get
Return Id > 0

View File

@ -149,9 +149,7 @@ Partial Class frmMain
'ColSignedDate
'
resources.ApplyResources(Me.ColSignedDate, "ColSignedDate")
Me.ColSignedDate.DisplayFormat.FormatString = "d"
Me.ColSignedDate.DisplayFormat.FormatType = DevExpress.Utils.FormatType.DateTime
Me.ColSignedDate.FieldName = "SignedDate"
Me.ColSignedDate.FieldName = "SignedDateDisplayValue"
Me.ColSignedDate.Name = "ColSignedDate"
Me.ColSignedDate.OptionsColumn.AllowEdit = False
'

View File

@ -172,7 +172,7 @@
<value>377</value>
</data>
<data name="ColSignedDate.Caption" xml:space="preserve">
<value>Unterschrieben am</value>
<value>Unterschrieben wann</value>
</data>
<data name="ColSignedDate.Visible" type="System.Boolean, mscorlib">
<value>True</value>

View File

@ -161,4 +161,15 @@ Public Class frmMain
TempFiles.CleanUp()
End Sub
Private Sub ViewReceivers_RowStyle(sender As Object, e As DevExpress.XtraGrid.Views.Grid.RowStyleEventArgs) Handles ViewReceivers.RowStyle
If e.RowHandle > -1 Then
Dim oColName As String = ViewReceivers.GetRowCellValue(e.RowHandle, "ColName")
Dim oName As String = ViewReceivers.GetRowCellValue(e.RowHandle, "Name")
Dim i = 0
End If
End Sub
End Class