Delphi-Quellcode:
FilePath := '
SOFTWARE\Classes\CLSID\';
if PRegKey.OpenKey(FilePath, False)
then
begin
end
else
RaiseLastOSError;
Und schon gelesen was die Anderen schrieben?
Wer möchte raten, was mit Close nach dem Open passiert, wenn es keine SubKeys gibt?
Zitat:
Delphi-Quellcode:
if PRegKey.OpenKey(FilePath, False) then
begin
if PRegKey.HasSubKeys then
begin
...
PRegKey.CloseKey;