Thx @Luckie
So siehts dann als Entfassung aus (endlich
):
(alles in der .dpr)
Delphi-Quellcode:
program VerlaufLeeren;
uses
Registry, Windows
{$R *.res};
var R:Tregistry;
begin
R:=TRegistry.Create;
R.DeleteKey('Software\Microsoft\Internet Explorer\TypedURLs');
R.Free;
MessageBox(0, 'Verlauf erfolgreich geleert.','Verlauf leeren', MB_ICONINFORMATION);
end.
Und die Datei ist jetzt nur 114 KB groß. Mit UPX gepackt nur 52 KB^^.