Delphi 程序结构

一.语句与程序结构
? ? 在算法语言中，使用数据类型描述数据的性质，使用表达式描述对数据的运算，而使用语句描述对数据的操作。程序是由一系列语句组成的，任意复杂的程序均可分解为三种基本结构：顺序结构、分支 ? ?（选择）结构和循环结构，这三种结构也能够组合成任意复杂的程序。?

二.顺序结构语句
? ? ?顺序结构是程序设计中最常用也是最简单的程序结构。顺序结构语句主要由赋值语句和过程语句等简单语句组成。?
? ? ?1．赋值语句
? ? ?赋值语句的语法格式及功能如下：
? ? ?[格式1]：
? ? ?变量名:=表达式；
? ? ?[功能]：将赋值号“:=”右边表达式的值赋给左边的变量。
? ? ?[格式2]：
? ? ?对象.属性名:=表达式；
? ? ?[功能]：将表达式的值赋给对象的属性。?

三．过程语句
? ? ?系统定义了多种过程语句，用户在写程序时可直接引用。用于输入、输出的有读语句read和写语句write。
? ? （1）读语句
? ? ?有两种格式：
? ? ?read( 变量,变量,…… )；
? ? ?readln( 变量,…… )；
? ? （2）写语句
? ? ?也有两种格式：
? ? ?write( 项,项,…… )；
? ? ?writeln( 项,…… )；?

四．复合语句
? ? ? 复合语句是用保留字begin和end将若干条语句括起来作为一条语句使用。
? ? ? 例如：
? ? ? begin
? ? ? ? t:=x; x:=y; y:=t;
? ? ? end;
? ? ? 语法上最后一条语句与end之间没有分号，但如果加了分号，也不会产生语法错误，系统会认为其间有一条空语句。?

五.分支结构语句
? ? ?1．If语句
? ? ?[格式1]：if <条件> then
? ? ? ? ? ? ? 语句1；
? ? ?[功能]：如果<条件>为true，则执行<语句1>；如果<条件>为false，则不执行<语句1>。
? ? ?[格式2]：if <条件> then
? ? ? ? ? ? ? ? ? ? 语句1
? ? ? ? ? ? ? ? ? ? else
? ? ? ? ? ? ? ? ? ? 语句2；
? ? ?[功能]：如果<条件>为true，则执行<语句1>；如果<条件>为false，则执行<语句2>。

六.嵌套的if语句
? ? ? if语句可以嵌套使用，即在if语句的then或else之后的语句又是if语句。通常采用以下的语法格式
? ? ? ? if <条件1>?
? ? ? ? then ?<语句1>
? ? ? ? else ?if <条件2>?
? ? ? ? then ? ? <语句2>
? ? ? ? else ……

七.3．case语句
? ? ? ? [格式]：
? ? ? ?case <表达式> of
? ? ? ? ? 值1:语句1;
? ? ? ? ? 值2:语句2;
? ? ? ? ? ? ……
? ? ? ? ? 值n:语句n;
? ? ? ? ? [ else
? ? ? ? ? ? ? ? 语句n+1; ]
? ? ? ? end;

八.循环结构语句
? ? ? ? Delphi实现循环结构的语句共有3种。
? 1．while循环语句
? ? ? ? while <条件表达式> do
? ? ? ? ? ? ?<循环体>;
? 2．repeat循环语句
? ? ? ? repeat
? ? ? ? ? ? <循环体>;
? ? ? ? until <条件表达式>;

九.for循环语句
? ? ? ?for循环语句是“计数型循环”。
? ? ? 格式如下：
? ? ? [格式1]：递增型for语句
? ? ? for 循环变量:=初值 to ?终值 do
? ? ? ? ? ?循环体；
? ? ? [格式2]：递减型for语句
? ? ? for 循环变量:=初值 downto 终值 do
? ? ? ? ? ?循环体；?

十.break与continue语句
? ? Object Pascal语言提供了2种用于控制流程的转向语句：break和continue。这两条语句通常用在循环语句的循环体内以控制循环语句的流程，常与if条件语句配合使用。
? ? break语句只能用在循环体内，其功能是强行退出循环。

? ? continue语句也用在循环体中，其作用是强行结束本次循环，转入循环开始处，开始执行下一次循环操作。