黑客基地Delphi程序设计

大家学习中有什么不明白的可以加我QQ：1889318必须要有黑基VIP ID和密码才能通过验证
黑客基地Delphi程序设计
第9讲
条件语句：
所谓的条件语句根据一些判断的条件，决定要执行的任务。

两种基本形式：if 语句和CASE语句
IF 语句：
If语句可以分成3种不同的形式
1.简化的if语句其语法格式为：
if 表达式then
语句；
解释：比较表达式当值为真的时候，就执行then 后面的语句，如果为假，就跳过此语句
例：if a=1 then
label1.caption:=’我爱你！’；
2.标准的IF语句
格式：if 表达式then
语句1
else
语句2;
解释：比较表达式，当值为真的时候，就执行语句1 为假执行语句2
例：if a=1 then
label1.caption:=’我爱你’
else
label1.caption:=’其实，我真的不想考虑这个问题，太早了！’;
注意的一个问题：因为复合语句在Delphi中被看做是一个语句，因次，只有在语句2后面加分号！
3.嵌套的if语句
格式：if 表达式1 then
语句1
else if 表达式2 then
语句2
……..
else if 表达式n-1 then
语句n-1
else
大家学习中有什么不明白的可以加我QQ：1889318必须要有黑基VIP ID和密码才能通过验证n-1
else
语句n;
例：
if a>30 then
b:=a*a
else if a>20 then
b:=-a*a
else if a>10 then
b:=a
else
b:=0;
上面例子的解释：
当a大于30的时候b的值等于A的平方，也就是A*A
当A的值小于30但是大于20的话b的值等于-a*a
当A的值小于20但大于10的话，a的值等于A
否则B的值为0
CASE语句：
If 语句是根据某种条件，最多仅有两种的后继流程流向。

如果想在多个语句中选择后继续流向，就要用case语句。

Case在很多情况下是可以替代嵌套if语句，q去实现不同情况的选择。

例如：
case 表达式of
常数1：语句1;
常数2:语句2；
…………..
常数N：语句N；
end;
这里，有如下8点需要说明.
1.表达式必须是序数类型，不能是实型值或字符串
2.常数1,常数2…常数N 成为case 常数。

常数必须与表达式类型一至
3.case语句的执行过程是：当表达式的值与某一case 常数相等时，就去执行
该常数后的语句。

例如：
case a of
1:b:=a-1; //当a的值等于1时，b的值为a-1
2:b:=a+1; //当a的值等于2时，b的值为a+1
3:b:=a; //当a的值等于3时，b的值为a
end;
大家学习中有什么不明白的可以加我QQ：1889318必须要有黑基VIP ID和密码才能通过验证
这里A 是整形变量，可以取值为1.2.3 。

4.case 常数冒号右边的语句可以是函数，过程调用，条件语句，复合语句等，
这为我们提供了极大的灵活性。

5.case 常数可以是一个常数区间，在下界与上界之间用两个连续的圆点分开，
例如：1..100 代表从1-100
6.应注意个case常数不能互相覆盖。

例如：
case a of
1:edit1.text:=’Computer’;
5:edit1.text:=’car’;
2..10:edit1.text:=’money’;
end;
大家注意看，这个例子中，5和下一句的2...10 互相覆盖了，这样是不允许
的。

7.在case 语句中也可包含else 部分，格式：
case 表达式of
常数1：语句1;
常数2：语句2;
……..
常数n:语句n;
else
语句n+1
end;
其含义是，当表达式的值与某个case常数相等，就去执行后面的语句，如
果表达式的值与所有的case 常数都不相等时，就去执行else 后的语句n+1.
注意，else 后面的结尾没有分好。

8.多个case 常数可以共用一条公共语句，各case常数间用逗号分开.
例如：
case n of
1,3,5,7,9:edit1.text:=’odd digit’;
2,4,6,8,10:edit1.text:=’even digit’;
end;。