Korrekt Fehler bei Zugriff auf Registry abfangen

[wolle72]

Hi,

um in die Registry zu schreiben habe ich das hier gefunden:

Delphi-Quellcode:

begin
    Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_LOCAL_MACHINE;
    Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Run', True);
    Reg.WriteString('TempCleaner','"' + ParamStr(0) + '" ' + ParamStr(1) + ' "' + ParamStr(2) + '"');
    Reg.CloseKey;
  finally
    Reg.Free;
  end;
  end;

Klappt auch prima. Nur wenn ich (unter Vista) keine Admin-Rechte habe dann hängt sich das Programm auf. Wenn ich aber das "finally" durch ein "except" ersetze klappt alles prima. Dann wird zwar bei den fehlenden Rechten nix gemacht, aber es hängt sich auch nix auf.

Seht ihr ein Problem dabei wenn ich ein "except" verwende ?

Viele Grüssle
Wolle