MS Verbesserungen Meldungen, GhostModus keine Sprache wechseln

This commit is contained in:
Developer01 2024-08-30 10:57:44 +02:00
parent 9ffad954cb
commit 493f85a8c0
4 changed files with 12 additions and 4 deletions

View File

@ -3113,6 +3113,11 @@ FROM VWPM_PROFILE_ACTIVE T WHERE T.FILE_COUNT > 0 AND T.GUID IN (SELECT PROFILE_
Dim ribbon As RibbonControl = TryCast(sender, RibbonControl) Dim ribbon As RibbonControl = TryCast(sender, RibbonControl)
Timer_Inactivity_Reset_Disable("RibbonControl1_SelectedPageChanged") Timer_Inactivity_Reset_Disable("RibbonControl1_SelectedPageChanged")
If ribbon.SelectedPage Is RibbonPageAktionen Then If ribbon.SelectedPage Is RibbonPageAktionen Then
If GHOSTMODE_ACTIVE = True Then
bbtnitmLanguage.Enabled = False
Else
bbtnitmLanguage.Enabled = True
End If
Select Case GridViewItem_Clicked Select Case GridViewItem_Clicked
Case "GROUP" Case "GROUP"
If SHOW_MASS_VALIDATOR = True Then If SHOW_MASS_VALIDATOR = True Then

View File

@ -37,10 +37,13 @@ Partial Class frmValidator_Messages
Me.ImageListBoxControl1.Appearance.Font = New System.Drawing.Font("Tahoma", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.ImageListBoxControl1.Appearance.Font = New System.Drawing.Font("Tahoma", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ImageListBoxControl1.Appearance.Options.UseFont = True Me.ImageListBoxControl1.Appearance.Options.UseFont = True
Me.ImageListBoxControl1.Dock = System.Windows.Forms.DockStyle.Fill Me.ImageListBoxControl1.Dock = System.Windows.Forms.DockStyle.Fill
Me.ImageListBoxControl1.HorizontalScrollbar = True
Me.ImageListBoxControl1.ImageList = Me.ImageList1 Me.ImageListBoxControl1.ImageList = Me.ImageList1
Me.ImageListBoxControl1.ItemAutoHeight = True
Me.ImageListBoxControl1.Location = New System.Drawing.Point(0, 0) Me.ImageListBoxControl1.Location = New System.Drawing.Point(0, 0)
Me.ImageListBoxControl1.Margin = New System.Windows.Forms.Padding(4) Me.ImageListBoxControl1.Margin = New System.Windows.Forms.Padding(4)
Me.ImageListBoxControl1.Name = "ImageListBoxControl1" Me.ImageListBoxControl1.Name = "ImageListBoxControl1"
Me.ImageListBoxControl1.ShowToolTipForTrimmedText = DevExpress.Utils.DefaultBoolean.[True]
Me.ImageListBoxControl1.Size = New System.Drawing.Size(645, 256) Me.ImageListBoxControl1.Size = New System.Drawing.Size(645, 256)
Me.ImageListBoxControl1.TabIndex = 0 Me.ImageListBoxControl1.TabIndex = 0
' '
@ -65,8 +68,8 @@ Partial Class frmValidator_Messages
'ToolStripStatusLabel1 'ToolStripStatusLabel1
' '
Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1" Me.ToolStripStatusLabel1.Name = "ToolStripStatusLabel1"
Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(119, 17) Me.ToolStripStatusLabel1.Size = New System.Drawing.Size(97, 17)
Me.ToolStripStatusLabel1.Text = "ToolStripStatusLabel1" Me.ToolStripStatusLabel1.Text = "No Refresh so far"
' '
'frmValidator_Messages 'frmValidator_Messages
' '

View File

@ -125,7 +125,7 @@
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0 LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACq ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAACq
CQAAAk1TRnQBSQFMAgEBAwEAASABAAEgAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo CQAAAk1TRnQBSQFMAgEBAwEAASgBAAEoAQABEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5 AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA

View File

@ -20,7 +20,7 @@ Public Class frmValidator_Messages
End If End If
End If End If
ToolStripStatusLabel1.Text = $"({pDT.Rows.Count.ToString}] {oString}" ToolStripStatusLabel1.Text = $"({pDT.Rows.Count.ToString}) {oString}"
End Sub End Sub
Private Sub frmValidator_Messages_Shown(sender As Object, e As EventArgs) Handles Me.Shown Private Sub frmValidator_Messages_Shown(sender As Object, e As EventArgs) Handles Me.Shown