object pascal语言的句法

1、 if..Then..Else 语句
       这个语句用于条件判断，意即“如果...那么...否则”，这个语句可以嵌套使用。比如：如果edit1的内容为空的，那么button1就无效，否则有效，语句如下：
       If Edit1.Text='' then
           Button1.Enable:=False
       Else
           Button1.Endable:=True;
       注意：if..Then..Else 构成完整语句，之间不可有任何分号，否则必引起编译错误，如中间有几个语句必须加上分号，那么应该在几个语句前后加上begin end，end之后不能加分号。如下：
       If Edit1.Text='' then
       Begin
          Button1.Enable:=False;  //此处可以加分号
          Button2.Enable:=False;
          Button3.Enable:=False;
       End                        //此处不可以加分号
       Else
       Begin
          Button1.Enable:=True; 
          Button2.Enable:=True; 
       End; 
   2、case 语句
      这个语句用于多分支的选择，可以用复杂的if语句代替。语句如下：
       case  i  of
        1:Edit1.text:='1';
        2:Edit1.text:='2';
        3:Edit1.text:='3';
       else
         edit1.text:='0';
       end;
  3、Repeat..Until语句
     Repeat总是先执行循环内容，然后判断，一旦判断成立循环即告停止。如下:
     X:=0;
     I:=0;
     Repeat
       X:=X+i;
       Inc(i);   //还记得这个函数吗？上次课讲过的呀！
     until X>10;
  4、while..do 语句
     while语句则是先判断条件，如果条件成立则执行，否则停止。如下：
     X:=0;
     while (I<=10) DO
     Begin
        INc(X):
        INc(I);
     End;  
  5、for..do 循环
     for语句用于已知循环次数的判断。如下：
     X:=0;
     for i:=0 to 10 do
        Inc(X);    //这里循环了11次！