Delphi简单数据类型等价

Question

在Delphi中，如果X和Y是整数，如何编写代码使X和Y指向同一内存位置？所以，如果我说；

Y := 3;
X := 6;
write(Y);

输出将是6？据我所知，Delphi中简单类型赋值的默认行为是通过值而不是通过引用。

Answer 1

对于与另一个变量具有相同地址的变量，请使用absolute指令：

var
Y: Integer;
X: Integer absolute Y;
..
Y := 3;   // X = 3
X := 6;   // Y = 6

或者，您可以使用指针任意指向内存位置：

var
Y: Integer;
X: PInteger;
begin
Y := 6;
X := @Y;
Write(X^);   // 6