Delphi——将整数转换为类型指针？

Question

我在使用 Delphi 语法时遇到了一些问题。

我有一个记录:

type
  TMyType = record
    ....
  end;

和一个过程:

procedure Foo(bar:Integer);
var
  ptr : ^TMyType
begin
  ptr := bar //how to do this?
end;

如何正确地将整数转换为 TMyType 的指针？

Answer 1

像这样:

type
  PMyType = ^TMyType;

procedure Foo(bar: Integer);
var
  ptr: PMyType;
begin
  ptr := PMyType(bar);
end;