Case Statement?

[RWC]

Does anyone know if the Case Statement checks every ‘case of’ entry or does it stop checking when it finds a case that satisfies the argument?

[engkin]

Does anyone know if the Case Statement checks every ‘case of’ entry or does it stop checking when it finds a case that satisfies the argument?

Unlike C, it stops checking:

The compiler will evaluate the case expression. If one of the case constants’ value matches the value of the expression, the statement that follows this constant is executed. After that, the program continues after the final end.

[Handoko]

It has to stop checking once if finds the satisfied case, this is good for performance. If someone needs something similar to case statement but still checking then using multiple ifs is the solution:

Code: Pascal  [Select][+][-]

1. TestVal := 2;
2.  
3. If TestVal = 1 then do Something1;
4. If TestVal = 2 then do Something2;
5. If TestVal = 3 then do Something3;
6. If TestVal = 4 then do Something4;
7. If TestVal = 5 then do Something5;

The code above is a bad code because it is not optimize for performance.

[RWC]

@engkin & @Handoko: That’s great news – saves me lots of if..then..else checking in this speed critical procedure – Thank you both for such a speedy reply too – Best regards, RWC.