East make Tray Icon in delphi

				object frmJvForms: TfrmJvForms
				  Left = 192
				  Top = 107
				  Width = 407
				  Height = 243
				  Caption = 'Demo for the components from the '#39'Jv Forms'#39' TabSheet'
				  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 BitBtn9: TBitBtn
				    Left = 16
				    Top = 144
				    Width = 175
				    Height = 25
				    Caption = 'Form Animation'
				    TabOrder = 0
				  end
				  object BitBtn8: TBitBtn
				    Left = 208
				    Top = 112
				    Width = 175
				    Height = 25
				    Caption = 'Form Place'
				    Enabled = False
				    TabOrder = 1
				  end
				  object BitBtn7: TBitBtn
				    Left = 16
				    Top = 112
				    Width = 175
				    Height = 25
				    Caption = 'Application animated Icon'
				    TabOrder = 2
				  end
				  object BitBtn6: TBitBtn
				    Left = 208
				    Top = 80
				    Width = 175
				    Height = 25
				    Caption = 'Animated Form Icon'
				    TabOrder = 3
				  end
				  object BitBtn5: TBitBtn
				    Left = 16
				    Top = 80
				    Width = 175
				    Height = 25
				    Caption = 'Tray Icon'
				    TabOrder = 4
				  end
				  object BitBtn4: TBitBtn
				    Left = 208
				    Top = 48
				    Width = 175
				    Height = 25
				    Caption = 'Transparent'
				    TabOrder = 5
				    OnClick = BitBtn4Click
				  end
				  object BitBtn3: TBitBtn
				    Left = 16
				    Top = 48
				    Width = 175
				    Height = 25
				    Caption = 'Perforated'
				    Enabled = False
				    TabOrder = 6
				  end
				  object BitBtn2: TBitBtn
				    Left = 208
				    Top = 16
				    Width = 175
				    Height = 25
				    Caption = 'Animated Title'
				    TabOrder = 7
				    OnClick = BitBtn2Click
				  end
				  object BitBtn12: TBitBtn
				    Left = 208
				    Top = 176
				    Width = 175
				    Height = 25
				    Caption = 'Gradient'
				    TabOrder = 8
				  end
				  object BitBtn11: TBitBtn
				    Left = 16
				    Top = 176
				    Width = 175
				    Height = 25
				    Caption = 'Magnet'
				    TabOrder = 9
				  end
				  object BitBtn10: TBitBtn
				    Left = 208
				    Top = 144
				    Width = 175
				    Height = 25
				    Caption = 'Autosize Combo'
				    TabOrder = 10
				  end
				  object BitBtn1: TBitBtn
				    Left = 16
				    Top = 16
				    Width = 175
				    Height = 25
				    Caption = 'Wallpaper'
				    TabOrder = 11
				    OnClick = BitBtn1Click
				  end
				end