532628838
圣骑士
圣骑士
  • 注册日期2011-06-10
  • 发帖数98
  • QQ
  • 火币517枚
  • 粉丝77
  • 关注39
阅读:2643回复:0

过程与函数

楼主#
更多 发布于:2011-08-01 17:07
  过程与函数都是独立的程序块,称为子程序。过程与的区别在于:过程没有返回值,而函数有返回值。Delphi的运行库包含许多过程与函数以供用户的应用程序调用。用户也可以自定义例程或直接调用WindowsAPI函数。
2.5.1过程的定义
    过程是完成某一特定功能的程序段。过程的调用,以语句的形式出现。
    过程的定义包括过程原型定义和过程体定义,前者通常放在单元接口部分。
    1.过程原型定义语法形式    .
    procedure<过程名>([[var]<参数名>:<类型>][;[var]<参数名>:<类型>]…);
[指示字]
其中的“指示字"用来标明调用时要遵守的约定,是否有内嵌的汇编语言实现等。可以一次设置多个指示字,其间使用分号隔开。调用约定指示字可用来定义参数的传递方式。
    2.过程体定义语法形式
    定义了过程原型之后,还要在单元执行部分定义该过程体,其形式为:
    procedure<过程名>(<形式参数表>);[指示字]
    标号定义部分    //对过程中使用的标号用label语句加以说明
    常量定义部分    //对过程中使用的常量用const语句加以说明
    类型定义部分    //使用type语句定义自己需要的数据类型
    局部变量定义部分    //对在过程中使用的所有变量进行说明,用var语句加以说明
    过程和函数定义部分  //定义在本过程中使用的过程或函数
    begin    //过程体,是过程具体实现的代码部分
    <语句>
    end.
    3.过程定义和调用的实例
    例2.10  定义一个简单的过程,名为writing,用来输出5行字符串,其字符串参数为s,其中只定义和使用了一个局部变量i,用来控制循环。在主程序中调用了它。
    program Project2—1 0;
    {$APPTYPE CONSOLE}
    {$R木.res}
    var x:String;    
    procedure writing(S:String);//过程定义
    Var
    i:Integer;
    begin
    for i:=1 to 5 do
    writeln(S);
    end;    
  begin    //主程序开始
writeln(’以下是调用过程的执行结果:’);
    x:=’欢迎大家使用Delphi’;    ’
    ‘writing(x);//调用自定义过程writing
    readln;
    end.

喜欢0 评分0
游客

返回顶部