Delphi 操作“任务栏”

最新推荐文章于 2020-07-06 08:24:59 发布

lyhoo163

最新推荐文章于 2020-07-06 08:24:59 发布

阅读量6.8k

点赞数

CC 4.0 BY-SA版权

分类专栏：编程技巧编程环境文章标签： Delphi

本文链接：https://blog.youkuaiyun.com/lyhoo163/article/details/50627730

编程技巧同时被 2 个专栏收录

134 篇文章

订阅专栏

编程环境

50 篇文章

订阅专栏

本文详细介绍了如何使用Delphi编程语言操作Windows任务栏，包括隐藏和显示任务栏，以及如何调整主窗口和托盘区的显示方式。通过设置窗口属性，可以灵活控制应用程序在任务栏上的表现。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Delphi 操作“任务栏”

    一、windows任务栏常规
    1、通常编译好的文件，执行后在任务栏中，只显示一个主窗口的“标题框（带图标）”。不管你进入那一个子窗口，只显示主窗口的“标题框”
    2、程序通过进入托盘，只一托盘区显示一个图标，任务栏中，就隐藏了。
    3、如果想一开始就取消任务栏主窗口的“标题框” ，e 可在窗口的Creat事件中，加入代码：
   （1）Delphi7
SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW); //隐藏
// SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_APPWINDOW);   //显示

或

SetWindowLong(Self.Handle,GWL_EXSTYLE,WS_EX_TOOLWINDOW);
SetWindowLong(self.Handle,GWL_EXSTYLE,WS_EX_APPWINDOW);

（2）在程序的.dpr文件中create窗体前加入：
Application.ShowMainForm:=false; // 隐藏窗口
// Application.ShowMainForm:=true; // 显示窗口

（3）修改工程文件DPR中的“Application.MainFormOnTaskbar := True;”为“Application.MainFormOnTaskbar := False;”
在主窗体的 OnShow 事件中写下：ShowWindow(Application.Handle, SW_HIDE);

    二、Windows任务栏的操作
    1、隐藏Windows任务栏
procedure Tform1.Button1Click(Sender: TObject);
var wndHandle: THandle;                      //用于存储指定窗口的句柄
    wndClass: array[0..50] of Char;          //用于存储类名
begin
strPCopy(@wndClass[0], 'Shell_TrayWnd');   //获取任务栏类名
wndHandle := FindWindow(@wndClass[0],nil); //获取任务栏窗口的句柄
ShowWindow(wndHandle, SW_Hide);            //隐藏Windows任务栏
end;

    2、隐藏Windows任务栏
procedure Tform1.Button2Click(Sender: TObject);
var wndHandle: THandle;                       //用于存储指定窗口的句柄
    wndClass: array[0..50] of Char;           //用于存储类名
begin
strPCopy(@wndClass[0], 'Shell_TrayWnd');   //获取任务栏类名
wndHandle := FindWindow(@wndClass[0],nil); //获取任务栏窗口的句柄
ShowWindow(wndHandle, SW_Show);            //显示Windows任务栏
end;