第二章 delphi面向对象编程方法(二)

《第二章 delphi面向对象编程方法(二)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、2.1.4跳转语句　ObjectPascal的跳转语句有if和case两个。　2.1.4.1if语句　       if语句会计算一个表达式，并根据计算结果决定程序流程。在上文的例程中，根据ColorDialog.Execute的返回值，决定窗体的背景颜色。if保留字后跟随一个生成Boolean值True或False的表达式。一般用“=”作为关系运算符，比较产生一个布尔型值。当表达式为True时，执行then后的语句。否则执行else后的代码，if语句也可以不含else部分，表达式为False时自动跳到下一行程序。       if语句可以嵌套，当使用复合语句表达时，复

2、合语句前后需加上begin…end。else保留字前不能加“；”，而且，编译器会将else语句视为属于最靠近的if语句。必要时，须使用begin…end保留字来强迫else部分属于某一级的if语句。　2.1.4.2case语句　        case语句适用于被判断的变量或属性是整形、字符型、枚举型或子界型时(LongInt除外)。用case语句进行逻辑跳转比编写复杂的if语句容易阅读，而且程序代码整形较快。下面的例程显示一个使用case语句的窗体：建立如下的事件处理过程：　procedureTForm1.Button1Click(Sender:TObject);va

3、rNumber:Integer;beginNumber:=StrToInt(Edit1.Text);caseNumberof1,3,5,7,9:Label2.Caption:='奇数';0,2,4,6,8:Label2.Caption:='偶数';10..100:beginLabel2.Caption:='在10到100之间';Form1.Color:=clBlue;end;elseLabel2.Caption:='大于100或为负数';end;end;　       执行程序，当Edit1部件接受到一个值，并按动“OK”按钮触发程序后，Number便被赋值为用户输入的

4、数值。case语句根据Number的值判断该执行哪一条语句。象if语句一样。case语句也有可选择的else部分。case语句以end结尾。　2.1.5循环语句　      ObjectPascal的循环语句有三种：repeat、while和for语句。　2.1.5.1repeat语句　       repeat语句会重复执行一行或一段语句直到某一状态为真。语句以repeat开始，以until结束，其后跟随被判断的布尔表达式。参阅以下的例程：　i:=0;repeati:=i+1;Writen(i);untili=10;　      当此语句被执行时，窗体的下方会出现1到

5、10的数字。布尔表达式i=10(注意，与其他语言不同的是，“=”是关系运算符，而不能进行赋值操作)直到repeat..until程序段的结尾才会被计算，这意味着repeat语句至少会被执行一次。　2.1.5.2while语句　        while语句和repeat语句的不同之处是，它的布尔表达式在循环的开头进行判断。while保留字后面必须跟一个布尔表达式。如果该表达式的结果为真，循环被执行，否则会退出循环，执行while语句后面的程序。        下面的例程达到和上面的repeat例程达到同样的效果：　i:=0;whilei<10dobegini:=i+1;

6、writeln(i);end;　2.1.5.3for语句　        for语句的程序代码会执行一定的次数。它需要一个循环变量来控制循环次数。您需要说明一个变量，它的类型可以是整形、布尔型、字符型、枚举型或子界型。下面的程序段会显示1到5的数字，i为控制变量：　vari:integer;fori:=1to5dowriteln(i);　         以上介绍了三种循环语句。如果您知道循环要执行多少次的话，可以使用for语句。for循环执行速度快，效率比较高。如果您不知道循环要执行多少次，但至少会执行一次的话，选用repeat..until语句比较合适；当您认为程序

7、可能一次都不执行的话，最好选用while..do语句。　2.1.6程序模块       程序模块在ObjectPascal中是很重要的概念。它们提供了应用程序的结构，决定了变量、属性值的范围及程序执行的过程。它由两个部分组成：可选择的说明部分和语句部分。如果有说明部分，则必在语句部分之前。说明部分包括变量说明、常量说明、类型说明、标号说明、程序，函数，方法的说明等。语句部分叙述了可执行的逻辑行动。       在Delphi中，最常见的程序模块便是事件处理过程中的程序模块。下面的事件处理过程是含有变量说明部分的程序模块：　procedur