Difference between revisions of "Basic Pascal Tutorial/Chapter 3/CASE"

From Lazarus wiki
Jump to navigationJump to search
(New page: 3Cb - CASE Suppose you wanted to branch one way if <tt>b</tt> is <tt>1, 7, 2037,</tt> or <tt>5</tt>; and another way if otherwise. You could do it by: <font color="#006699"><strong>if</s...)
 
m (Fixed syntax highlighting)
(18 intermediate revisions by 10 users not shown)
Line 1: Line 1:
3Cb - CASE
+
{{CASE}}
 +
{{TYNavigator|IF|FOR..DO}}
 +
 
 +
3Cb - CASE (author: Tao Yue, state: changed)
 +
 
 +
Case opens a case statement. The case statement compares the value of ordinal expression to each selector, which can be a [[Const|constant]], a subrange, or a list of them separated by [[Comma|commas]]. Selector field separated to action field by [[Colon]].
  
 
Suppose you wanted to branch one way if <tt>b</tt> is <tt>1, 7, 2037,</tt> or <tt>5</tt>; and another way if otherwise. You could do it by:
 
Suppose you wanted to branch one way if <tt>b</tt> is <tt>1, 7, 2037,</tt> or <tt>5</tt>; and another way if otherwise. You could do it by:
<font color="#006699"><strong>if</strong></font> <font color="#000000"><strong>(</strong></font>b <font color="#000000"><strong>=</strong></font> <font color="#ff0000">1</font><font color="#000000"><strong>)</strong></font> <font color="#006699"><strong>or</strong></font> <font color="#000000"><strong>(</strong></font>b <font color="#000000"><strong>=</strong></font> <font color="#ff0000">7</font><font color="#000000"><strong>)</strong></font> <font color="#006699"><strong>or</strong></font> <font color="#000000"><strong>(</strong></font>b <font color="#000000"><strong>=</strong></font> <font color="#ff0000">2037</font><font color="#000000"><strong>)</strong></font> <font color="#006699"><strong>or</strong></font> <font color="#000000"><strong>(</strong></font>b <font color="#000000"><strong>=</strong></font> <font color="#ff0000">5</font><font color="#000000"><strong>)</strong></font> <font color="#006699"><strong>then</strong></font>
+
 
  Statement1
+
<syntaxhighlight lang="pascal">
<font color="#006699"><strong>else</strong></font>
+
if (b = 1) or (b = 7) or (b = 2037) or (b = 5) then
  Statement2<font color="#000000"><strong>;</strong></font>
+
  Statement1
 +
else
 +
  Statement2;
 +
</syntaxhighlight>
  
 
But in this case, it would be simpler to list the numbers for which you want Statement1 to execute. You would do this with a <tt>case</tt> statement:
 
But in this case, it would be simpler to list the numbers for which you want Statement1 to execute. You would do this with a <tt>case</tt> statement:
<font color="#006699"><strong>case</strong></font> b <font color="#006699"><strong>of</strong></font>
+
 
  <font color="#ff0000">1</font><font color="#000000"><strong>,</strong></font><font color="#ff0000">7</font><font color="#000000"><strong>,</strong></font><font color="#ff0000">2037</font><font color="#000000"><strong>,</strong></font><font color="#ff0000">5</font><font color="#000000"><strong>:</strong></font> Statement1<font color="#000000"><strong>;</strong></font>
+
<syntaxhighlight lang="pascal">
  otherwise  Statement2
+
case b of
<font color="#006699"><strong>end</strong></font><font color="#000000"><strong>;</strong></font>
+
  1,7,2037,5: Statement1;
 +
  otherwise  Statement2
 +
end;
 +
</syntaxhighlight>
  
 
The general form of the <tt>case</tt> statement is:
 
The general form of the <tt>case</tt> statement is:
<font color="#006699"><strong>case</strong></font> selector <font color="#006699"><strong>of</strong></font>
+
 
    List1<font color="#000000"><strong>:</strong></font>   Statement1<font color="#000000"><strong>;</strong></font>
+
<syntaxhighlight lang="pascal">
    List2<font color="#000000"><strong>:</strong></font>   Statement2<font color="#000000"><strong>;</strong></font>
+
case selector of
    <font color="#000000"><strong>.</strong></font><font color="#000000"><strong>.</strong></font><font color="#000000"><strong>.</strong></font>
+
  List1:    Statement1;
    Listn<font color="#000000"><strong>:</strong></font>   Statementn<font color="#000000"><strong>;</strong></font>
+
  List2:    Statement2;
    otherwise Statement
+
  ...
<font color="#006699"><strong>end</strong></font><font color="#000000"><strong>;</strong></font>
+
  Listn:    Statementn;
 +
  otherwise Statement
 +
end;
 +
</syntaxhighlight>
  
 
The <tt>otherwise</tt> part is optional. When available, it differs from compiler to compiler. In many compilers, you use the word <tt>else</tt> instead of <tt>otherwise</tt>.
 
The <tt>otherwise</tt> part is optional. When available, it differs from compiler to compiler. In many compilers, you use the word <tt>else</tt> instead of <tt>otherwise</tt>.
Line 28: Line 42:
 
Note that the lists must consist of literal values. That is, you must use constants or hard-coded values -- you cannot use variables.
 
Note that the lists must consist of literal values. That is, you must use constants or hard-coded values -- you cannot use variables.
  
{|style=color-backgroud="white" cellspacing="20"
+
{{TYNavigator|IF|FOR..DO}}
|[[IF|previous]] 
 
|[[op_contents|contents]]
 
|[[FOR..DO|next]]
 
|}
 

Revision as of 02:33, 7 February 2020

български (bg) English (en) español (es) français (fr) 日本語 (ja) 中文(中国大陆)‎ (zh_CN)

 ◄   ▲   ► 

3Cb - CASE (author: Tao Yue, state: changed)

Case opens a case statement. The case statement compares the value of ordinal expression to each selector, which can be a constant, a subrange, or a list of them separated by commas. Selector field separated to action field by Colon.

Suppose you wanted to branch one way if b is 1, 7, 2037, or 5; and another way if otherwise. You could do it by:

if (b = 1) or (b = 7) or (b = 2037) or (b = 5) then
  Statement1
else
  Statement2;

But in this case, it would be simpler to list the numbers for which you want Statement1 to execute. You would do this with a case statement:

case b of
  1,7,2037,5: Statement1;
  otherwise   Statement2
end;

The general form of the case statement is:

case selector of
  List1:    Statement1;
  List2:    Statement2;
  ...
  Listn:    Statementn;
  otherwise Statement
end;

The otherwise part is optional. When available, it differs from compiler to compiler. In many compilers, you use the word else instead of otherwise.

selector is any variable of an ordinal data type. You may not use reals!

Note that the lists must consist of literal values. That is, you must use constants or hard-coded values -- you cannot use variables.

 ◄   ▲   ►