Delphi-Help

Главная Статьи Браузер Закрытие всех окон IE

Закрытие всех окон IE

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


Закрытие всех окон IE

Procedure CloseAllIE_1;
var
   ie:HWND;
  begine
    //Ищем окно IE
    ie:=FindWindow(`IEFrame`, nil);
    //пока найдено окно IE...
    while ie<>0 do
      begin
        //... закрываем его
        postmessage (ie, WM_CLOSE, 0, 0);
        //ищем следующее
        ie:=FindWindow (`IEFrame`, nil);
      end;
end;
Прочитано 5214 раз

Авторизация



Счетчики