Registry Standartwert schreiben ?

[ebber]

Hallo

ich möchte was in die Registry schreiben

Delphi-Quellcode:

  with TRegistry.Create do
  begin
    try
      Rootkey:=HKEY_CLASSES_ROOT;
      if OpenKey('.xxx',True) then
      begin
        WriteString('ZZZ','YYY');
      end;
    finally
      Free;
    end;
  end;

so. Das Problem ist der Wert hat keinen Namen also kein ZZZ einfach nur (Standartwert) steht da. Wie mache ich das dann ?


MfG