Delphi学习笔记四——语句

今天我们来看一下Delphi的语句。
一、常量声明语句
和其他语言一样，常量在声明时就被赋值，且在程序执行过程中是不可改变的。常量用“=”表示两边的值是相等的。

const  
      Pi = 3.14159;  
      Answer = 342;  
      ProductName = 'Delphi';  

二、赋值语句
这个语句最常用，在之前也介绍过。这里就举个例子。

variable := expression;  

三、goto语句
goto语句可以用来从程序中的一个地方直接跳转到另一个地方，但不常用。
四、复合语句
首尾使用begin和end包括起来的一组语句，可以嵌套使用，也允许空的复合语句。

begin  
    c:=a;  
    a:=b;  
    b:=c;  
    begin  
        ...  
    end;  
end;  

五、if语句
这个在日常的程序开发中也是经常用到。在之前的博文中也有介绍。这里不做详述，如有使用其他语言的经验，只需要注意Delphi对于if的语法即可。

if  A then B  
if  A then B else C  

六、case语句
case语句用来在多个可能的情况下选择一个条件。例如

case SelectExpression of  
    case List1: statement1;  
    case List2: statement2;  
else  
    statement;  
end  

七、repeat语句
repeat语句重复执行一行或一段语句直到某一状态为真。例如

i := 0;  
repeat  
   i := i+1;  
   Writeln(i);  
until i=10;  

这里需要说明的是，repeat至少执行一次语句
八、while语句
while语句与repeat语句的不同之处在于while语句在循环的开始阶段就进行判断，也就不存在多执行一次循环语句的情况了。

i :=0;  
while i<10 do  
    begin  
        i := i+1;  
       writeln(i);  
   end;  

九、for语句

var  
    i : integer;  
...  
for i:=1 to 5 do  
     writeln(i);  

十、Break过程
调用Break()表示当循环中满足某种条件时立即跳出循环。例如

var  
    i:integer;  
begin  
    for i:=1 to 100 do  
    begin  
        if i=30 then break;  
    end;  
end;  

十一、Continue()过程
调用Continue()重新开始下次循环。例如

var  
    i : integer;  
begin  
    for i:=1 to 3 do  
         begin  
             writeln(i,'before continue');  
             if i=2 then continue;  
            writeln(i,'after continue');  
        end;  
end;