Na sagen wir mal: fast.
Ein "C:\D5\Borland" Installationsverzeichnis für Delphi 5 wird nicht gefunden.
Eigentlich seltsam,
die Funktion
Delphi-Quellcode:
function RegReadStr(const RegPath, RegValue:string; var Str: string;const RootKey :HKEY): Boolean;
var
Reg: TRegistry;
begin
try
Reg := TRegistry.Create;
try
Reg.RootKey := RootKey;
Result := Reg.OpenKey(RegPath, True);
if Result then Str:=Reg.ReadString(RegValue);
finally
Reg.Free;
end;
except
Result := False;
end;
end;
liefert für Result=Reg.Openkey ('\Software\Borland\Delphi\5.0')
zwar True zurück, aber beim
Reg.Readstring (RegValue ='App')
ist der Inhalt leer (obwohl in der Registry "C:\D5\Borland\Delphi5\Bin\Delphi32.exe" drin ist).