如何隐藏和显示桌面？

Question

var
  hdesktop:thandle;
begin
  hDesktop := FindWindow('ProgMan',nil) ;
  showwindow(hdesktop,sw_show)//显示桌面。
  //showwindow(hdesktop,sw_hide);//隐藏桌面。
end;

Answer 1

找到桌面窗口的句柄，然后设置它的显示方式
var ls:hwnd
ls:=findwindow('Progman',nil);
showwindow(ls,sw_hide);//隐藏图标//showwindow(ls,sw_show);//显示图标

Answer 2

谢谢大家的回答，测试已通过！
但我又想到另一个问题：字符串‘progman’为什么可以表示桌面呢？？如果将它改为'shell_traywnd'就可以隐藏显示任务栏，它们难道是系统中的常量吗，如果是的话，还有别的相关常量吗？作为一个api初级用户怎样才能知道所有的这些常量？？？？
我一定会加分的：）

Answer 3

windows给他们名命的名,我们也没有办法!:)关于ms指明的常量可多呢,多看看API方面的书啊,还有windows sdk help,够你记的!