c++的(char*)&unint64对应delphi怎么写？

[Grese2016]

c++的(char*)&unint64对应delphi怎么写？

unint64 是数据类型，如果定义unint64 uval;则其语句表达式是：

(char*)&uval

[wdonghai]

//Delphi7
procedure TForm1.Button1Click(Sender: TObject);
var
  uval:uint64;
  c:char;
begin
  uval:=97;
  c:=PChar(@uval)^;
  showmessage(c);
end;