Common: small changes to frmDialog

This commit is contained in:
Jonathan Jenne
2022-06-07 11:01:39 +02:00
parent 923672e8df
commit 54f2a3f0f2
3 changed files with 38 additions and 37 deletions

View File

@@ -24,6 +24,7 @@ Partial Class frmMsgBox
Private Sub InitializeComponent()
Me.SimpleButton1 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton2 = New DevExpress.XtraEditors.SimpleButton()
Me.SimpleButton3 = New DevExpress.XtraEditors.SimpleButton()
Me.SuspendLayout()
'
'SimpleButton1
@@ -42,11 +43,20 @@ Partial Class frmMsgBox
Me.SimpleButton2.TabIndex = 0
Me.SimpleButton2.Text = "SimpleButton1"
'
'SimpleButton3
'
Me.SimpleButton3.Location = New System.Drawing.Point(350, 12)
Me.SimpleButton3.Name = "SimpleButton3"
Me.SimpleButton3.Size = New System.Drawing.Size(163, 23)
Me.SimpleButton3.TabIndex = 0
Me.SimpleButton3.Text = "SimpleButton1"
'
'frmMsgBox
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(800, 450)
Me.Controls.Add(Me.SimpleButton3)
Me.Controls.Add(Me.SimpleButton2)
Me.Controls.Add(Me.SimpleButton1)
Me.Name = "frmMsgBox"
@@ -57,4 +67,5 @@ Partial Class frmMsgBox
Friend WithEvents SimpleButton1 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton2 As DevExpress.XtraEditors.SimpleButton
Friend WithEvents SimpleButton3 As DevExpress.XtraEditors.SimpleButton
End Class

View File

@@ -27,4 +27,9 @@ Public Class frmMsgBox
Private Sub frmMsgBox_Load(sender As Object, e As EventArgs) Handles MyBase.Load
End Sub
Private Sub SimpleButton3_Click(sender As Object, e As EventArgs) Handles SimpleButton3.Click
Dim CURRENT_NEWFILENAME = "\\Windream\Objects\DigitalData-IDB\2022\02\01\TestDoctype1\more\even-more\big\empty\folders\haha\Brainpool_Logo-22_02_01.pdf"
FormHelper.ShowQuestionMessage($"File sucessfully processed!{vbNewLine}Path:{vbNewLine}{vbNewLine}{vbNewLine}{vbNewLine}{CURRENT_NEWFILENAME}", CURRENT_NEWFILENAME.Count)
End Sub
End Class