_ Partial Class TSUserReporter 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(TSUserReporter)) Me.cmdGetLocalUser = New System.Windows.Forms.Button() Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components) Me.ContextMenuStripIcon = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ReportToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ReporterAnzeigenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() Me.BeendenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.Label1 = New System.Windows.Forms.Label() Me.UpdateTimer = New System.Windows.Forms.Timer(Me.components) Me.btnTest = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.cmdMini = New System.Windows.Forms.Button() Me.ContextMenuStripIcon.SuspendLayout() Me.SuspendLayout() ' 'cmdGetLocalUser ' Me.cmdGetLocalUser.Location = New System.Drawing.Point(12, 161) Me.cmdGetLocalUser.Name = "cmdGetLocalUser" Me.cmdGetLocalUser.Size = New System.Drawing.Size(199, 23) Me.cmdGetLocalUser.TabIndex = 0 Me.cmdGetLocalUser.Text = "Lokalen User abfragen" Me.cmdGetLocalUser.UseVisualStyleBackColor = True ' 'NotifyIcon1 ' Me.NotifyIcon1.ContextMenuStrip = Me.ContextMenuStripIcon Me.NotifyIcon1.Icon = CType(resources.GetObject("NotifyIcon1.Icon"), System.Drawing.Icon) Me.NotifyIcon1.Text = "TSUserReporter" Me.NotifyIcon1.Visible = True ' 'ContextMenuStripIcon ' Me.ContextMenuStripIcon.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ReportToolStripMenuItem, Me.ReporterAnzeigenToolStripMenuItem, Me.ToolStripSeparator1, Me.BeendenToolStripMenuItem}) Me.ContextMenuStripIcon.Name = "ContextMenuStripIcon" Me.ContextMenuStripIcon.Size = New System.Drawing.Size(170, 76) ' 'ReportToolStripMenuItem ' Me.ReportToolStripMenuItem.Name = "ReportToolStripMenuItem" Me.ReportToolStripMenuItem.Size = New System.Drawing.Size(169, 22) Me.ReportToolStripMenuItem.Text = "Report" ' 'ReporterAnzeigenToolStripMenuItem ' Me.ReporterAnzeigenToolStripMenuItem.Name = "ReporterAnzeigenToolStripMenuItem" Me.ReporterAnzeigenToolStripMenuItem.Size = New System.Drawing.Size(169, 22) Me.ReporterAnzeigenToolStripMenuItem.Text = "Reporter anzeigen" ' 'ToolStripSeparator1 ' Me.ToolStripSeparator1.Name = "ToolStripSeparator1" Me.ToolStripSeparator1.Size = New System.Drawing.Size(166, 6) ' 'BeendenToolStripMenuItem ' Me.BeendenToolStripMenuItem.Name = "BeendenToolStripMenuItem" Me.BeendenToolStripMenuItem.Size = New System.Drawing.Size(169, 22) Me.BeendenToolStripMenuItem.Text = "Beenden" ' 'Label1 ' Me.Label1.AutoSize = True Me.Label1.Location = New System.Drawing.Point(12, 9) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(39, 13) Me.Label1.TabIndex = 2 Me.Label1.Text = "Label1" ' 'UpdateTimer ' Me.UpdateTimer.Enabled = True Me.UpdateTimer.Interval = 300000 ' 'btnTest ' Me.btnTest.Location = New System.Drawing.Point(136, 132) Me.btnTest.Name = "btnTest" Me.btnTest.Size = New System.Drawing.Size(75, 23) Me.btnTest.TabIndex = 4 Me.btnTest.Text = "Test" Me.btnTest.UseVisualStyleBackColor = True Me.btnTest.Visible = False ' 'Button1 ' Me.Button1.Image = Global.TSUserReporter.My.Resources.Resources.Print20x20 Me.Button1.Location = New System.Drawing.Point(168, 38) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(43, 23) Me.Button1.TabIndex = 5 Me.Button1.UseVisualStyleBackColor = True ' 'cmdMini ' Me.cmdMini.Image = Global.TSUserReporter.My.Resources.Resources.del Me.cmdMini.Location = New System.Drawing.Point(168, 9) Me.cmdMini.Name = "cmdMini" Me.cmdMini.Size = New System.Drawing.Size(43, 23) Me.cmdMini.TabIndex = 3 Me.cmdMini.UseVisualStyleBackColor = True ' 'TSUserReporter ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(219, 196) Me.ControlBox = False Me.Controls.Add(Me.Button1) Me.Controls.Add(Me.btnTest) Me.Controls.Add(Me.cmdMini) Me.Controls.Add(Me.Label1) Me.Controls.Add(Me.cmdGetLocalUser) Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) Me.Name = "TSUserReporter" Me.ShowInTaskbar = False Me.Text = "TSUserReporter" Me.WindowState = System.Windows.Forms.FormWindowState.Minimized Me.ContextMenuStripIcon.ResumeLayout(False) Me.ResumeLayout(False) Me.PerformLayout() End Sub Friend WithEvents cmdGetLocalUser As Button Friend WithEvents NotifyIcon1 As NotifyIcon Friend WithEvents ContextMenuStripIcon As ContextMenuStrip Friend WithEvents ReportToolStripMenuItem As ToolStripMenuItem Friend WithEvents ReporterAnzeigenToolStripMenuItem As ToolStripMenuItem Friend WithEvents ToolStripSeparator1 As ToolStripSeparator Friend WithEvents BeendenToolStripMenuItem As ToolStripMenuItem Friend WithEvents Label1 As Label Friend WithEvents cmdMini As Button Friend WithEvents UpdateTimer As Timer Friend WithEvents btnTest As Button Friend WithEvents Button1 As Button End Class