zoukankan      html  css  js  c++  java
  • 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.

    当然,如果您编写的逻辑比较复杂,代码比较多,还是不提倡使用匿名的方法,那样会造成阅读困难

  • 相关阅读:
    【Shell】 计算文件 交集,并集和差集
    http协议--Apache-Httpd服务基本配置-rpm安装-编译安装(HTTP2.2,HTTP2.4)
    进程管理工具
    Linux系统原理(工作模式)
    网络协议和管理
    网络通信安全基础(加密方式,OpenSSL)
    BZOJ 2969 期望
    BZOJ 2118 Dijkstra
    BZOJ 1407 exgcd
    BZOJ 2406 二分+有上下界的网络流判定
  • 原文地址:https://www.cnblogs.com/iihe602/p/2920694.html
Copyright © 2011-2022 走看看