AV beim Lesen eines Strings aus Registry mit RegQueryValueEx

[Luckie]

Ich benutze folgenden Code, um einen String aus der Registry zu lesen:

Delphi-Quellcode:

function TMpuRegistry.ReadString(const ValueName: string; var Value: string):
  LongInt;
var
  cbData: Integer;
  lpType: DWORD;
  Buffer: PChar;
begin
  // get size of required data
  result := RegQueryValueEx(FhkResult, PChar(ValueName), nil, @lpType, @Value,
    @cbData);
  if cbData <> 0 then
  begin
    GetMem(Buffer, cbData);
    try
      result := RegQueryValueEx(FhkResult, PChar(ValueName), nil, @lpType,
        @Buffer, @cbData);
      Value := string(Buffer);  // <- hier AccessViolation
    finally
      FreeMem(Buffer);
    end;
  end;
end;

An der markierten Stelle bekomme ich leider immer eine AV. Integer lesen geht problemlos, wenn ich Buffer als Integer deklariere, lesen. Wo steckt da jetzt schon wieder der Teufel?