Delphi匿名方法(一):初识
2013-02-21 15:32
302 查看
对于比较简单实现,不需要复用,开发者更喜欢在使用时,原地声明,而没有必要单独声明并实现这个方法
对于使用C#和Objective-C的开发人员,应该很容易感受到匿名方法的便利。
从Delphi 2009开始,Delphi也加入了对匿名方法的支持
当然,如果您编写的逻辑比较复杂,代码比较多,还是不提倡使用匿名的方法,那样会造成阅读困难
对于使用C#和Objective-C的开发人员,应该很容易感受到匿名方法的便利。
从Delphi 2009开始,Delphi也加入了对匿名方法的支持
unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs; type //首先声明匿名方法的类型 TIntSum = reference to function (x, y: Integer): Integer; //引用方法的声明 //TIntProcedure = function (x, y: Integer): Integer of object; TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private function plusXandY(x, y: Integer; intSum: TIntSum): integer; { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin ShowMessageFmt('x + y = %d', [plusXandY(10, 15, function (x, y: Integer): Integer begin Result := x + y; end) ]); ShowMessageFmt('x + y = %d', [plusXandY(20, 1500, function (x, y: Integer): Integer begin Result := x * y; end) ]); end; function TForm1.plusXandY(x, y: Integer; intSum: TIntSum): integer; begin Result := intSum(x, y); end; end.
当然,如果您编写的逻辑比较复杂,代码比较多,还是不提倡使用匿名的方法,那样会造成阅读困难
相关文章推荐
- Delphi2009(Tiburon)新特性-匿名方法示例
- delphi: reference to(匿名方法)
- Delphi 2009 中的匿名方法(reference to)
- Delphi 2010学习笔记(21)---匿名方法---2011-01-26
- Delphi中的匿名方法和闭包
- Delphi匿名方法
- Delphi 2010 匿名方法
- Delphi 2009 中的匿名方法(reference to) 研究
- TDD实践之路--泛型和匿名方法在DELPHI单元测试中的妙用
- Delphi 2009 中的匿名方法(reference to)
- Delphi匿名方法(二):使用本地变量
- Delphi TMediaPlayer播放音乐出现"no MCI device open"的错误的解决方法;循环播放
- C# 2.0:使用匿名方法、迭代程序和局部类来创建优雅的代码
- 匿名方法与lambda表达式
- delphi 步长不等于 1 的方法
- Delphi 使用 FireBird嵌入式版本发布方法
- 多播委托和匿名方法再加上Lambda表达式
- delphi中多线程同步的一些方法
- 多线程的 匿名实现方法
- C#匿名对象在其它方法体内怎么取到相应的值(不想建立对应的类并转化的情况下)?