完全控制你的Windows桌面

完全控制你的Windows桌面

对于Windows的桌面界面相信大家已经十分熟悉了，占据屏幕大半部分的是桌面，在上面排列的是桌面图标。

任务栏一般位于桌面的下面，也可以在桌面其它边缘。在最左边是“开始按钮”，接下来是“快速启动按钮”区、

程序按钮区，再下来是任务栏图标区，在上面一般会有音量调节图标和输入法调节图标和时钟等。

本文首先介绍如何隐藏任务栏中的上面介绍的部分。我们知道利用Windows的Api函数ShowWindow可以隐藏或

者显示窗口，关键是如何得到窗口的句柄。在Windows下的每一个窗口不但有一个窗口句柄标示窗口，还有一个称

为类名的字符串标示窗口。如果知道窗口的类名，通过FindWindow函数就可以获得窗口的句柄。而Windows桌面

本身就是一个窗口，桌面图标区、任务栏以及任务栏下的开始按钮等都是它的子窗口。我们可以通过FindWindowEx

函数来寻找这些窗口。再利用ShowWindow函数隐藏或显示窗口。下面通过一个Delphi的范例来演示如何控制任务栏。

首先建立一个新的Delphi工程，然后在Form1中加入7个CheckBox控件，然后在Form1中添加下面的代码：

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

StdCtrls;

type

TForm1 = class(TForm)

CheckBox1: TCheckBox;

CheckBox2: TCheckBox;

CheckBox3: TCheckBox;

CheckBox4: TCheckBox;

CheckBox5: TCheckBox;

CheckBox6: TCheckBox;

CheckBox7: TCheckBox;

procedure FormCreate(Sender: TObject);

private

procedure CheckButtonClick(Sender:TObject);

{ Private declarations }

public

{ Public declarations }

end;

Const

file://定义不同窗口的类名

sTrayWindow = 'Shell_TrayWnd';

sTrayNotify = 'TrayNotifyWnd';

sStartButton = 'Button';

sAppSwitchBar = 'ReBarWindow32';

sAppSwitch = 'MSTaskSwWClass';

sAppIcon = 'ToolbarWindow32';

sTrayClock = 'TrayClockWClass';

sDesktopIcon = 'ShellDll_DefView';