Zooflow: Fix messageboxes without title

2022-05-23 15:07:07 +02:00
parent ce7261acca
commit 39c69704f4
56 changed files with 683 additions and 432 deletions
--- a/GUIs.Common/frmDialog.Designer.vb
+++ b/GUIs.Common/frmDialog.Designer.vb
@@ -22,76 +22,152 @@ Partial Class frmDialog
    'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
-        Me.OK_Button = New System.Windows.Forms.Button()
-        Me.Cancel_Button = New System.Windows.Forms.Button()
-        Me.Panel1 = New System.Windows.Forms.Panel()
-        Me.lblMeldung = New System.Windows.Forms.Label()
-        Me.Panel2 = New System.Windows.Forms.Panel()
-        Me.Panel1.SuspendLayout()
-        Me.Panel2.SuspendLayout()
+        Me.components = New System.ComponentModel.Container()
+        Me.btnPositive = New DevExpress.XtraEditors.SimpleButton()
+        Me.btnNegative = New DevExpress.XtraEditors.SimpleButton()
+        Me.pnlContent = New DevExpress.XtraEditors.PanelControl()
+        Me.txtContent = New DevExpress.XtraEditors.LabelControl()
+        Me.SvgImageBox1 = New DevExpress.XtraEditors.SvgImageBox()
+        Me.PanelControl1 = New DevExpress.XtraEditors.PanelControl()
+        Me.pnlHeader = New DevExpress.XtraEditors.PanelControl()
+        Me.txtTitle = New DevExpress.XtraEditors.LabelControl()
+        Me.pnlFooter = New DevExpress.XtraEditors.PanelControl()
+        Me.SvgImageCollection1 = New DevExpress.Utils.SvgImageCollection(Me.components)
+        CType(Me.pnlContent, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnlContent.SuspendLayout()
+        CType(Me.SvgImageBox1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.PanelControl1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.pnlHeader, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnlHeader.SuspendLayout()
+        CType(Me.pnlFooter, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.pnlFooter.SuspendLayout()
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        '
-        'OK_Button
+        'btnPositive
        '
-        Me.OK_Button.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.OK_Button.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.OK_Button.Location = New System.Drawing.Point(3, 10)
-        Me.OK_Button.Name = "OK_Button"
-        Me.OK_Button.Size = New System.Drawing.Size(86, 32)
-        Me.OK_Button.TabIndex = 0
-        Me.OK_Button.Text = "OK"
+        Me.btnPositive.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnPositive.DialogResult = System.Windows.Forms.DialogResult.OK
+        Me.btnPositive.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.actions_checkcircled
+        Me.btnPositive.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
+        Me.btnPositive.Location = New System.Drawing.Point(386, 5)
+        Me.btnPositive.Name = "btnPositive"
+        Me.btnPositive.Size = New System.Drawing.Size(100, 23)
+        Me.btnPositive.TabIndex = 0
+        Me.btnPositive.Text = "OK"
        '
-        'Cancel_Button
+        'btnNegative
        '
-        Me.Cancel_Button.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.Cancel_Button.DialogResult = System.Windows.Forms.DialogResult.Cancel
-        Me.Cancel_Button.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Cancel_Button.Location = New System.Drawing.Point(358, 10)
-        Me.Cancel_Button.Name = "Cancel_Button"
-        Me.Cancel_Button.Size = New System.Drawing.Size(91, 32)
-        Me.Cancel_Button.TabIndex = 1
-        Me.Cancel_Button.Text = "Abbrechen"
+        Me.btnNegative.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.btnNegative.DialogResult = System.Windows.Forms.DialogResult.Cancel
+        Me.btnNegative.ImageOptions.SvgImage = Global.DigitalData.GUIs.Common.My.Resources.Resources.cancel
+        Me.btnNegative.ImageOptions.SvgImageSize = New System.Drawing.Size(16, 16)
+        Me.btnNegative.Location = New System.Drawing.Point(280, 5)
+        Me.btnNegative.Name = "btnNegative"
+        Me.btnNegative.Size = New System.Drawing.Size(100, 23)
+        Me.btnNegative.TabIndex = 1
+        Me.btnNegative.Text = "Abbrechen"
        '
-        'Panel1
+        'pnlContent
        '
-        Me.Panel1.BackColor = System.Drawing.Color.OrangeRed
-        Me.Panel1.Controls.Add(Me.lblMeldung)
-        Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
-        Me.Panel1.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Panel1.Location = New System.Drawing.Point(0, 0)
-        Me.Panel1.Name = "Panel1"
-        Me.Panel1.Size = New System.Drawing.Size(452, 180)
-        Me.Panel1.TabIndex = 2
+        Me.pnlContent.Controls.Add(Me.txtContent)
+        Me.pnlContent.Controls.Add(Me.SvgImageBox1)
+        Me.pnlContent.Controls.Add(Me.PanelControl1)
+        Me.pnlContent.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.pnlContent.Location = New System.Drawing.Point(0, 40)
+        Me.pnlContent.Name = "pnlContent"
+        Me.pnlContent.Size = New System.Drawing.Size(498, 145)
+        Me.pnlContent.TabIndex = 3
        '
-        'lblMeldung
+        'txtContent
        '
-        Me.lblMeldung.AutoSize = True
-        Me.lblMeldung.Font = New System.Drawing.Font("Segoe UI", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.lblMeldung.Location = New System.Drawing.Point(3, 9)
-        Me.lblMeldung.Name = "lblMeldung"
-        Me.lblMeldung.Size = New System.Drawing.Size(56, 21)
-        Me.lblMeldung.TabIndex = 0
-        Me.lblMeldung.Text = "Label1"
+        Me.txtContent.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
+            Or System.Windows.Forms.AnchorStyles.Left) _
+            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.txtContent.Appearance.Font = New System.Drawing.Font("Segoe UI", 9.75!)
+        Me.txtContent.Appearance.Options.UseFont = True
+        Me.txtContent.Appearance.Options.UseTextOptions = True
+        Me.txtContent.Appearance.TextOptions.VAlignment = DevExpress.Utils.VertAlignment.Top
+        Me.txtContent.AutoEllipsis = True
+        Me.txtContent.AutoSizeMode = DevExpress.XtraEditors.LabelAutoSizeMode.None
+        Me.txtContent.Location = New System.Drawing.Point(98, 6)
+        Me.txtContent.Name = "txtContent"
+        Me.txtContent.Padding = New System.Windows.Forms.Padding(10)
+        Me.txtContent.Size = New System.Drawing.Size(388, 133)
+        Me.txtContent.TabIndex = 1
+        Me.txtContent.Text = "txtContent"
        '
-        'Panel2
+        'SvgImageBox1
        '
-        Me.Panel2.Controls.Add(Me.OK_Button)
-        Me.Panel2.Controls.Add(Me.Cancel_Button)
-        Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
-        Me.Panel2.Location = New System.Drawing.Point(0, 180)
-        Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(452, 45)
-        Me.Panel2.TabIndex = 3
+        Me.SvgImageBox1.BackColor = System.Drawing.Color.Transparent
+        Me.SvgImageBox1.Location = New System.Drawing.Point(22, 16)
+        Me.SvgImageBox1.Name = "SvgImageBox1"
+        Me.SvgImageBox1.Size = New System.Drawing.Size(60, 60)
+        Me.SvgImageBox1.SizeMode = DevExpress.XtraEditors.SvgImageSizeMode.Zoom
+        Me.SvgImageBox1.TabIndex = 0
+        Me.SvgImageBox1.TabStop = False
+        Me.SvgImageBox1.Text = "SvgImageBox1"
+        '
+        'PanelControl1
+        '
+        Me.PanelControl1.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer))
+        Me.PanelControl1.Appearance.Options.UseBackColor = True
+        Me.PanelControl1.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
+        Me.PanelControl1.Location = New System.Drawing.Point(12, 6)
+        Me.PanelControl1.Name = "PanelControl1"
+        Me.PanelControl1.Size = New System.Drawing.Size(80, 80)
+        Me.PanelControl1.TabIndex = 2
+        '
+        'pnlHeader
+        '
+        Me.pnlHeader.Appearance.BackColor = System.Drawing.Color.FromArgb(CType(CType(165, Byte), Integer), CType(CType(36, Byte), Integer), CType(CType(19, Byte), Integer))
+        Me.pnlHeader.Appearance.Options.UseBackColor = True
+        Me.pnlHeader.BorderStyle = DevExpress.XtraEditors.Controls.BorderStyles.NoBorder
+        Me.pnlHeader.Controls.Add(Me.txtTitle)
+        Me.pnlHeader.Dock = System.Windows.Forms.DockStyle.Top
+        Me.pnlHeader.Location = New System.Drawing.Point(0, 0)
+        Me.pnlHeader.Name = "pnlHeader"
+        Me.pnlHeader.Size = New System.Drawing.Size(498, 40)
+        Me.pnlHeader.TabIndex = 4
+        '
+        'txtTitle
+        '
+        Me.txtTitle.Appearance.Font = New System.Drawing.Font("Segoe UI", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtTitle.Appearance.ForeColor = System.Drawing.Color.White
+        Me.txtTitle.Appearance.Options.UseFont = True
+        Me.txtTitle.Appearance.Options.UseForeColor = True
+        Me.txtTitle.Location = New System.Drawing.Point(12, 12)
+        Me.txtTitle.Name = "txtTitle"
+        Me.txtTitle.Size = New System.Drawing.Size(45, 17)
+        Me.txtTitle.TabIndex = 0
+        Me.txtTitle.Text = "txtTitle"
+        '
+        'pnlFooter
+        '
+        Me.pnlFooter.Controls.Add(Me.btnPositive)
+        Me.pnlFooter.Controls.Add(Me.btnNegative)
+        Me.pnlFooter.Dock = System.Windows.Forms.DockStyle.Bottom
+        Me.pnlFooter.Location = New System.Drawing.Point(0, 185)
+        Me.pnlFooter.Name = "pnlFooter"
+        Me.pnlFooter.Size = New System.Drawing.Size(498, 40)
+        Me.pnlFooter.TabIndex = 5
+        '
+        'SvgImageCollection1
+        '
+        Me.SvgImageCollection1.Add("warning", "image://svgimages/business objects/bo_attention.svg")
+        Me.SvgImageCollection1.Add("error", "image://svgimages/outlook inspired/highimportance.svg")
+        Me.SvgImageCollection1.Add("success", "image://svgimages/icon builder/actions_checkcircled.svg")
+        Me.SvgImageCollection1.Add("info", "image://svgimages/outlook inspired/about.svg")
+        Me.SvgImageCollection1.Add("question", "image://svgimages/icon builder/actions_question.svg")
        '
        'frmDialog
        '
-        Me.AcceptButton = Me.OK_Button
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
-        Me.CancelButton = Me.Cancel_Button
-        Me.ClientSize = New System.Drawing.Size(452, 225)
-        Me.Controls.Add(Me.Panel2)
-        Me.Controls.Add(Me.Panel1)
+        Me.ClientSize = New System.Drawing.Size(498, 225)
+        Me.Controls.Add(Me.pnlContent)
+        Me.Controls.Add(Me.pnlFooter)
+        Me.Controls.Add(Me.pnlHeader)
        Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
        Me.MaximizeBox = False
        Me.MinimizeBox = False
@@ -99,15 +175,27 @@ Partial Class frmDialog
        Me.ShowInTaskbar = False
        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
        Me.Text = "Dialog1"
-        Me.Panel1.ResumeLayout(False)
-        Me.Panel1.PerformLayout()
-        Me.Panel2.ResumeLayout(False)
+        CType(Me.pnlContent, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnlContent.ResumeLayout(False)
+        CType(Me.SvgImageBox1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.PanelControl1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.pnlHeader, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnlHeader.ResumeLayout(False)
+        Me.pnlHeader.PerformLayout()
+        CType(Me.pnlFooter, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.pnlFooter.ResumeLayout(False)
+        CType(Me.SvgImageCollection1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.ResumeLayout(False)

    End Sub
-    Friend WithEvents OK_Button As System.Windows.Forms.Button
-    Friend WithEvents Cancel_Button As System.Windows.Forms.Button
-    Friend WithEvents Panel1 As Windows.Forms.Panel
-    Friend WithEvents Panel2 As Windows.Forms.Panel
-    Friend WithEvents lblMeldung As Windows.Forms.Label
+    Friend WithEvents btnNegative As DevExpress.XtraEditors.SimpleButton
+    Friend WithEvents btnPositive As DevExpress.XtraEditors.SimpleButton
+    Friend WithEvents pnlContent As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents pnlHeader As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents pnlFooter As DevExpress.XtraEditors.PanelControl
+    Friend WithEvents SvgImageBox1 As DevExpress.XtraEditors.SvgImageBox
+    Friend WithEvents SvgImageCollection1 As DevExpress.Utils.SvgImageCollection
+    Friend WithEvents txtContent As DevExpress.XtraEditors.LabelControl
+    Friend WithEvents txtTitle As DevExpress.XtraEditors.LabelControl
+    Friend WithEvents PanelControl1 As DevExpress.XtraEditors.PanelControl
 End Class