如何屏闭win95的任务档?

中国 2000-01-19 02:11:00
请问在Delphi中如何屏闭win95的任务档?
...全文
155 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
zyb 2000-01-20
  • 打赏
  • 举报
回复
我前不久刚向大侠们讨教过这个问题,去已答问题栏中去看看吧!提醒你一句,提问题前最好先去已答问题栏中去看看,免得白白浪费分!
Powerbird 2000-01-19
  • 打赏
  • 举报
回复
可用以下程序:
procedure hideTaskbar;
var
wndHandle : THandle;
wndClass : array[0..50] of Char;
begin
StrPCopy(@wndClass[0], 'Shell_TrayWnd');
wndHandle := FindWindow(@wndClass[0], nil);
ShowWindow(wndHandle, SW_HIDE);
end;

procedure showTaskbar;
var
wndHandle : THandle;
wndClass : array[0..50] of Char;
begin
StrPCopy(@wndClass[0], 'Shell_TrayWnd');
wndHandle := FindWindow(@wndClass[0], nil);
ShowWindow(wndHandle, SW_RESTORE);
end;
zyb 2000-01-19
  • 打赏
  • 举报
回复
将你的问题说得再具体些?
radish 2000-01-19
  • 打赏
  • 举报
回复
你如果指按下TAB键和ALT+DEL+CTRL键的话,只要模拟屏幕保护即可
代码如下:
SystemParametersInfo(SPI_SCREENSAVERRUNNING, true, NULL,0); //禁止
SystemParametersInfo(SPI_SCREENSAVERRUNNING, false, NULL,0); //打开

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧