delphi在窗口最小化时不在任务栏

Posted

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了delphi在窗口最小化时不在任务栏相关的知识,希望对你有一定的参考价值。

在点最小化时不在任务栏.而跑到开始菜单的上面只显示标题.应该怎么做让他最小化时会缩小到托盘呢
呵呵.或许是我笨了.但是我还不会笨得会打错别字.不知道一楼的兄弟是否比我更笨
另外发现是主窗口和子窗口的事.显示出来的是子窗口,所以不会显示在任务栏.

给你的程序加个TrayIcon控件(Delphi 2005以上)或者用SHELLAPI(Shell_NotifyIcon函数)加,截取WM_SYSCOMMAND消息,在最小化时隐藏窗口,点击通知区图标时,显示窗口。 参考技术A 因为你太苯了。

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做的程序不显示在任务栏中

Delphi程序在任务栏显示不了?

请问怎样使程序在最小化后图标放在任务栏的托盘上?

Java swing 窗口最小化到任务栏 点击左键显示