East make Tray Icon in delphi

				object frmTransparent: TfrmTransparent
				  Left = 230
				  Top = 153
				  Width = 337
				  Height = 250
				  Caption = 'Transparent form'
				  Color = clBtnFace
				  Font.Charset = DEFAULT_CHARSET
				  Font.Color = clWindowText
				  Font.Height = -11
				  Font.Name = 'MS Sans Serif'
				  Font.Style = []
				  OldCreateOrder = False
				  PixelsPerInch = 96
				  TextHeight = 13
				  object JvLabel1: TJvLabel
				    Left = 80
				    Top = 48
				    Width = 179
				    Height = 13
				    Caption = 'Move the form around to see throug it'
				    AutoOpenURL = False
				    HotTrackFont.Charset = DEFAULT_CHARSET
				    HotTrackFont.Color = clWindowText
				    HotTrackFont.Height = -11
				    HotTrackFont.Name = 'MS Sans Serif'
				    HotTrackFont.Style = []
				  end
				  object JvTransparentForm1: TJvTransparentForm
				    Active = True
				    Left = 156
				    Top = 140
				  end
				end