Die If-Then-Else-Anweisung in Delphi-Code

In Delphi wird die if-Anweisung verwendet, um auf eine Bedingung zu testen und dann Codeabschnitte basierend darauf auszuführen, ob diese Bedingung wahr oder falsch ist.

Eine allgemeine if-then-else-Anweisung sieht folgendermaßen aus:

 wenn  dann  sonst ;

Sowohl der "wahre Block" als auch der "falsche Block" können entweder eine einfache Anweisung oder eine strukturierte Anweisung sein (umgeben von einem Anfang-Ende-Paar)..

Beispiel einer verschachtelten If-Then-Else-Anweisung

Betrachten wir ein Beispiel mit verschachtelten if-Anweisungen:

 j = 50;
wenn j> = 0 dann
  wenn j = 100 dann Beschriftung: = 'Zahl ist 100!'sonst
  Beschriftung: = 'Number is NEGATIVE!'; V

Was wird der Wert von "Kation" sein? Antwort: "'Nummer ist NEGATIV!" Das habe ich nicht erwartet?

Beachten Sie, dass der Compiler Ihre Formatierung nicht berücksichtigt. Sie hätten Folgendes schreiben können:

 j = 50;
wenn j> = 0 dann wenn j = 100 dann Beschriftung: = 'Zahl ist 100!'sonst
Beschriftung: = 'Number is NEGATIVE!'; V

oder sogar als (alles in einer Zeile):

 j = 50; wenn j> = 0 dann wenn j = 100 dann Beschriftung: = 'Zahl ist 100!'sonst
Beschriftung: = 'Number is NEGATIVE!'; V

Das ";" markiert das Ende einer Anweisung.

Der Compiler liest die obige Anweisung wie folgt:

 j = 50;
wenn j> = 0 dann
  wenn j = 100 dann
    Beschriftung: = 'Zahl ist 100!'
  sonst
    Beschriftung: = 'Number is NEGATIVE!';

oder genauer gesagt:

 j = 50;
wenn j> = 0 dannStart
  wenn j = 100 dann
    Beschriftung: = 'Zahl ist 100!'
  sonst
    Beschriftung: = 'Number is NEGATIVE!';
Ende;