De If-Then-Else-verklaring in Delphi Code

In Delphi wordt de instructie if gebruikt om te testen op een voorwaarde en vervolgens secties code uit te voeren op basis van of die voorwaarde Waar of Onwaar is.

Een algemene if-then-else-instructie ziet er als volgt uit:

 als  vervolgens  anders ;

Zowel het "ware blok" als het "valse blok" kunnen een eenvoudige verklaring of een gestructureerde verklaring zijn (omgeven met een begin-eind paar).

Voorbeeld van een geneste, zo-dan-andere verklaring

Laten we een voorbeeld bekijken met behulp van geneste if-instructies:

 j: = 50;
als j> = 0 vervolgens
  als j = 100 vervolgens Bijschrift: = 'Nummer is 100!'anders
  Bijschrift: = 'Nummer is NEGATIEF!'; V

Wat is de waarde van "Kation"? Antwoord: "'Nummer is NEGATIEF!" Had dat niet verwacht?

Merk op dat de compiler geen rekening houdt met uw opmaak, u zou het bovenstaande kunnen hebben geschreven als:

 j: = 50;
als j> = 0 thenif j = 100 vervolgens Bijschrift: = 'Nummer is 100!'anders
Bijschrift: = 'Nummer is NEGATIEF!'; V

of zelfs als (alles op één regel):

 j: = 50; als j> = 0 vervolgens als j = 100 vervolgens Bijschrift: = 'Nummer is 100!'anders
Bijschrift: = 'Nummer is NEGATIEF!'; V

De ";" markeert het einde van een verklaring.

De compiler leest de bovenstaande verklaring als:

 j: = 50;
als j> = 0 vervolgens
  als j = 100 vervolgens
    Bijschrift: = 'Nummer is 100!'
  anders
    Bijschrift: = 'Nummer is NEGATIEF!';

of om precies te zijn:

 j: = 50;
als j> = 0 vervolgensbeginnen
  als j = 100 vervolgens
    Bijschrift: = 'Nummer is 100!'
  anders
    Bijschrift: = 'Nummer is NEGATIEF!';
einde;