Delphi - 相当于 C# 的三元运算符？

Question

可能的重复：
是否有，或者Delphi 中是否存在条件运算符？

我知道 Delphi 没有像 C# 中那样的三元运算符。 ie ?:

那么如何最好地表示这个函数调用呢？最干净的方法是什么？

如果有任何代码可以用来代替编写单独的函数，那就太好了？如果不是，那么最有效和/或最干净的代码表示是什么？

Answer 1

当然，您可以

IfThen(SomeBooleanExpression, IfTrueReturnValue, IfFalseReturnValue)

在返回值为数字（使用 Math）或字符串（使用 StrUtils）的情况下使用。但请注意，这将在所有情况下计算两个参数 - 没有惰性计算，因此它不如 C# 中的 ?: 运算符高效，后者仅计算正确的操作数。

所以你不能做

y := IfThen(x <> 0, 1/x, 0)

最好的事情就是坚持平凡

if x <> 0 then y := 1/x else y := 0;

Answer 2

最接近三元运算符的是：

if (condition) then <statement> else <statement>;

据我所知，Delphi 中没有三元运算符。

Answer 3

试试 Jedi 中的 Iff：

function Iff(const Condition: Boolean; const TruePart: string; const FalsePart: string): string; overload;
function Iff(const Condition: Boolean; const TruePart: Char; const FalsePart: Char): Char; overload;
function Iff(const Condition: Boolean; const TruePart: Byte; const FalsePart: Byte): Byte; overload;
function Iff(const Condition: Boolean; const TruePart: Integer; const FalsePart: Integer): Integer; overload;
function Iff(const Condition: Boolean; const TruePart: Cardinal; const FalsePart: Cardinal): Cardinal; overload;
function Iff(const Condition: Boolean; const TruePart: Float; const FalsePart: Float): Float; overload;
function Iff(const Condition: Boolean; const TruePart: Boolean; const FalsePart: Boolean): Boolean; overload;
function Iff(const Condition: Boolean; const TruePart: Pointer; const FalsePart: Pointer): Pointer; overload;
function Iff(const Condition: Boolean; const TruePart: Int64; const FalsePart: Int64): Int64; overload;
function Iff(const Condition: Boolean; const TruePart: Variant; const FalsePart: Variant): Variant; overload;