AppStd/EnvelopeGenerator
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

einfach alles

Browse Source
This commit is contained in:
Jonathan Jenne
2023-12-05 15:40:16 +01:00
parent 763ac96f4e
commit 6f91ecac83
14 changed files with 522 additions and 247 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
EnvelopeGenerator.Form/frmEnvelopeEditor.vb
View File

@@ -1,11 +1,10 @@
Imports System.ComponentModel
Imports DevExpress.Utils.Drawing
Imports DevExpress.Utils.Svg
Imports DevExpress.XtraEditors
Imports DevExpress.XtraGrid
Imports DevExpress.XtraGrid.Views.Grid
Imports DevExpress.XtraPrinting.Native
Imports DevExpress.XtraSplashScreen
Imports DigitalData.Modules.Base
Imports DigitalData.Modules.Logging
Imports EnvelopeGenerator.Common
Imports EnvelopeGenerator.Common.Constants
@@ -386,7 +385,7 @@ Partial Public Class frmEnvelopeEditor
Private Sub SetFormTitle(pTitle As String)
Dim oFormTitle As String = State.DbConfig.ExternalProgramName + " - Umschlag-Editor"
If String.IsNullOrEmpty(pTitle) = False Then
oFormTitle += " - " + Controller.Envelope.Title.Substring(0, 30)
oFormTitle += " - " + Controller.Envelope.Title.Truncate(30)
End If
Me.Text = oFormTitle