Delphi 操作“任务栏”
来源:互联网 发布:世界各国gdp数据 编辑:程序博客网 时间:2024/06/10 11:05
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;
- Delphi 操作“任务栏”
- 任务栏操作
- Delphi隐藏任务栏
- delphi任务栏托盘写法
- Delphi 隐藏任务栏
- DELPHI 任务栏无EXE显示
- Delphi 全面控制Windows任务栏
- Delphi 隐藏任务栏屏蔽热键
- Delphi 实现右下角任务栏功能
- delphi 屏蔽任务栏,屏蔽热键
- Delphi产生任务栏图标【TNotifyIconData】
- 对任务栏的操作
- MFC任务栏操作
- 任务栏的一系列操作
- delphi 无边框最小化到任务栏上
- DELPHI 让窗体不在任务栏显示
- Delphi主窗口任务栏菜单的问题
- Delphi中隐藏任务栏和桌面图标
- Stock overview and cost assignment - 4
- Java的一些坑
- Stock overview and cost assignment - 2
- 10.4.1 LEVEL伪列
- Stock overview and cost assignment - 6
- Delphi 操作“任务栏”
- Stock overview and cost assignment - 1
- html的表单标签
- 10.4.4 CONNECT_BY_ISCYCLE伪列和NOCYCLE参数
- spring整合junit集成测试
- 使用Eclipse将Android项目打Jar包
- Stock overview and cost assignment - 3
- 牛掰网址收藏
- SAP中寄售处理