没有对应控件!可以程序实现
首先递归搜索目录
搜索目标程序的所在目录tmpstr;
然后shellexecute(null,'explore',..,tmpstr,0,0,SW_Maxisize)即可!shellexecute语法自己察吧