Delphi Sources

Заставить IE перечитать установки из реестра



Оформил: DeeCo

{ 
  I've written a small app that modifies a setting for IE and need to somehow tell 
  IE to re-read the registry settings. 
  Does anyone know of an API call or message that will do this? 
}

 uses
   WinInet;

 procedure IE_Reread_Registry_Settings;
 var
   HInet: HINTERNET;
 begin
   hInet := InternetOpen(PChar('YourAppName'), INTERNET_OPEN_TYPE_DIRECT,
     nil, nil, INTERNET_FLAG_OFFLINE);
   try
     if hInet <> nil then
       InternetSetOption(hInet, INTERNET_OPTION_SETTINGS_CHANGED, nil, 0);
   finally
     InternetCloseHandle(hInet);
   end;
 end;