L'istruzione If-Then-Else nel codice Delphi

In Delphi, l'istruzione if viene utilizzata per verificare una condizione e quindi eseguire sezioni di codice in base al fatto che tale condizione sia True o False.

Un'istruzione if-then-else generale è simile alla seguente:

 Se  poi  altro ;

Sia il "blocco vero" che il "blocco falso" possono essere un'istruzione semplice o un'istruzione strutturata (circondata da una coppia inizio-fine).

Esempio di un'istruzione nidificata if-then-else

Consideriamo un esempio usando le istruzioni if ​​nidificate:

 j: = 50;
Se j> = 0 poi
  Se j = 100 poi Didascalia: = "Il numero è 100!"altro
  Didascalia: = 'Il numero è NEGATIVO!'; V

Quale sarà il valore di "Cation"? Risposta: "'Il numero è NEGATIVO!" Non me l'aspettavo?

Nota che il compilatore non tiene conto della tua formattazione, potresti aver scritto quanto sopra come:

 j: = 50;
Se j> = 0 thenif j = 100 poi Didascalia: = "Il numero è 100!"altro
Didascalia: = 'Il numero è NEGATIVO!'; V

o anche come (tutto in una riga):

 j: = 50; Se j> = 0 poi Se j = 100 poi Didascalia: = "Il numero è 100!"altro
Didascalia: = 'Il numero è NEGATIVO!'; V

Il ";" segna la fine di una dichiarazione.

Il compilatore leggerà la dichiarazione precedente come:

 j: = 50;
Se j> = 0 poi
  Se j = 100 poi
    Didascalia: = "Il numero è 100!"
  altro
    Didascalia: = 'Il numero è NEGATIVO!';

o per essere più precisi:

 j: = 50;
Se j> = 0 poiinizio
  Se j = 100 poi
    Didascalia: = "Il numero è 100!"
  altro
    Didascalia: = 'Il numero è NEGATIVO!';
fine;