Registry Eintrag: RegisteredOwner ???

[Piro]

Folgender Code macht mir Probleme und ich weiß nicht warum.

Delphi-Quellcode:

function GetOwner: string;
var reg: TRegistry;
begin
  result:='N/A';
  reg:=TRegistry.Create;
  try
    reg.RootKey := HKEY_LOCAL_MACHINE;
    reg.OpenKey('Software\Microsoft\Windows NT\CurrentVersion', false);
    result := reg.ReadString('RegisteredOwner');
  finally
    reg.free;
  end;
end;

Aufruf:

Delphi-Quellcode:

procedure Tfrm_main.FormShow(Sender: TObject);
begin
 lbl_besitzer.Caption      := GetOwner;
end;

Fehlermeldung beim Aufruf: Inkompatible Typen: 'String' und 'TPersisten'.

Was soll das denn sein? Denn wenn ich die ProductId fast die gleich Funktion benutze, klappt alles wunderbar.

keine Ahnung, brauche mal einen Hinweis?

Danke