systray24

所属分类:界面编程
开发工具:Delphi
文件大小:185KB
下载次数:3
上传日期:2005-03-28 10:23:34
上 传 者小草1966
说明:  类似的组件你一定见过不少,这个组件好不好,下载看看就知道。本控件来自DayDream。
(similar components you seen many, this component is good or bad, look at the downloaded know. DayDream from the controls.)

文件列表:
SysTray (0, 2003-03-03)
SysTray\Demo.dpr (241, 1999-03-07)
SysTray\Demo.exe (342016, 2001-10-25)
SysTray\Demo.res (876, 1999-03-07)
SysTray\DemoUnit.dfm (8036, 2001-10-25)
SysTray\DemoUnit.pas (3237, 2001-10-25)
SysTray\SysTray.dcr (472, 1999-03-27)
SysTray\SysTray.ico (766, 1999-03-07)
SysTray\SysTray.pas (16724, 2003-01-13)

TSysTray 控件说明: 基本功能: 往系统通知区加图标,并可显示,隐藏,修改这个图标,并响应鼠标事件。 更新历史: 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

近期下载者

相关文件


收藏者