Windows 탐색기 다시 시작

Question

하나의 단추가있는 양식이 하나 있습니다. Button1.Click에서 Windows 탐색기를 다시 시작해야합니다. 나는 그것을 봤지만 적절한 해결책을 얻지 못했다. 모든 솔루션은 WinXP, Vista에서는 작동하지만 Win7에서는 작동하지 않습니다. 정확한 해결책을 제공해주십시오.

Answer 1

추가 윈도우 7에서 TlHelp32

에 사용하는 이상,이 기능이 작동 :

function KillTask(ExeFileName: string): Integer; 
const 
    PROCESS_TERMINATE = $0001; 
var 
    ContinueLoop: BOOL; 
    FSnapshotHandle: THandle; 
    ProcessHandle: Cardinal; 
    FProcessEntry32: TProcessEntry32; 
begin 
    Result := 0; 
    FSnapshotHandle := CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0); 

    if FSnapshotHandle = INVALID_HANDLE_VALUE then 
    RaiseLastOSError; 
    try 
    FProcessEntry32.dwSize := SizeOf(FProcessEntry32); 
    ContinueLoop := Process32First(FSnapshotHandle, FProcessEntry32); 

    while Integer(ContinueLoop) <> 0 do 
    begin 
     if ((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) = 
     UpperCase(ExeFileName)) or (UpperCase(FProcessEntry32.szExeFile) = 
     UpperCase(ExeFileName))) then 
     begin 
     ProcessHandle:= OpenProcess(PROCESS_TERMINATE, BOOL(0),  FProcessEntry32.th32ProcessID), 0); 
     if ProcessHandle > 0 then 
     begin 
      try 
      Result := Integer(TerminateProcess(ProcessHandle); 
      finally 
      CloseHandle(ProcessHandle); 
      end; 
     end 
     else 
      RaiseLastOSError; 
     end; 
     ContinueLoop := Process32Next(FSnapshotHandle, FProcessEntry32); 
    end; 
    finally 
    CloseHandle(FSnapshotHandle); 
    end; 
end; 

그것은 죽이고 다시 시작!

KillTask('explorer.exe'); 

이전 버전에서는 It Only Kills !!