在 Delphi/Free Pascal 中：^ 是运算符还是仅表示指针类型？

Posted 2023-02-14

【中文标题】在 Delphi/Free Pascal 中：^ 是运算符还是仅表示指针类型？

【英文标题】：In Delphi/Free Pascal: is ^ an operator or does it simply denote a pointer type?

【发布时间】：2012-03-10 08:41:50

【问题描述】：

示例代码

program Project1;

$APPTYPE CONSOLE

var
    P: ^Integer;

begin
    New(P);

    P^ := 20;
    writeln(P^); // How do I read this statement aloud? P is a pointer?

    Dispose(P);

    readln;
end

【问题讨论】：

如果你使用过 C 或 C++，你可以将你看到的 ^ 翻译成与 * 基本相同的东西，除了 ^ 是用于取消引用时的后缀（写在之后）和之前用于声明一个指向 X 的指针，而 C 始终将 * 放在它要取消引用的事物之前。 X^ == (*X)。

P^ 读取 [pointer] P 取消引用。授予：^T 读取对类型 T 的引用。第一个是表达式，第二个是声明。

顺便说一句。 Delphi 中的幂运算符不是^。您需要使用function Power(x, y)。

【参考方案1】：

当^ 用作类型的一部分时（通常在类型或变量声明中），它表示“指向”。

例子：

type
  PInteger = ^Integer;

当^ 用作一元后缀运算符时，它的意思是“取消引用该指针”。所以在这种情况下，它的意思是“打印P 指向的内容”或“打印P 的目标”。

例子：

var
  i: integer; 
  a: integer;     
  Pi: PInteger;
begin
  i:= 100;
  Pi:= @i;  <<--- Fill pointer to i with the address of i
  a:= Pi^;  <<--- Complicated way of writing (a:= i)
            <<--- Read: Let A be what the pointer_to_i points to
  Pi^:= 200;<<--- Complicated way of writing (i:= 200)
  writeln('i = '+IntToStr(i)+' and a = '+IntToStr(a)); 

【讨论】：

谢谢，我在考虑前缀与后缀...我只是出于某种原因对符号感到困惑！

有趣的是，如果指针是指向记录的指针，则允许使用 R^.value 或 R.value（无论如何是 delphi 7）

@Dampsquid 是的，. 运算符会在必要时隐式取消对左侧指针的引用。与 c 不同，c 中同时存在 . 和取消引用等价物 ->。 |当你使用函数指针时，语法会变得非常混乱，因为即使是地址获取运算符 @ 也可以成为可选的。

再次感谢!!!* 就像我说的，我很困惑，因为我找不到任何说明它甚至是操作员的文档！但现在它是有道理的。 :>

@Dampsquid 这很奇怪......符号不能带有间接级别，这真的很奇怪。