Delphiにはx = a ? b : cのような3項演算子は無いのでしょうか？
if a then
x := b
else
x := c;
とやるしか無いのですか？