为什么在运行后会出现异常

var pp2:PChar;
   // pp2:PByte;
GetMem(pp2,255);
kk:=TRegistry.Create;
  kk.RootKey:=HKEY_LOCAL_MACHINE;
  kk.OpenKey('SOFTWARE\Microsoft\',false);
  //kk.WriteBinaryData('bb',pp,128);
  kk.ReadBinaryData('bb',pp2,128);
  kk.CloseKey;
  kk.Free;
为什么在运行后会出现异常。换成PByte也不行，