Delphi - 利用TRzTrayIcon实现WinFrm工程最小会到托盘

第三方RC控件的安装

浏览器搜索Delphi Rz控件下载，找到下载一个安装文件，解压后点击RC3.exe一键安装。

 

 

Delphi WinFrm工程最小化到托盘

Delphi新建WinFrm工程，在主窗体上添加TRzTrayIcon、TImageList和TPopupMenu。此时运行工程，点击最小化即可实现到托盘的效果。

 

系统最小化时实现提示信息

选中RzTrayIcon，单击F11，选择Events，双击OnMinimizeApp，写如下代码：

procedure TForm1.RzTrayIcon1MinimizeApp(Sender: TObject);
begin
    RzTrayIcon1.ShowBalloonHint(Application.Title, '您可以在此处找到我呦！', bhiInfo);
end;

运行效果：

 

 

添加最小化后图标的Hint提示效果和右键菜单

选中RzTrayIcon，单击F11，选择Properties，在Hint中写“系统Hint测试”，并绑定ImageList1、PopupMenu1。

双击TImageList，添加Icon图标。

双击PopupMenu，添加如下菜单（可根据需要设定）。

运行效果如下：

 

原文链接:https://www.cnblogs.com/jeremywucnblog/p/11451325.html
如有疑问请与原作者联系

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有