Registry Value per Schlüssel auslesen..

[Nogge]

Hallo Nero,
Hier ein kleines Beispiel fürs Auslesen von Registry Werten:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var Reg:TRegistry; Value: String;
begin
  Reg:=TRegistry.Create;
  try
    { -- Hauptordner festlegen -- }
    Reg.RootKey:=HKEY_CURRENT_USER;
      { -- einen best. Registry Ordner auswählen -- }
      Reg.OpenKey('Control Panel\Mouse',false);
      { -- einen best. Wert des Typs String aus dem ausgewählten Ordner auslesen -- }
      Value:=Reg.ReadString('MouseSpeed');
    { -- Schlüssel schließen, wenn danach z.B. ein anderer Ordner geöffnet werden soll -- }
    Reg.CloseKey;
  finally
    Reg.Free;
  end;
  ShowMessage(Value);
end;