Delphi IIF

function IIF<T>(Condition: Boolean; TrueValue: T;  FalseValue: T): T;

begin  

  if Condition then    

    result := TrueValue  

  else    

    result := FalseValue;

end;

注:Delphi 2009\2010 支持泛型，其它版本不支持。