East make Tray Icon in delphi

				unit StarFieldMain;
				
				interface
				
				uses
				  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
				  Dialogs, JvExControls, JvComponent, JvStarfield;
				
				type
				  TStarfieldMainForm = class(TForm)
				    JvStarfield1: TJvStarfield;
				  private
				  public
				  end;
				
				var
				  StarfieldMainForm: TStarfieldMainForm;
				
				implementation
				
				{$R *.dfm}
				
				end.