デスクトップ上のアイコンを消す

何の役に立つのか解りませんが紹介しておきます。デスクトップ上のアイコン(マイコンピュータやごみ箱)を消去するにはデスクトップそのものを非表示にすればOKです。やり方は前回紹介したタスクバーを消去するのと同じです。

■ デスクトップ上のアイコンを消す例 
var
  DesktopHnd  :  integer;
begin
  DesktopHnd     :=     FindWindow('Progman',nil);
  ShowWindow(DesktopHnd, SW_HIDE);
end;

ShowWindow APIで SW_HIDEの代わりに SW_SHOWを送れば表示されます。