精要2.5之 流程控制

来源:互联网 发布:hf线切割编程补偿系数 编辑:程序博客网 时间:2024/06/06 09:39

1.条件分支:

可以使用if....else和case of...else...enc两种方式实现分之控制.

var

    I:Integer;

begin

    if I > 0 then

        Dosth

    else if I < 0 then

        Dosth

    else

        DoSth

end;

-------------------------------------------------

注意:使用if时,else(包括else if)关键字之前不能包括";"

---------------------------------------------------

又 case方式:

var

    I:Integer;

begin

    case I of

      1:

              DoSth

     2,3:

             DoSth

     4..10:                  {如果

            Dosth

end;

原创粉丝点击