Partial Class frmErrorMeldung Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. Protected Overrides Sub Dispose(ByVal disposing As Boolean) Try If disposing AndAlso components IsNot Nothing Then components.Dispose() End If Finally MyBase.Dispose(disposing) End Try End Sub 'Wird vom Windows Form-Designer benötigt. Private components As System.ComponentModel.IContainer 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmErrorMeldung)) Me.PictureBox1 = New System.Windows.Forms.PictureBox() Me.Label1 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label() Me.Panel1 = New System.Windows.Forms.Panel() Me.Panel2 = New System.Windows.Forms.Panel() Me.cbxScreenshot = New System.Windows.Forms.CheckBox() Me.cbxEnviromentVariables = New System.Windows.Forms.CheckBox() Me.lblErr_Nachricht = New System.Windows.Forms.Label() Me.Button2 = New System.Windows.Forms.Button() Me.txtNachricht = New System.Windows.Forms.TextBox() Me.Label3 = New System.Windows.Forms.Label() Me.MyPanel2 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components) Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components) Me.btnClose = New System.Windows.Forms.Button() Me.TextBox2 = New System.Windows.Forms.TextBox() Me.Label4 = New System.Windows.Forms.Label() CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel1.SuspendLayout() Me.Panel2.SuspendLayout() Me.MyPanel1.SuspendLayout() Me.SuspendLayout() ' 'PictureBox1 ' Me.PictureBox1.BackgroundImage = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.err Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.PictureBox1.Location = New System.Drawing.Point(0, 21) Me.PictureBox1.Name = "PictureBox1" Me.PictureBox1.Size = New System.Drawing.Size(95, 94) Me.PictureBox1.TabIndex = 0 Me.PictureBox1.TabStop = False ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold) Me.Label1.Location = New System.Drawing.Point(101, 47) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(391, 31) Me.Label1.TabIndex = 1 Me.Label1.Text = "Es ist ein Fehler aufgetreten!" ' 'Label2 ' Me.Label2.AutoSize = True Me.Label2.Location = New System.Drawing.Point(104, 78) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(39, 13) Me.Label2.TabIndex = 2 Me.Label2.Text = "Label2" Me.Label2.Visible = False ' 'Panel1 ' Me.Panel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.Panel1.Controls.Add(Me.Panel2) Me.Panel1.Controls.Add(Me.Label2) Me.Panel1.Controls.Add(Me.Label1) Me.Panel1.Controls.Add(Me.MyPanel2) Me.Panel1.Controls.Add(Me.PictureBox1) Me.Panel1.Controls.Add(Me.MyPanel1) Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel1.Location = New System.Drawing.Point(0, 0) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(500, 463) Me.Panel1.TabIndex = 8 ' 'Panel2 ' Me.Panel2.BackColor = System.Drawing.Color.WhiteSmoke Me.Panel2.Controls.Add(Me.Label4) Me.Panel2.Controls.Add(Me.cbxScreenshot) Me.Panel2.Controls.Add(Me.cbxEnviromentVariables) Me.Panel2.Controls.Add(Me.lblErr_Nachricht) Me.Panel2.Controls.Add(Me.Button2) Me.Panel2.Controls.Add(Me.txtNachricht) Me.Panel2.Controls.Add(Me.Label3) Me.Panel2.Dock = System.Windows.Forms.DockStyle.Bottom Me.Panel2.Location = New System.Drawing.Point(0, 128) Me.Panel2.Name = "Panel2" Me.Panel2.Size = New System.Drawing.Size(498, 138) Me.Panel2.TabIndex = 8 ' 'cbxScreenshot ' Me.cbxScreenshot.AutoSize = True Me.cbxScreenshot.Enabled = False Me.cbxScreenshot.Location = New System.Drawing.Point(201, 115) Me.cbxScreenshot.Name = "cbxScreenshot" Me.cbxScreenshot.Size = New System.Drawing.Size(80, 17) Me.cbxScreenshot.TabIndex = 12 Me.cbxScreenshot.Text = "Screenshot" Me.cbxScreenshot.UseVisualStyleBackColor = True ' 'cbxEnviromentVariables ' Me.cbxEnviromentVariables.AutoSize = True Me.cbxEnviromentVariables.Enabled = False Me.cbxEnviromentVariables.Location = New System.Drawing.Point(108, 115) Me.cbxEnviromentVariables.Name = "cbxEnviromentVariables" Me.cbxEnviromentVariables.Size = New System.Drawing.Size(87, 17) Me.cbxEnviromentVariables.TabIndex = 11 Me.cbxEnviromentVariables.Text = "Systemdaten" Me.cbxEnviromentVariables.UseVisualStyleBackColor = True ' 'lblErr_Nachricht ' Me.lblErr_Nachricht.AutoSize = True Me.lblErr_Nachricht.ForeColor = System.Drawing.Color.Red Me.lblErr_Nachricht.Location = New System.Drawing.Point(341, 8) Me.lblErr_Nachricht.Name = "lblErr_Nachricht" Me.lblErr_Nachricht.Size = New System.Drawing.Size(151, 13) Me.lblErr_Nachricht.TabIndex = 10 Me.lblErr_Nachricht.Text = "Bitte Nachricht-Text eingeben!" Me.lblErr_Nachricht.Visible = False ' 'Button2 ' Me.Button2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Button2.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) Me.Button2.ForeColor = System.Drawing.Color.White Me.Button2.Location = New System.Drawing.Point(409, 24) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(86, 110) Me.Button2.TabIndex = 9 Me.Button2.Text = "IT-Ticket " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "eröffnen" Me.Button2.UseVisualStyleBackColor = False ' 'txtNachricht ' Me.txtNachricht.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.txtNachricht.Location = New System.Drawing.Point(3, 24) Me.txtNachricht.Multiline = True Me.txtNachricht.Name = "txtNachricht" Me.txtNachricht.Size = New System.Drawing.Size(400, 86) Me.txtNachricht.TabIndex = 3 ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Location = New System.Drawing.Point(3, 8) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(335, 13) Me.Label3.TabIndex = 7 Me.Label3.Text = "Nachricht (Bitte um kurze Schilderung, was den Fehler ausgelöst hat):" ' 'MyPanel2 ' Me.MyPanel2.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.MyPanel2.Dock = System.Windows.Forms.DockStyle.Top Me.MyPanel2.Location = New System.Drawing.Point(0, 0) Me.MyPanel2.Name = "MyPanel2" Me.MyPanel2.Size = New System.Drawing.Size(498, 20) Me.MyPanel2.TabIndex = 7 ' 'MyPanel1 ' Me.MyPanel1.Controls.Add(Me.btnClose) Me.MyPanel1.Controls.Add(Me.TextBox2) Me.MyPanel1.Dock = System.Windows.Forms.DockStyle.Bottom Me.MyPanel1.Location = New System.Drawing.Point(0, 266) Me.MyPanel1.Name = "MyPanel1" Me.MyPanel1.Size = New System.Drawing.Size(498, 195) Me.MyPanel1.TabIndex = 6 ' 'btnClose ' Me.btnClose.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.btnClose.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) Me.btnClose.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.btnClose.ForeColor = System.Drawing.Color.White Me.btnClose.Location = New System.Drawing.Point(3, 144) Me.btnClose.Name = "btnClose" Me.btnClose.Size = New System.Drawing.Size(492, 44) Me.btnClose.TabIndex = 8 Me.btnClose.Text = "OK" Me.btnClose.UseVisualStyleBackColor = False ' 'TextBox2 ' Me.TextBox2.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.TextBox2.BackColor = System.Drawing.Color.White Me.TextBox2.Location = New System.Drawing.Point(3, 3) Me.TextBox2.Multiline = True Me.TextBox2.Name = "TextBox2" Me.TextBox2.ReadOnly = True Me.TextBox2.ScrollBars = System.Windows.Forms.ScrollBars.Vertical Me.TextBox2.Size = New System.Drawing.Size(492, 135) Me.TextBox2.TabIndex = 4 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Location = New System.Drawing.Point(3, 116) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(93, 13) Me.Label4.TabIndex = 9 Me.Label4.Text = "Anhang schicken:" Me.Label4.Visible = False ' 'frmErrorMeldung ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.White Me.ClientSize = New System.Drawing.Size(500, 463) Me.Controls.Add(Me.Panel1) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "frmErrorMeldung" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "Fehler" Me.TopMost = True CType(Me.PictureBox1, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.Panel2.ResumeLayout(False) Me.Panel2.PerformLayout() Me.MyPanel1.ResumeLayout(False) Me.MyPanel1.PerformLayout() Me.ResumeLayout(False) End Sub Friend WithEvents PictureBox1 As Windows.Forms.PictureBox Friend WithEvents Label1 As Windows.Forms.Label Friend WithEvents Label2 As Windows.Forms.Label Friend WithEvents TextBox2 As Windows.Forms.TextBox Friend WithEvents Panel1 As Windows.Forms.Panel Friend WithEvents Panel2 As Windows.Forms.Panel Friend WithEvents Button2 As Windows.Forms.Button Friend WithEvents txtNachricht As Windows.Forms.TextBox Friend WithEvents Label3 As Windows.Forms.Label Friend WithEvents MyPanel2 As MyPanel Friend WithEvents MyPanel1 As MyPanel Friend WithEvents btnClose As Windows.Forms.Button Friend WithEvents lblErr_Nachricht As Windows.Forms.Label Friend WithEvents cbxScreenshot As Windows.Forms.CheckBox Friend WithEvents cbxEnviromentVariables As Windows.Forms.CheckBox Friend WithEvents Label4 As Windows.Forms.Label End Class