如何关闭打开的文件夹

[wjhh]

如何用程序关闭打开的所有文件夹,如我的电脑等.

[lxpbuaa]

PostMessage(FindWindow('ExploreWClass', nil), WM_CLOSE, 0, 0);

—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————