为什么我可以在 Delphi 中将 Single 除以 Variant，它的用途是什么？

Question

我很惊讶地看到，浮点值可以除以 Delphi 中的 Variant。一个简单的例子说明可以做什么：

var
  v: Variant;
begin
  v := 2.3;
  Tag := 5.1 div v; // 2
  Tag := 5.1 mod v; // 1
  Tag := 5.1 div 2; // [dcc32 Error] E2015 Operator not applicable to this operand type
  Tag := 5.1 mod 2; // [dcc32 Error] E2015 Operator not applicable to this operand type
end;

看起来 Delphi 在执行 div/mod 操作之前将左部分和右部分舍入。

我希望上面的代码在编译时会在所有 4 行中产生错误，因为我的理解是 div/mod 无论如何都不适用于浮点值。显然情况并非如此。

为什么我可以在 Delphi 中将 Single 除以 Variant，它需要什么？

Answer 1

来自Variants in Expressions：

如果表达式将变体与静态类型值组合在一起，则静态类型值会自动转换为变体。

这意味着浮点类型的文字首先被转换为变体。

然后在执行 div/mod 操作之前，两个变体都被隐式转换为整数值以匹配运算符。 Variant Type Conversions

..它有什么用？

只是为了尽可能多才多艺并完全支持 OLE。