'
' Created by SharpDevelop.
' User: Benedikt
' Date: 04.01.2006
' Time: 20:50
' 
' To change this template use Tools | Options | Coding | Edit Standard Headers.
'
Imports System
Imports System.Drawing
Imports System.Windows.Forms
 
Namespace NotifyIcon1
 
	Public Class NotifyIcon1
		Inherits System.Windows.Forms.Form
 
		Public Shared Sub Main
			Dim fMainForm As New NotifyIcon1
			fMainForm.ShowDialog()
		End Sub
 
		Public Sub New()
			MyBase.New
			'
			' The Me.InitializeComponent call is required for Windows Forms designer 
' support.
			'
			Me.InitializeComponent
			'
			' TODO : Add constructor code after InitializeComponents
			'
		End Sub
 
		#Region " Windows Forms Designer generated code "
		' This method is required for Windows Forms designer support.
		' Do not change the method contents inside the source code editor. The Forms 
' designer might
		' not be able to load this method if it was changed manually.
		Private Sub InitializeComponent()
			'
			'MainForm
			'
			Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
			Me.ClientSize = New System.Drawing.Size(292, 266)
			Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
			Me.Name = "MainForm"
			Me.Opacity = 0
			Me.ShowInTaskbar = false
			Me.Text = "NotifyIcon1"
			Me.WindowState = System.Windows.Forms.FormWindowState.Minimized
		End Sub
		#End Region
 
 
		Private Sub Form1_Load(ByVal sender As System.Object, _ 
  ByVal e As System.EventArgs _ 
  ) Handles MyBase.Load 
  ' In der Entwicklungsumgebung wurde dieser Form das 
  ' unsichtbare Steuerelement NotifyIcon hinzugefügt, 
  ' das den Namen "NotifyIcon1" erhalten hat. 
  ' Ein Icon laden und in der "Tray" sichtbar anzeigen 
  With NotifyIcon1 
 .Icon = New Icon("javascript:void(null);") 
 .Text = "Testanwendung" 
 .Visible = True 
  End With 
End Sub
 
 
 
 
	End Class
End Namespace