Delphi7 打开 Windows 资源管理器转到文件夹并选中指定文件.
var strFilePath: string; begin ShellExecute(Handle, 'open', PChar('explorer.exe'), PChar('/select,' + strFilePath), nil, SW_NORMAL); end;