首先，先把你提供的示例代码贴出来方便理解：

program ChainedConundrum;
{$APPTYPE CONSOLE}
{$R *.res}
uses System.SysUtils;
type
  ValueType = Double;
  TRec = record
    function GetValue(out AOutput: ValueType): TRec;
    procedure ShowValue(const AInput: ValueType);
  end;
function TRec.GetValue(out AOutput: ValueType): TRec;
begin
  AOutput := 394;
  Result := Self;
end;
procedure TRec.ShowValue(const AInput: ValueType);
begin
  Writeln(AInput);
end;
var
  R: TRec;
  Value: ValueType = 713;
begin
  R.GetValue(Value).ShowValue(Value);
  Readln;
end.

你观察到的核心矛盾 #

你预期输出394，但实际表现却因编译平台、数据类型、参数修饰符不同而产生差异：

• 32位Delphi 10.3.2编译：输出初始值713，调试确认ShowValue拿到的是GetValue执行前的Value
• 64位编译：输出更新后的394
• 类型替换差异：
  • Int32：32/64位都输出394
  • Int64：64位输出394，32位输出713
  • 字符串：两个版本都输出更新后的值
• 其他场景：
  • 拆分方法链（分两行调用）：始终输出394
  • ShowValue参数改var：始终输出394
  • 类静态方法：始终输出394，但类实例方法和记录表现一致

本质原因：未定义的表达式求值顺序 #

这不是编译器Bug，而是Delphi语言规范中未明确规定复杂表达式的子求值顺序，不同平台的编译器做了不同的优化选择。

在R.GetValue(Value).ShowValue(Value)这个表达式里，编译器需要处理两个子任务：

1. 计算ShowValue的const参数Value的值
2. 执行GetValue方法（它会修改Value）并获取返回的记录实例

Delphi并没有强制规定这两个任务的执行顺序，所以：

• 32位编译器选择了先把Value的初始值加载到ShowValue的参数位置，再执行GetValue，导致输出713
• 64位编译器则选择了先执行GetValue更新Value，再加载参数值，所以输出394

为什么不同场景表现不同？ #

• Int32 vs Int64/Double：32位编译器中，Int32参数可以直接通过寄存器传递，而Int64/Double需要用栈或引用传递，编译器的寄存器分配策略间接影响了求值顺序的选择；
• const vs var：var参数传递的是变量地址，编译器必须确保GetValue先执行（因为后续会通过地址修改值），而const参数编译器可能提前缓存值，避免重复读取；
• 拆分方法链：拆分后变成两个独立语句，语句之间是明确的序列点（Sequence Point），GetValue执行完成后才会调用ShowValue，所以值一定是更新后的；
• 类静态方法：静态方法不需要实例，编译器会优先处理实例方法GetValue的执行，再处理静态方法的参数，所以总能拿到更新后的值；
• 字符串类型：Delphi字符串是引用类型，const参数传递的是引用，即使提前获取引用，GetValue修改的是引用指向的内容，所以最终能看到更新后的值。

是否属于非法行为？ #

这种写法不是语法错误，但属于行为未定义的代码——因为Delphi语言规范没有保证这种表达式的求值顺序，所以不同编译器版本、平台的表现可能不一致。

虽然Delphi官方文档没有像C++那样详尽罗列序列点，但在《Delphi Language Guide》中有明确提示：

除非语言特性明确指定了求值顺序（比如短路逻辑运算符and/or、赋值语句），否则表达式的子求值顺序由编译器自行决定，开发者不应依赖这种未定义的顺序编写代码。

可靠的解决方案 #

要保证跨平台、跨版本的行为一致，最稳妥的方式是拆分方法链，引入明确的序列点：

R.GetValue(Value);
R.ShowValue(Value);

如果一定要用方法链，可以改成通过返回值传递数据，避免依赖out参数的副作用：

type
  TRec = record
    function GetValue: Double;
    procedure ShowValue(const AInput: Double);
  end;

// 调用方式
R.ShowValue(R.GetValue);

内容的提问来源于stack exchange，提问作者Andreas Rejbrand