TNotifyIcon 控件1.01

TNotifyIcon 控件1.01(1) TNotifyIcon 控件1.01 (Build use Delphi 3.0) 说明:
作用:
 往通知区加图标,并可显示,隐藏,修改这个图标.
 

属性(properties):
 NotifyIcon:TIcon  欲加在通知区的图标
 IsVisible:boolean NotifyIcon是否显示的属性
 Title:string  通知区图标上的提示(最多64个字符)
 PopupMenu:TPopupMenu 点击通知区图标弹出的菜单
 PopupStyle:TPopupStyle 弹出菜单的方式            
  TPopupStyle=Set of
(Left_Click,Right_Click,Left_DbClick,Right_DbClick);
方法(methods):  
   ShowIcon  将图标显示在通知区上
   HideIcon  将通知区上的图标隐藏
   ModifyIcon 修改通知区上的图标(若IsVisible=false,则不显示出来)
   Create(AOwner: TComponent); override; 构造方法
   Destroy; override; 析构方法
事件(Events):
    OnIconMouseDown:
      procedure(Sender:TObject;x,y:Word;WhoButton:TWhoButton) of
Object;
      (
       在Mouse点击通知区上的图标时发生,x,y为Mouse在屏幕上的坐标,
       WhoButton=b_Left为点击左键,WhoButton=b_Right为点击右键,
      )
    OnIconDoubleClick:
      procedure(Sender:TObject;x,y:Word;WhoButton:TWhoButton) of
Object;
     (
      在Mouse双击通知区上的图标时发生,x,y为Mouse在屏幕上的坐标,
      WhoButton=b_Left为双击左键,WhoButton=b_Right为双击右键,
     )
关于Demo:
   这个演示程序给出了TNotifyIcon的基本用法.

包含文件:
 NotifyIcon.dcr
 NotifyIcon.pas
 DemoUnit.pas
 DemoUnit.dfm
 PopUnit.pas
 PopUnit.dfm