程序流程的控制之条件分支（Delphi）

if语句主要来检测一个条件，并根据这个条件是True或者False来执行一段代码；

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
  I: Integer;
  FileGood: Boolean;
begin
  FileGood := True;
  if FileGood then     { 简洁的写法，判断FileGood是否为True}
    ShowMessage('True');
  { 上面的写法等同于下面}
  if FileGood = True then ShowMessage('True');
 
  if I > 0 then       { 如果I大于0}
    DoSomething1
  else if I < 0 then  { 如果I小于0，else if块不是必须的}
    DoSomething2
  else                { 如果是其他条件，通常来实现默认的处理，else块也不是必须的}
    DoSomething;
end;

 

case语句可以看成是if语句的发展，它可以根据一个表达式的结果使程序执行多个代码块中的某一个代码块，此表达式的类型只能是有序类型变量作为条件因子，其他的如字符串则是行不通的。

1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  I: Integer;
begin
  case I of
    1:      { 如果 I = 1}
      DoSomething1;
    2, 3:   { 如果 I = 2或者3，相当于if I in [2, 3]}
      DoSomething2;
    4..10:  { 如果 I在4到10范围内（含4和10）}
      DoSomething3;
  else      { 如果是其他条件，通常用来实现默认处理，else块也不是必须的}
    DoSomething;
  end;
end;

posted on 2015-02-11 13:50  小瓢蟲  阅读(203)  评论(0)  编辑  收藏  举报