[工学]第4章 Object Pascal 语言结构.pptVIP

第4章 Object Pascal 语言结构 4.1 语句 4.1.1 声明语句 4.2.5 其他指示字 4.1.2 简单语句 4.2.6 参数的传递方式 4.1.3 条件控制语句 4.2.7 数组参数 4.1.4 循环语句 4.2.8 函数和过程中变量的 作用域 4.2 过程和函数 4.2.8 函数过程类型变量 4.2.1 使用预定义过程函数 4.2.2 定义和调用过程 4.2.3 定义和调用函数 4.2.4 函数的调用约定 4.1 语句 Object Pascal语言的语句分为两大类： 4.1.1 声明语句 声明语句有: 标号声明语句 常量声明语句 类型声明语句 变量声明语句 标号声明语句: 格式: Label 标号表 ; 标号可以是常数或标识符 过程声明语句: 格式: Procedure 过程名(形参表) ; 形参表：par1:类型; par2:类型, … , 或空 函数声明语句: 格式: Function 函数名(形参表):数据类型 ; 形参表：par1:类型; par2:类型, … , 输出语句: 如果编写DLL类型的程序,就需要使用输出语句Exports声明要输出的过程和函数 语法格式: Exports 过程名或函数名表, 名字间用逗号分隔 例: Exports MyProc, MyFunc ; 其中MyProc和 MyFunc必须是声明过的过程名和函数名 4.1.2 简单语句 常用简单语句: 赋值语句 过程调用语句 函数调用语句 Goto语句 1. 赋值语句 格式：变量:=值或表达式 ; 功能：计算赋值运算符右边表达式的值，将结果赋给变量 例: 　　x:=3+6; 　　　　　MyString:=‘I Love Delphi ‘ ; MyAge:=20 ;　 要求：表达式值的类型与变量的类型相容 注：　赋值语句不能对文件类型、图象类型等变 量赋值 2．　过程和函数调用语句 格式：过程名／函数名（＜实参表＞）； 3. Goto 语句 格式：goto 标号　； Procedure FindFirstAnswer; Var x, y, count: Integer ; Label FoundIt ; Const Count=100 ; Begin for x:=1 to Count do for y:=1 to Count do … //在双重循环中找到需要的结果 if … {some condition holds on X,Y} then goto FoundIt; //如果找到结果，跳到FoundIt标号处 …… exit; // 没有找到需要的结果就退出 FoundIt: //找到需要的结果后跳到这里执行 ShowMessage(‘Found it!’); //弹出消息框 end; 4. 块语句 块语句是一种把若干简单语句组合成复杂语句的方式。 经常使用的块语句是Begin … End语句 例： 4.1.3 条件控制语句 1. if 语句 if 语句用于判断某个条件是否满足，根据满足与否来控制程序的执行流程。 格式 条件语句的嵌套——实现多分支结构 多重if/then/else 语句 举例： if I=0 then Caption:=‘Can to be zero ‘ else if I in [1..5] then Caption:=‘Low‘ else if I in [6..9] then Caption:=‘High‘ else if I in [10..99] then Caption:=‘Out of range‘ else Caption:=‘ ‘; 3. Case 语句 功能：实现多分支程序结构 格式： Case语句的流程图表示 举例 case I of 0: Caption:=‘Can to be zero ‘; 1..5: Caption:=‘Low‘; 6..9: Caption: