Delphi - 将整数转换为类型指针?

Ear*_*rlz 2 delphi syntax pointers delphi-7

我在使用Delphi的语法时遇到了一些麻烦.

我有一个记录:

type
  TMyType = record
    ....
  end;
Run Code Online (Sandbox Code Playgroud)

和程序:

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

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

Dav*_*nan 7

像这样:

type
  PMyType = ^TMyType;

procedure Foo(bar: Integer);
var
  ptr: PMyType;
begin
  ptr := PMyType(bar);
end;
Run Code Online (Sandbox Code Playgroud)

  • Pascal对象是一种强类型语言,因此在不同类型之间强制转换. (2认同)