Delphi如何让程序最小化到任务栏截取WM lphi在窗口最小化时不在任

程序最小化到任务栏，有两种情形：

一、将窗口最小化，代码如下：

procedure TForm1.Button1Click(Sender: TObject)begin Application.Minimizeend

二、将窗口最小化，程序图标显示在任务栏的右下角(系统托盘)：

使用 TTrayIcon 控件即可。

在 Delphi 语言中，实现让窗口最小化至系统托盘，最简单的办法是使用控件，在高版本的 Delphi 中提供了 TTrayIcon 控件，低版本可以下载安装 CnPack 小组提供的免费开源组件包中的 TCnTrayIcon 控件。

编写实现步骤如下：

1、在窗体中添加两个控件，CnTrayIcon 和 PopupMenu：

2、设置相关的属性

PopMenu 的设置如上图中示例，通常要有“显示主窗口”功能，其他的根据需要。

cnTrayIcon 的属性设置：

3、编写代码：

4、运行效果截图

当最小化程序窗口后，会在系统托盘区显示出图标。

当鼠标移动到程序图标上，显示提示信息（Hint）:

在托盘图标上点击右键，d出菜单：

---