AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS

Browse Source
This commit is contained in:
SchreiberM
2022-11-07 18:16:46 +01:00
parent 6e12bdc114
commit 752027ee0a
3 changed files with 85 additions and 73 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
GUIs.Common/frmNotification_Startup.vb
View File

@@ -44,7 +44,16 @@ Public Class frmNotification_Startup
Public Sub New(pNotificationsTable As DataTable, pLogConfig As LogConfig, pGDPictureKey As String, pCaption As String, pEnvironment As DigitalData.Modules.ZooFlow.Environment)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
Try
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
Dim cultureInfo As System.Globalization.CultureInfo
cultureInfo = New System.Globalization.CultureInfo(_Environment.User.Language)
cultureInfo.DateTimeFormat.ShortDatePattern = _Environment.User.DateFormat
Thread.CurrentThread.CurrentCulture = cultureInfo
Thread.CurrentThread.CurrentUICulture = cultureInfo
Catch ex As Exception
End Try
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
LogConfig = pLogConfig
Logger = pLogConfig.GetLogger()
@@ -125,17 +134,19 @@ Public Class frmNotification_Startup
RichEditControl1.Text = oMessage
RichEditControl1.Visible = True
RichEditControl1.Dock = Windows.Forms.DockStyle.Fill
BarStaticItemFileInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
ElseIf oType = TYPE_FILE Then
If IO.File.Exists(oMessage) Then
DocumentViewer1.LoadFile(oMessage)
DocumentViewer1.Visible = True
DocumentViewer1.Dock = Windows.Forms.DockStyle.Fill
BarStaticItemFileInfo.Caption = oMessage
Else
Dim oMsgBox As New frmDialog("File not existing!", "Load Notification File", frmDialog.DialogType.Warning)
oMsgBox.ShowDialog()
BarStaticItemFileInfo.Caption += " - NOT EXISTING"
End If
BarStaticItemFileInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
End If
If oMarkasRead = True Then