Windows 탐색기를 열고 디렉토리,

Question

내가 디렉토리 경로를 전달되는 Windows 탐색기에서 폴더를 열 수있는 방법이 (델파이) 특정 파일을 선택 파일 이름 (전체 파일 이름 경로 또는 이름 + 확장자 중 하나)을 선택하고 Windows 탐색기에서 폴더를 열어 강조 표시하거나 선택하십시오. 내가 갈 위치는 많은 파일을 가지고 있으며 Windows에서이 파일을 조작해야합니다.

ShellExecute(0, nil, 'explorer.exe', '/select,C:\WINDOWS\explorer.exe', nil, 
    SW_SHOWNORMAL) 

다소 더 멋진 (그리고 아마도 또한 더 신뢰할 수있는) 방법 (uses ShellAPI, ShlObj) : 당신이 explorer.exe를 호출 할 때

Answer 1

예, /select flag을 사용할 수 있습니다

const 
    OFASI_EDIT = $0001; 
    OFASI_OPENDESKTOP = $0002; 

{$IFDEF UNICODE} 
function ILCreateFromPath(pszPath: PChar): PItemIDList stdcall; external shell32 
    name 'ILCreateFromPathW'; 
{$ELSE} 
function ILCreateFromPath(pszPath: PChar): PItemIDList stdcall; external shell32 
    name 'ILCreateFromPathA'; 
{$ENDIF} 
procedure ILFree(pidl: PItemIDList) stdcall; external shell32; 
function SHOpenFolderAndSelectItems(pidlFolder: PItemIDList; cidl: Cardinal; 
    apidl: pointer; dwFlags: DWORD): HRESULT; stdcall; external shell32; 

function OpenFolderAndSelectFile(const FileName: string): boolean; 
var 
    IIDL: PItemIDList; 
begin 
    result := false; 
    IIDL := ILCreateFromPath(PChar(FileName)); 
    if IIDL <> nil then 
    try 
     result := SHOpenFolderAndSelectItems(IIDL, 0, nil, 0) = S_OK; 
    finally 
     ILFree(IIDL); 
    end; 
end;