Delphi 隐藏桌面图标 并显示图标.rar

Delphi 隐藏桌面图标 并显示图标，运行这个小程序后，单击窗口上的对应按钮，即可演示对应的功能，其实实现这个功能挺简单的，可以使用Delphi中内置的函数功能来实现，比如： 　　procedure TForm1.Button1Click(Sender: TObject); 　　var 　　hDesktop : THandle; 　　begin 　　 hDesktop := FindWindow('Progman', nil); 　　//隐藏桌面图标的实现： 　　 ShowWindow(hDesktop, SW_HIDE); 　　end; 　　//以下是显示桌面图标，同样很简单： 　　procedure TForm1.Button2Click(Sender: TObject); 　　var 　　hDesktop : THandle; 　　begin 　　 hDesktop := FindWindow('Progman', nil); 　　 ShowWindow(hDesktop, SW_SHOW); 　　end; 　　我们大致是使用了Delphi中的ShowWindow函数来实现的，具体用法请见代码。