Аналог в Делфи операции из Си

← →
dvm (2003-01-26 16:09) [0]

Подскажите, может есть более короткий способ создать в Delphi аналог операции из си:
myfunction(a?b:c)
а то в Делфи, что-то короче чем:

if a then temp:=b else temp:=b
MyFunction(temp);

не получается

← →
Романов Р.В. (2003-01-26 16:21) [1]

if a then MyFunction(b) else MyFunction(с);

или

MyFunction(IFA(a, b, c));

где

function IFA(a, b, c): TypeB;
begin
if a then Result:=b else Result:=c;
end;

← →
dvm (2003-01-26 16:29) [2]

> function IFA(a, b, c): TypeB;
> begin
> if a then Result:=b else Result:=c;
> end;

Да, но она не универсальна. Вот если бы тип возвращаемого функцией результата выбирался исходя из типов a, b, c.

← →
asmith (2003-01-26 16:55) [3]

Функцмя IfThen - появилась в D6.

← →
Anatoly Podgoretsky (2003-01-26 17:24) [4]

//***************** //* Immidiate IF * //***************** function IIF(Expr,TrueRet,FalseRet:Variant) : Variant; begin if Expr then Result := TrueRet else Result := FalseRet; end;

Вот эта универсальная, работает как минимум начиная с Д2

← →
Романов Р.В. (2003-01-26 17:35) [5]

Интересно как сделана IfThen?

← →
Serious Sam (2003-01-26 21:49) [6]

>короче ...не получается

Да, потому, что object pascal язык такой. Квадратно-гнездовой.
(Прошу ногами не пинать)

← →
jack128 (2003-01-26 22:56) [7]

2 Serious Sam Зачем ногами, мы сразу ломом по балде и нет проблем

2 dvm паскаль вообще не изабилует сокращениями, превыкай

Аналог в Делфи операции из Си Найти похожие ветки