HKEY und String was tuen ?

[MisterNiceGuy]

Für alle die die gegenteilige Funktion interessiert:

Delphi-Quellcode:

function TForm1.hkeytostr(rootkey:hkey):string;
begin
  case rootkey of
    HKEY_CLASSES_ROOT : result := 'HKEY_CLASSES_ROOT';
    HKEY_CURRENT_USER : result := 'HKEY_CURRENT_USER';
    HKEY_LOCAL_MACHINE : result := 'HKEY_LOCAL_MACHINE';
    HKEY_USERS : result := 'HKEY_USERS';
    HKEY_CURRENT_CONFIG : result := 'HKEY_CURRENT_CONFIG';
  end;
end;