我有一个Delphi项目的表单。 表格上有一个button。 当用户点击button时,我想让它打开Windows资源pipe理器。
我需要什么代码来实现这个目标?
那么万一你需要在资源管理器中选择一些特定的文件,我有以下功能,我使用
procedure SelectFileInExplorer(const Fn: string); begin ShellExecute(Application.Handle, 'open', 'explorer.exe', PChar('/select,"' + Fn+'"'), nil, SW_NORMAL); end;
你可以称之为:
SelectFileInExplorer('C:\Windows\notepad.exe');
编辑:如上所述,ShellAPI必须添加到您的使用列表
基于梅森·惠勒(Mason Wheeler)所说的话:你也可以将一个目录作为一个参数传递给一个非默认的位置:
uses ShellAPI; ... ShellExecute(Application.Handle, nil, 'explorer.exe', PChar('c:\'), //wherever you want the window to open to nil, SW_NORMAL //see other possibilities by ctrl+clicking on SW_NORMAL );
尝试这个:
ShellExecute(Application.Handle, nil, 'explorer.exe', nil, nil, SW_NORMAL);
您需要将ShellAPI
添加到您的使用子句中。
ShellExecute(Application.Handle, 'explore', '.', nil, nil, SW_NORMAL);