delphi 中有这么的写法吗

delphi 中有这样的写法吗
平常可以给一个布尔变量赋值： Boolean:=(2>1);
我在想有没有能像 Integer:= if(boolean,Integer1,Integer2)这样返回一个整数值直接给整数变量的写法，这样的话可以写在一行，而不需要用if ... then...了, 不是我懒，而是希望语法能写的简洁些，如果有，能举个例吗，没有的话就没办法了，只好用if ..then！谢谢高手指点

------解决方案--------------------
对不起，么有。。

------解决方案--------------------
期望xe5之后能支持完整的三元运算赋值 delphi 中有这么的写法吗