程序最小化到托盘 TTrayIcon
来源:互联网 发布:中国it从业人数 编辑:程序博客网 时间:2024/06/06 04:58
在程序启动时设置 Application.MainFormOnTaskbar := false; //delphi XE7中 dpr文件中会默认置为true,删掉
1、最小化的托盘
利用windows系统消息WM_SYSCOMMAND
if (Message = WM_SYSCOMMAND) and (Message.WParam =SC_MINIMIZE ) then begin
Application.Minimize();ShowWindow(Application.Handle, SW_HIDE);
end else begin
//如果是其它的SystemCommand 消息则调用系统缺省处理函数处理之。
DefWindowProc(self.Handle, Message.Msg, Message.WParam, Message.LParam);
end;
2、还原界面
procedure TForm.TrayIcon1Click(Sender: TObject); //点击托盘图标事件
begin
ShowWindow(Application.Handle, SW_show);
Application.Restore;
end;
0 0
- 程序最小化到托盘 TTrayIcon
- 程序最小化到托盘
- 程序最小化到托盘
- VC最小化程序到托盘
- VC最小化程序到托盘
- VC程序最小化到托盘
- VC最小化程序到托盘
- VC最小化到托盘程序
- MFC程序最小化到托盘
- MFC最小化程序到托盘
- MFC最小化程序到托盘
- MFC程序最小化到托盘
- VC程序最小化到托盘
- VC最小化程序到托盘
- Delphi程序最小化到托盘
- VC最小化到托盘程序
- MFC程序最小化到托盘
- MFC程序最小化到托盘
- MySql中出现 Illegal mix of collations (latin1_swedish_ci,COERCIBLE) and (gbk_chinese_ci,COERCIBLE) for
- Java:实例
- IOS Dev Intro - UIView and CALayer
- Android百度地图之定位
- 常用的Oracle SQL语句
- 程序最小化到托盘 TTrayIcon
- C语言异或运算
- poj 1094 topo 在线处理数据
- ngResource模块的使用
- Eclipse下的Android工程改名
- 最小费用流bellman-ford算法总结
- 链表中环的入口节点
- 赛码网OJ题目--股神
- 设计模式之禅