Da könnte euch das hier weiterhelfen, denn es gibt ne Art WhiteList:
Delphi-Quellcode:
reg := TRegistry.Create;
try
reg.RootKey := HKEY_LOCAL_MACHINE;
if reg.OpenKey('\SOFTWARE\Microsoft\HTMLHelp\1.x\ItssRestrictions', true)
then
begin
reg.WriteString('UrlAllowList', ExcludeTrailingpathDelimiter(chmFile) +
';file//' + ExcludeTrailingpathDelimiter(chmFile));
reg.CloseKey;
end;
finally
FreeAndNil(reg);
end;
Ist jetzt ein Beispiel mit einigen Macken, zB wird der vorhandene String einfach überschrieben, das sollte man also noch ändern
//Edit
roter Kasten?
Bei mir hat bisher immer dieser eine gelangt.