Registry Key in Memo speichern [Geklärt]

[Flips]

Hi.

Geht auch ohne Zwischenvariable, les den Key direkt ins memo ein.

Delphi-Quellcode:

procedure TForm3.FormCreate(Sender: TObject);
var reg : TRegistry;
begin
reg := TRegistry.Create;
try
  reg.RootKey := HKEY_CURRENT_USER;
  //Als Beispiel
  reg.OpenKey('Printers',false);
  memo1.Text := reg.ReadString('DeviceOld');
finally
  FreeAndNil(reg);
end;
end;