Imagino que preguntas como convertir un PByte a Byte, para eso debes hacer un casting a Byte:
Ejemplo:
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
var
puntero: PByte;
begin
puntero:=PByte(13);
ShowMessage(IntToStr(Byte(puntero)));
end;
Saludos