AV beim Lesen eines Strings aus Registry mit RegQueryValueEx

[Luckie]

Hast du jetzt irgendwas geändert? Ich verstehe deinen Kommentar nicht.

Habs:

Code:

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, nil,
    @cbData);
  if cbData <> 0 then
  begin
    GetMem(Buffer, cbData);
    try
      result := RegQueryValueEx(FhkResult, PChar(ValueName), nil, @lpType,
        @Buffer[u][b][0][/b][/u], @cbData);
      Value := Buffer;  // <- hier AccessViolation
    finally
      FreeMem(Buffer);
    end;
  end;
end;