edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

VG Status Anzeige Name

Browse Source
This commit is contained in:
Andreas Luxbauer
2022-12-30 23:13:46 +01:00
parent 6d6708b821
commit db02b051c0
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Aviso/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.8.4.1")>
<Assembly: AssemblyFileVersion("3.8.4.1")>
<Assembly: AssemblyVersion("3.8.4.2")>
<Assembly: AssemblyFileVersion("3.8.4.2")>

4
Aviso/usrcntlAktDetails.vb
View File

@@ -2076,11 +2076,11 @@ Public Class usrcntlAktDetails
ElseIf r.Cells("LetzterMitarbeiterId").Value IsNot DBNull.Value AndAlso CInt(r.Cells("LetzterMitarbeiterId").Value) > 0 Then
If r.Cells("tblSnd_VG_MA").Value IsNot DBNull.Value Then
DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).Value = My.Resources.personCheck_small
If r.Cells("LetzterMitarbeiter").Value IsNot DBNull.Value AndAlso r.Cells("LetzterMitarbeiter").Value <> "" Then DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).ToolTipText = "Sendung von '" & r.Cells("LetzterMitarbeiter").Value & "' übernehmen"
End If
If r.Cells("LetzterMitarbeiter").Value IsNot DBNull.Value AndAlso r.Cells("LetzterMitarbeiter").Value <> "" Then DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).ToolTipText = "Sendung von '" & r.Cells("LetzterMitarbeiter").Value & "' übernehmen"
' DirectCast(r.Cells("SenungUebernehmen"), DataGridViewImageCell).ToolTipText = "Sendung übernehmen"
End If
' sdfdsfsdfsdf
If dgvSendungen.Columns("SendungFakturiert") IsNot Nothing Then
If (r.Cells("tblSnd_Fakturiert").Value) IsNot DBNull.Value Then
DirectCast(r.Cells("SendungFakturiert"), DataGridViewImageCell).Value = My.Resources.fakturiertAktiv