如何实现像任务条一样，在拖宽后，桌面空间及其他程序的工作空间变小？

Question

基本上需要处理SHAppBarMessage函数，这里：
http://www.geocities.com/SiliconValley/9486
有一个带源程序的AppBar类型的组件下载。

Answer 1

好像没有这个网页呀！连不到，geocities说这个网页不存在

Answer 2

哎，不需要那个消息，用systemparametersinfo()就可以了。下面的代码测试通过，运行后打开一个程序最大化就知道了。
//别忘了给分.............^_^
var
 p:trect;
begin
p.Left:=0;
p.Top:=0;
p.Bottom:=560;
p.Right:=780;
SystemParametersInfo(SPI_SETWORKAREA,0,@p,SPIF_SENDWININICHANGE)
end;