⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 readme.txt

📁 === === === MiniHex 1.61 源程序说明 ============================== “$(MiniHex)Source”目录中的所有
💻 TXT
字号:
TSysTray 控件说明:

基本功能:
    往系统通知区加图标,并可显示,隐藏,修改这个图标,并响应鼠标事件。

更新历史:

2005.3.26 (V2.6)
    1、增加了 WM_TASKBARCREATED 消息的处理;

2003.9.12 (V2.5)
    1、修正了Icon.LoadFromFile之后,图标不会自动发生改变的BUG;

2003.1.13 (V2.4)
    1、在属性后面加上了一些default值;

2002.1.6 (V2.3)
    1、Click、DblClick和MouseDown时,改为不激活父窗口;

2001.12.12 (V2.2)
    1、在定时器驱动动画图标的基础上,增加了线程驱动方式;

2001.11.22 (V2.1)
    1、修正PopupMenu的BUG;

2001.10.25 (V2.0)
    1、加入动画图标功能;
    2、增加OnIconClick、OnIconMouseMove等事件;
    3、增加Enabled属性;

2000.1.31 (V1.04)
    去掉了毫无意义的ShowAbout方法。  

1999.10.1 (V1.03)
与V1.00相比有以下主要改动:
    1、能在设计期预览图标和弹出菜单.
    2、从TComponent继承,从而去掉了一些无用属性(如 Left,Top等).
       顺便解决了在设计期容易被别的控件遮住的问题.  
    3、在V1.01中,由于采用了AllocateHWnd函数建一个隐藏窗口来接管
       Windows事件,导致重新启动Windows时无法正常退出现象。在V1.02
       中去掉了AllocateHWnd函数,改用建立一个隐藏TWinControl的方法。
       在V1.03中,仍然使用了AllocateHwnd函数,但解决了Windows重新
       启动问题。
    4、SysTray 可以不放在窗体上。

1999.4.15 (V1.00)
    TSysTray第一个版本。

属性:
    Active: boolean           运行期是否显示图标
    ShowDesigning: boolean    设计期是否预览图标
    Icon: TIcon               欲加在通知区的图标 
    Hint: string              通知区图标上的提示(最多63个字符)
    PopupMenu: TPopupMenu     点击通知区图标弹出的菜单
    PopupMode: TPopupMode     弹出菜单的方式(即何种鼠标事件发生时弹出)
    PopupAlign: TPopupAlignment  弹出菜单的对齐方式

    TPopupMode = Set of(pmLeftClick, pmRightClick, 
                        pmLeftDblClick, pmRightDblClick);
    TPopupAlignment = (paLeft, paRight, paCenter);

方法:   
    constructor Create(AOwner: TComponent); override; 构造方法
    destructor Destroy; override;                     析构方法

事件:
    OnIconDoubleClick:
    procedure TForm1.SysTray1IconDoubleClick(Sender: TObject;
                           Button: TMouseButton; X, Y: Integer);

    OnIconMouseDown:
    procedure TForm1.SysTray1IconMouseDown(Sender: TObject;
                           Button: TMouseButton; X, Y: Integer);


演示程序(Demo.exe):
    这个演示程序给出了TSysTray的基本用法.


包含文件:
    SysTray.dcr
    SysTray.pas
    DemoUnit.pas
    DemoUnit.dfm
    Demo.dpr
    Demo.res
    Demo.exe 
    Readme.txt

声明:
    TSysTray 控件
    1、这是一个免费控件.
    2、如果你有兴趣把它做得更好, 请发一份给作者,谢谢.
    3、若要传播它,请完全分发上述8个文件.

    作者  南昌大学自动化系96(2)  郝新庚 1999.4.15  23:03
    E-mail:  haoem@126.com 
    URL: http://haoxg.yeah.net

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -