Hallo,
ich habe auch schon drüben im Lazarusforum gefragt, aber doppelt hält ja besser :-)
Ich glaube, ich stehe gerade irgendwie auf dem Schlauch. Warum funktioniert diese Methode nicht, die Registry auszulesen. Ich möchte testweise den Wert von "HKEY_LOCAL_MACHINE\SOFTWARE\Lazarus\Capabilities\ ApplicationName" auslesen, dieser müsste eigentlich "Lazarus
IDE" sein, aber wenn ich den Code ausführe, bekomme ich einen leeren Wert zurück. Woran könnte das liegen?
Delphi-Quellcode:
procedure TForm1.RegistryAuslesen;
var Registry: TRegistry;
Test: string;
begin
Registry:=TRegistry.Create;
{Testweise auslesen von HKEY_LOCAL_MACHINE\SOFTWARE\Lazarus\Capabilities\ApplicationName}
Registry.RootKey:=HKEY_LOCAL_MACHINE;
Registry.OpenKey('SOFTWARE\Lazarus\Capabilities', true);
Test:=Registry.ReadString('ApplicationName');
ShowMessage(Test);
{"Schließen" der Registry}
Registry.CloseKey;
Registry.free;
end;
Dankeschön :-)