理解 Delphi 的类(十) - 深入方法[12] - implementation 区中的方法
2008-01-14 21:31
756 查看
//要点12: implementation 区中的过程或函数, 只能在本单元调用 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); end; var Form1: TForm1; implementation {$R *.dfm} {implementation 区中的过程或函数, 只能在本单元调用} function MyFun(x,y: Integer): Integer; begin Result := x + y; end; procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin i := MyFun(1,2); end; end.
相关文章推荐
- 理解 Delphi 的类(十一) - 深入类中的方法[12] - 消息方法
- 理解 Delphi 的类(十) - 深入方法[4] - 共同类型的参数的简化写法
- 理解 Delphi 的类(十) - 深入方法[13] - 在 interface 区声明的方法
- 理解 Delphi 的类(十) - 深入方法[22] - 指针参数
- 理解 Delphi 的类(十一) - 深入类中的方法[7] - 关于 inherited
- 理解 Delphi 的类(十) - 深入方法[5] - Result 与函数名
- 理解 Delphi 的类(十) - 深入方法[14] - 在TForm1 类内声明的方法
- 理解 Delphi 的类(十) - 深入方法[23] - 重载
- 理解 Delphi 的类(十) - 深入方法[25] - 使用方法类型
- 理解 Delphi 的类(十) - 深入方法[6] - Result
- 理解 Delphi 的类(十) - 深入方法[15] - 调用其他单元的函数
- 理解 Delphi 的类(十) - 深入方法[24] - 方法是一个指针
- 理解 Delphi 的类(十) - 深入方法[28] - 递归函数实例: 搜索当前目录下的所有嵌套目录
- 理解 Delphi 的类(十一) - 深入类中的方法[1] - 虚方法与动态方法
- 理解 Delphi 的类(十一) - 深入类中的方法[8] - 抽象方法与抽象类
- 理解 Delphi 的类(十一) - 深入类中的方法[1] - 虚方法与动态方法
- 理解 Delphi 的类(十) - 深入方法[7] - Result
- 理解 Delphi 的类(十) - 深入方法[16] - 方法的顺序
- 理解 Delphi 的类(十) - 深入方法[26] - 回调函数
- 理解 Delphi 的类(十一) - 深入类中的方法[3] - 方法在实现时的参数省略