IE(Registry) ohne Neustart neu einlesen?

Hallo zusammen,

Ich bin ein Delphi-Neuling und brauche eure Hilfe.
Wenn ich die Sicherheitseinstellunge über „Extras, Internetoptionen, Sicherheit“ ändern will, sind dafür 7 Klicks notwendig. Nun habe ich ein kleines Programm erstellt, mit dem ich die gewünschten Änderungen mit einem Mausklick ändern kann.
Doch die Änderungen sind erst nach dem Neustart des IE wirksam.

Wer weiß, wie man den IE dazu bringt, im laufenden Betrieb die Registry neu einzulesen? Wenn man den „normalen Weg“ über die Internetoptionen nimmt, geht das ja auch.

Es gibt ein Forumbeitrag zu diesem Problem aber ich verstehe nicht was ich bei ‚AbbName‘ eintragen soll:
http://www.swissdelphicenter.ch/de/showcode.php?id=1619


procedure TMainForm.Button2Click(Sender: TObject);
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;


Ein Hinweis auf: http://ourworld.rst.de/thekid/Developer/Delphi/fnInt…
hat mich auch nicht schlauer gemacht ;(

Wäre euch für einen Tipp wirklich dankbar.
Vielen Dank im voraus,

Gruß Admiral

procedure TMainForm.Button2Click(Sender: TObject);
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;

Ist ziemlich egal, wenn ich das richtig sehen, was du bei AppName eintraegst.
Was du machen kannst, ist z.B den Namen deiner Applikation eintragen.
Falls du in den Projektoptionen deinem Projekt einen Namen gegeben hast, dann bekommst du den ueber Application.Title. Ansonsten kannst du statt ‚appName‘ auch ChangeFileExt(ExtractFileName(ParamStr(0)), ‚‘) eintragen.
Das extrahiert den Dateinamen ohne Pfad aus deiner Anwendung und schneidet dann noch die Extensio (meist .exe) ab.
Ich hoffe, das hilft dir weiter.