Leihgeld, etc.

This commit is contained in:
2026-01-13 16:37:10 +01:00
parent 579af7ef26
commit cd45295d63
4 changed files with 35 additions and 34 deletions

View File

@@ -1339,15 +1339,16 @@ Public Class cRKSV
If PERSONAL.isLeihgeldkasse AndAlso BELEG.Niederlassung = "SUA" Then
Dim fontAtilla As New Font("Arial", 14, FontStyle.Bold)
Dim fontAtilla As New Font("Arial", 12, FontStyle.Bold)
rpt.lblFahrer.Font = fontAtilla
rpt.lblFahrer2.Font = fontAtilla
rpt.txtFrachtfuhrer.Font = fontAtilla
rpt.lblLKWKz.Font = fontAtilla
rpt.lblPassnummer.Font = fontAtilla
rpt.Label12.Font = fontAtilla
rpt.Label15.Font = fontAtilla
rpt.Label14.Font = fontAtilla
rpt.Label7.Font = fontAtilla
End If