如何将delphi程序图标放入系统托盘中?

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了如何将delphi程序图标放入系统托盘中?相关的知识,希望对你有一定的参考价值。

参考技术A 去下载一个Delphi下的系统托盘控件,TrayIcon,安装后,将该控件拖到窗体上,稍稍设置一下就好。
随便下载一个For
Delphi版本的就好了,然后下载下来的安装文件中应该有扩展名为.dpk的文件,双击该文件,在随后画面中点击install应该就好了。

WinForm 之 窗口最小化到托盘及右键图标显示菜单

日常开发有时候需要实现窗口最小化到系统托盘,本文就来讲讲该如何实现winfrom最小化到系统托盘,本例子基于VS2019编写。

用C#开发winform桌面程序时,程序启动后,默认是显示在桌面而且在任务栏中有对应的图标。有的时候,需要在程序最小行后,将程序图标仅仅显示在系统托盘,不在任务栏中显示。

Form最小化是指整个Form都缩小到任务栏上,但是窗体以Form的标题栏形式显示在任务栏上, 若是想让Form以Icon的形式显示在任务栏右下角,则需要给Form添加一个NotifyIcon控件。

新建winform项目

打开VS2019,创建“新项目”->“windows窗体应用(.NET Framework)”。

添加NotifyIcon控件

1 如下为窗体添加一个 NotifyIcon 控件,并指定 Icon 和 Text 属性

this.notifyIcon1.ContextMenuStrip = this.contextMenuStrip1;
            this.notifyIcon1.Icon = ((System.Drawing.Icon)(resources.GetObject("notifyIcon1.Icon")));
            this.notifyIcon1.Text = "文书助手";
            this.notifyIcon1.Visible = true;
            this.notifyIcon1.Click += new System.EventHandler(this.notifyIcon1_Click);
            this.notifyIcon1.DoubleClick += new System.EventHandler(this.notifyIcon1_DoubleClick);
            this.notifyIcon1.MouseClick += new System.Windows.Forms.MouseEventHandler(this.notifyIcon1_MouseClick);

2 可以为 添加NotifyIcon控件指定双击事件,双击还原,代码如下:

private void notifyIcon1_DoubleClick(object sender, EventArgs e)
        
            if (WindowState == FormWindowState.Minimized)
            
                //还原窗体显示    
                WindowState = FormWindowState.Normal;
                //激活窗体并给予它焦点
                this.Activate();
                //任务栏区显示图标
                this.ShowInTaskbar = true;
                //托盘区图标隐藏
              //  notifyIcon1.Visible = false;
            
        

3 关闭窗体询问是否直接退出或者最小化到托盘

private void toolStripMenuItem2_Click(object sender, EventArgs e)
        
            if (MessageBox.Show("是否确认退出程序?", "退出", MessageBoxButtons.OKCancel, MessageBoxIcon.Question) == DialogResult.OK)
            
                // 关闭所有的线程
                this.Dispose();
                this.Close();
            
        

添加 ContextMenuStrip 控件

1 在窗体添加一个 ContextMenuStrip 控件,然后添加控件菜单项,最后绑定给 NotifyIcon 控件即可,如下:

this.contextMenuStrip1.Items.AddRange(new System.Windows.Forms.ToolStripItem[] 
            this.toolStripMenuItem1,
            this.toolStripMenuItem2);
            this.contextMenuStrip1.Name = "contextMenuStrip1";
            this.contextMenuStrip1.Size = new System.Drawing.Size(101, 48);

2 绑定菜单给 NotifyIcon 控件

this.notifyIcon1.ContextMenuStrip = this.contextMenuStrip1;

3 为 ContextMenuStrip 控件的菜单项指定单击事件,如下:

private void toolStripMenuItem1_Click(object sender, EventArgs e)
        
            WindowState = FormWindowState.Normal;
            //任务栏区显示图标
            this.ShowInTaskbar = true;
        

为 NotifyIcon 控件添加单击事件

控制菜单的显示及窗口的还原,代码如下:

private void notifyIcon1_MouseClick(object sender, MouseEventArgs e)
        
            if (e.Button == MouseButtons.Right)
            
                contextMenuStrip1.Show();
            

            if (e.Button == MouseButtons.Left)
            
                this.Visible = true;
                this.WindowState = FormWindowState.Normal;
                this.ShowInTaskbar = true;
            
        

注意事项

“ContextMenuStrip”和“notifyIcon”若不是必要,请不要创建多个。

“notifyIcon”图标需要.icon格式

以上是关于如何将delphi程序图标放入系统托盘中?的主要内容,如果未能解决你的问题,请参考以下文章

delphi 如何在delphi中实现托盘图标

如何使用 FireMonkey 创建托盘图标?

Tomcat 8 系统托盘图标

Qt开发实现系统托盘,托盘菜单,托盘消息

delphi 给程序加托盘图标

如何把程序最小化到托盘图标