Delphi 13 - Ternary Operator

[bernau]

In Delphi 13 gibt es ein neues Sprachmerkmal

Coming in RAD Studio 13: A Conditional Ternary Operator for the Delphi Language

Delphi-Quellcode:

  if Left < 100 then
    X := 22
  else
    X := 45;
 
  // assignment with if operator
  X := if Left < 100 then 22 else 45;

oder

ShowMessage (if Left < 100 then 'Small' else 'Big'));

Soll mich das nun vom Hocker hauen? Was ist da nun der Vorteil zu einem

Delphi-Quellcode:

 
ShowMessage (ifthen(Left < 100, 'Small' ,'Big'));

Mir fehlt da etwas die Phantasie.

[himitsu]

IfThen ist im Delphi eine Prozedur.

In C und z.B. SQL/Postgres ist es (IIF) ein Makro.

Beim Makro werden die Parameter nur ausgeführt, wenn sie genutzt werden, also der nicht getroffene Teil wird dann nicht ausgeführt.
In Delphi werden vor Aufruf der Funktion alle Parameter ausgeführt.

Sowas kannst du in Delphi also nicht machen:
IfThen(Assigned(xxx), xxx.ToString, '(nil)')


Leider weigert sich Embarcadero wehement zumindestens die Definition einfacher Makros zu implementieren.

Delphi-Quellcode:

function aaa: string;
begin
  ShowMessage('aaa');
  Result := 'a';
end;

function bbb: string;
begin
  ShowMessage('bbb');
  Result := 'b';
end;


ShowMessage(IfThen(Random(2) = 0, aaa, bbb);

Hier siehst du aaa, bbb und dann noch a oder b.
Das Neue würde nur aaa und a ODER bbb und b anzeigen.

[himitsu]

Ohhhh cool, dann kann man auch endlich if true then 0 else 1; schreiben ... ist zwar total sinnlos und machst nichts (außer in eine implizite temporäre Variable reinzuschreiben, die aber hoffentlich wegoptimiert wird).

[jaenicke]

Ich verstehe zwar die Intention, dass man das ganze möglichst gut in Pascal-Syntax gießen wollte, aber dadurch geht ein erheblicher Vorteil des ternären Operators verloren:
Wenig syntaktische Zeichen zwischen den Werten zu haben.

Beispiel:

Delphi-Quellcode:

  A := if Left < 100 then 22 else 45;
  B := if Left < 200 then 33 else 11;
  C := if Left < 500 then 211 else 22;
  D := if Left < 1000 then 656 else 322;

Mit einfachem Operator:

Delphi-Quellcode:

  A := Left < 100 ? 22 : 45;
  B := Left < 200 ? 33 : 11;
  C := Left < 500 ? 211 : 22;
  D := Left < 1000 ? 656 : 322;

Und das dann noch mit farblicher Hervorhebung der Zahlen in der IDE...

Wie geschrieben verstehe ich den Hintergrund, finde allerdings eben, dass gerade bei mathematischen Quelltexten die Lesbarkeit / Übersicht durch die zusätzlichen Zeichen schlechter ist.

Nichtsdestotrotz finde ich gut, dass die Sprache weiterentwickelt wird. Und besser als IfThen ist das nun allemal.

[Uwe Raabe]

Der Vorteil dieser Schreibweise ist auch, dass der MMX Parser das klaglos hinnimmt

[dummzeuch]

Ich hätte da wohl eher die ifthen()-Funktionen per Compilerschalter zum Ternary-Operator gemacht. Oder vielleicht stattdessen eine iif()-Funktion eingeführt. Aber das hätte natürlich zu Inkompatibilitäten für existierenden Code führem können.

[peterbelow]

Zitat von jaenicke:

Ich verstehe zwar die Intention, dass man das ganze möglichst gut in Pascal-Syntax gießen wollte, aber dadurch geht ein erheblicher Vorteil des ternären Operators verloren:
Wenig syntaktische Zeichen zwischen den Werten zu haben.

Beispiel:

Delphi-Quellcode:

  A := if Left < 100 then 22 else 45;
  B := if Left < 200 then 33 else 11;
  C := if Left < 500 then 211 else 22;
  D := if Left < 1000 then 656 else 322;

Mit einfachem Operator:

Delphi-Quellcode:

  A := Left < 100 ? 22 : 45;
  B := Left < 200 ? 33 : 11;
  C := Left < 500 ? 211 : 22;
  D := Left < 1000 ? 656 : 322;

Und das dann noch mit farblicher Hervorhebung der Zahlen in der IDE...

Wie geschrieben verstehe ich den Hintergrund, finde allerdings eben, dass gerade bei mathematischen Quelltexten die Lesbarkeit / Übersicht durch die zusätzlichen Zeichen schlechter ist.

Das findet nur jemand lesbar, der mit C-basierter Syntax aufgewachsen ist.

[Uwe Raabe]

Zitat von jaenicke:

dass gerade bei mathematischen Quelltexten die Lesbarkeit / Übersicht durch die zusätzlichen Zeichen schlechter ist.

Der Operator ist aber auch nicht auf mathematische Quelltexte beschränkt:

Delphi-Quellcode:

  var Item := if List <> nil then List.First 
              else nil;

Ich kann Pascal/Delphi Code sehr schnell erfassen, aber aus dem "?" ein then zu lesen und aus ":" ein else klappt einfach nicht. Die jetzige Lösung kann ich dagegen sofort umsetzen.

Zitat von dummzeuch:

Ich hätte da wohl eher die ifthen()-Funktionen per Compilerschalter zum Ternary-Operator gemacht. Oder vielleicht stattdessen eine iif()-Funktion eingeführt. Aber das hätte natürlich zu Inkompatibilitäten für existierenden Code führem können.

Funktionen lösen das Problem nicht und eine unsichtbare Compiler-Magic ist auch nicht wirklich intuitiv. Es ist ja schon nicht mal sicher dass inline immer das macht was man erwartet.

[jaenicke]

Zitat von peterbelow:

Das findet nur jemand lesbar, der mit C-basierter Syntax aufgewachsen ist.

Ich habe immer hauptsächlich Delphi verwendet.

Mich stört eben, dass im Vergleich zu anderen Sprachen so viel zusätzliche Syntax nötig ist, z.B. auch bei anonymen Methoden.

[Frickler]

Zitat von himitsu:

Delphi-Quellcode:

function aaa: string;
begin
  ShowMessage('aaa');
  Result := 'a';
end;

function bbb: string;
begin
  ShowMessage('bbb');
  Result := 'b';
end;


ShowMessage(IfThen(Random(2) = 0, aaa, bbb);

Hier siehst du aaa, bbb und dann noch a oder b.
Das Neue würde nur aaa und a ODER bbb und b anzeigen.

Was ein kompliziertes Beispiel.

Wie wärs denn damit:

Delphi-Quellcode:

var z := if x = 0 then 0 else y div x;
// vs.
var z := IfThen(x = 0, 0, y div x);

Wenn x 0 ist, knallt die Variante mit IfThen, aber der ternäre Operator nicht. Denn wie Du schon richtig schriebst, eine Funktion evaluiert alle Parameter vor Ausführung, der Operator nicht.