文档章节

隐藏桌面图标和任务栏

涂孟超
 涂孟超
发布于 2014/09/26 15:37
字数 165
阅读 16
收藏 0
点赞 0
评论 0
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    CheckBox1: TCheckBox;
    CheckBox2: TCheckBox;
    procedure FormCreate(Sender: TObject);
    procedure CheckBox1Click(Sender: TObject);
    procedure CheckBox2Click(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

{初始化}
procedure TForm1.FormCreate(Sender: TObject);
begin
  CheckBox1.Caption := '隐藏桌面图标';
  CheckBox2.Caption := '隐藏任务栏';
end;

{隐藏或显示桌面图标}
procedure TForm1.CheckBox1Click(Sender: TObject);
var
  h: HWND;
begin
  h := FindWindow('Progman', nil);   {Progman 是桌面窗口的类名}
  if TCheckBox(Sender).Checked then
    ShowWindow(h, SW_HIDE)
  else
    ShowWindow(h, SW_RESTORE);
end;

{隐藏或显示任务栏}
procedure TForm1.CheckBox2Click(Sender: TObject);
var
  h: HWND;
begin
  h := FindWindow('Shell_TrayWnd', nil); {Shell_TrayWnd 是任务栏窗口的类名}
  if TCheckBox(Sender).Checked then
    ShowWindow(h, SW_HIDE)
  else
    ShowWindow(h, SW_RESTORE);
end;

end.

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2008/05/20/1203211.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
基于Visual C#2010开发Windows 7超级任务栏应用程序

Windows7的超级任务栏比起常规的windows任务栏主要做了下列改进 1、任务栏中的任务图标化,连开始菜单的按钮都显得跟任务栏中的图标差不多样式; 2、任务栏放弃了实时运行的概念,任务栏中开...

junwong
2012/03/09
0
0
IT技术晋级之路-锁定任务栏

当在任务栏右键选择属性后看到如图界面,任务栏外观中“锁定任务栏”就是你无法拖动任务栏移到到左侧或者上下左右4个位置了,大家可以试试点击取消之后单击确定,然后把任务栏拖到最左侧上放...

我的中国
02/01
0
0
深度操作系统 15.5 BETA 发布 —— 新增小而美的功能

深度操作系统是一个致力于为全球用户提供美观易用、安全可靠的Linux发行版。 深度操作系统15.5 Beta相较于之前的版本而言,除了全面适配的高分屏支持和Flatpak应用格式支持,采用了全新Web应...

melodyzou
2017/11/15
2.7K
68
基于Visual C++2010与windows SDK fo windows7开发Windows 7超级任务栏应用程序

Windows7的超级任务栏比起常规的windows任务栏主要做了下列改进 1、任务栏中的任务图标化,连开始菜单的按钮都显得跟任务栏中的图标差不多样式; 2、任务栏放弃了实时运行的概念,任务栏中开...

junwong
2012/03/09
0
0
优麒麟 18.04 LTS 正式版发布:不忘初心,砥砺前行!

优麒麟团队已发布优麒麟 (Ubuntu Kylin) 18.04 LTS 开源操作系统,作为优麒麟的第 3 个长线支持版本,此次发布的 18.04 版本在系统内核、桌面环境、特色应用、合作软件上都有一系列更新,为用...

王练
04/27
0
0
重新开发 模拟win7, WebUI开发的日子

大学毕业之前去国外网站逛的时候无意中看到一个老外用jquery写了一个模拟win7的jquery ui界面,特效还好而且非常多,用的是jquery.easing.1.3.js,但是功能稀少,性能一般,还有可控操作接口...

造化玉碟
2013/12/11
0
3
Deepin 15.4-rc2 发布,深度操作系统

Deepin 15.4-rc2 发布了。Deepin是一个致力于为全球用户提供美观易用,安全可靠的Linux发行版。它不仅仅对最优秀的开源产品进行集成和配置,还开发了基于HTML5技术的全新桌面环境、系统设置中...

达尔文
2017/04/10
2.6K
18
2017.11.2日更新_ Win10x64x86_企业版_专业版_WIM下载_版本号为:1709(10299.19)

微软官方原版WIM离线整合,无精简,无个人信息,无推广,系统安装后无整合残留文件,系统非常纯净。本次更新的企业版、专业版启用了内置管理员。整合只为实现自动安装自动kms 。好不好用了才...

comma2017
2017/10/31
0
0
Ext desktop桌面图标能否自动换列显示?

在使用Ext desktop时,如果桌面图标过多,能否换列显示?如图,部分图标已经被“任务栏”隐藏了。请问应如何修改相应的代码?

goonlove0
2010/05/29
907
1
深度操作系统 15.4 RC2 发布

深度操作系统是一个致力于为全球用户提供美观易用、安全可靠的Linux发行版。 经过深度操作系统15.4 RC1的测试,收到大家很多关心的问题和建议,我们对反馈的问题第一时间定位和修复,同时也新...

局长
2017/04/07
2.6K
29

没有更多内容

加载失败,请刷新页面

加载更多

下一页

前端基础

1. get请求传参长度的误区 误区:我们经常说get请求参数的大小存在限制,而post请求的参数大小是无限制的。 实际上HTTP 协议从未规定 GET/POST 的请求长度限制是多少。对get请求参数的限制是...

wenxingjun
10分钟前
0
0
Android 复制和粘贴功能

做了一回搬运工,原文地址:https://blog.csdn.net/kennethyo/article/details/76602765 Android 复制和粘贴功能,需要调用系统服务ClipboardManager来实现。 ClipboardManager mClipboardM...

她叫我小渝
今天
0
0
拦截SQLSERVER的SSL加密通道替换传输过程中的用户名密码实现运维审计(一)

工作准备 •一台SQLSERVER 2005/SQLSERVER 2008服务 •SQLSERVER jdbc驱动程序 •Java开发环境eclipse + jdk1.8 •java反编译工具JD-Core 反编译JDBC分析SQLSERVER客户端与服务器通信原理 SQ...

紅顏為君笑
今天
6
0
jQuery零基础入门——(六)修改DOM结构

《jQuery零基础入门》系列博文是在廖雪峰老师的博文基础上,可能补充了个人的理解和日常遇到的点,用我的理解表述出来,主干出处来自廖雪峰老师的技术分享。 在《零基础入门JavaScript》的时...

JandenMa
今天
0
0
linux mint 1.9 qq 安装

转: https://www.jianshu.com/p/cdc3d03c144d 1. 下载 qq 轻聊版,可在百度搜索后下载 QQ7.9Light.exe 2. 去wine的官网(https://wiki.winehq.org/Ubuntu) 安装 wine . 提醒网页可以切换成中...

Canaan_
今天
0
0
PHP后台运行命令并管理运行程序

php后台运行命令并管理后台运行程序 class ProcessModel{ private $pid; private $command; private $resultToFile = ''; public function __construct($cl=false){......

colin_86
今天
1
0
数据结构与算法4

在此程序中,HighArray类中的find()方法用数据项的值作为参数传递,它的返回值决定是否找到此数据项。 insert()方法向数组下一个空位置放置一个新的数据项。一个名为nElems的字段跟踪记录着...

沉迷于编程的小菜菜
今天
1
1
fiddler安装和基本使用以及代理设置

项目需求 由于开发过程中客户端和服务器数据交互非常频繁,有时候服务端需要知道客户端调用接口传了哪些参数过来,这个时候就需要一个工具可以监听这些接口请求参数,已经接口的响应的数据,这种...

银装素裹
今天
0
0
Python分析《我不是药神》豆瓣评论

读取 Mongo 中的短评数据,进行中文分词 对分词结果取 Top50 生成词云 生成词云效果 看来网上关于 我不是药神 vs 达拉斯 的争论很热啊。关于词频统计就这些,代码中也会完成一些其它的分析任...

猫咪编程
今天
0
0
虚拟机怎么安装vmware tools

https://blog.csdn.net/tjcwt2011/article/details/72638977

AndyZhouX
昨天
1
0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部