Delphi-Help

Главная Статьи Windows Как перезагрузить Explorer?

Как перезагрузить Explorer?

Оцените материал
(0 голосов)


Как перезагрузить Explorer?

uses
  ..., ShellAPI;
 
procedure TForm1.Button1Click(Sender: TObject);
var
  wnd: HWND;
begin
   wnd := FindWindow( 'Progman', nil );
   PostMessage( wnd, WM_QUIT, 0, 0 );
   ShellExecute( 0, 'open', 'Explorer', nil, nil, SW_SHOWNORMAL );
end;
Прочитано 5319 раз

Авторизация



Счетчики