1,183
社区成员
发帖
与我相关
我的任务
分享
FilePath:='C:\1.jpg';
ShellExecute(Handle, 'open', 'Explorer.exe', Pchar('/n,/select,'+ FilePath ),nil, 1);
//加上 /n 参数
FilePath:='D:\Test\test1.txt';
ShellExecute(Handle, 'open', 'Explorer.exe', Pchar('/select,'+ FilePath ),nil, 1);