百度360必应搜狗淘宝本站头条
当前位置:网站首页 > 技术流 > 正文

玩转Delphi的函数指针(delphi function)

citgpt 2024-07-10 14:46 12 浏览 0 评论

什么是函数指针

函数指针指向某种特定类型,函数的类型由其参数及返回类型共同决定,与函数名无关,个人理解所谓的函数指针其实是我们回调函数的一种指针的表现形式,类似于传递对象,当我们获取到该对象之后就可以调用这个对象中的函数/过程

玩转Delphi的函数指针(delphi function)

下面看一个例子

定义类型:

简单的说是将这种形式的函数定义成一种类型,然后我们通过这种类型来定义一个变量,该变量的值是一个函数,我们在调用该变量的时候其实就是在调用该变量指向的函数,从而达到动态调用函数的目的(其实我更愿意说是回调)

type
  IntProc = procedure (var Num: Integer);
type
  IntProc = procedure (var Num: Integer);

定义实例函数

这些函数叫什么名字无所谓,这些函数将来都是用于给我们之前定义的函数类型进行赋值的具体指,但是参数列表和返回值的类型必须和之前定义的函数类型一致

procedure DoubleTheValue (var Value: Integer);
begin
Value := Value * 2;
end;

调用代码

var
  IP: IntProc;
  X: Integer;
begin
  IP := DoubleTheValue;
  X := 5;
  IP (X);
end;

很显然这种调用方法比直接调用麻烦很多,那么我们为什么要用这种方式呢?

因为在某些情况下,调用什么样的函数需要在实际中(运行时)决定,你可以根据条件来判断,实现用同一个表达,调用不同的函数,很是灵活.

实现回调机制

虽然现在大家都在讲面向对象,但是如果能够很好的掌握利用函数指针,在我们编写代码的时候也是我们的一大助力

再来一个例子,我们将一个函数指针作为函数的参数,通过传递不同的实例函数来实现不同函数的调用

type
     //函数指针
     TFunctionParameter = function(const value : integer) : string;

//函数-实例1
function One(const value : integer) : string;
begin
  result := IntToStr(value) ;
end;

//函数-实例2
function Two(const value : integer) : string;
begin
  result := IntToStr(2 * value) ;
end;


//定义将要使用动态函数指针参数的函数

function DynamicFunction(f : TFunctionParameter; const value : integer) : string;
begin
  result := f(value) ;
end;

上面这个动态函数的使用实例

var
  s : string;
begin

  s := DynamicFunction(One,2006) ;
  ShowMessage(s) ;

  s := DynamicFunction(Two,2006) ;
  ShowMessage(s) ;
end;

通过上面的例子大概能够看出,我们在调用DynamicFunction函数时传递了两个参数,第一个是我们真实的函数(我们可以称为函数实例),第二个参数是我们给了给函数实例传递的数据

今天的内容到此结束,理论的东西我可以帮大家整理,代码实践只能靠自己了,永远不要指望某一个老师或者某几部教程能够解决你所有的问题

写在最后:纸上得来终觉浅,觉知此事需躬亲!与君共勉!

相关推荐

js中arguments详解

一、简介了解arguments这个对象之前先来认识一下javascript的一些功能:其实Javascript并没有重载函数的功能,但是Arguments对象能够模拟重载。Javascrip中每个函数...

firewall-cmd 常用命令

目录firewalldzone说明firewallzone内容说明firewall-cmd常用参数firewall-cmd常用命令常用命令 回到顶部firewalldzone...

epel-release 是什么

EPEL-release(ExtraPackagesforEnterpriseLinux)是一个软件仓库,它为企业级Linux发行版(如CentOS、RHEL等)提供额外的软件包。以下是关于E...

FullGC详解  什么是 JVM 的 GC
FullGC详解 什么是 JVM 的 GC

前言:背景:一、什么是JVM的GC?JVM(JavaVirtualMachine)。JVM是Java程序的虚拟机,是一种实现Java语言的解...

2024-10-26 08:50 citgpt

使用Spire.Doc组件利用模板导出Word文档
  • 使用Spire.Doc组件利用模板导出Word文档
  • 使用Spire.Doc组件利用模板导出Word文档
  • 使用Spire.Doc组件利用模板导出Word文档
  • 使用Spire.Doc组件利用模板导出Word文档
跨域(CrossOrigin)

1.介绍  1)跨域问题:跨域问题是在网络中,当一个网络的运行脚本(通常时JavaScript)试图访问另一个网络的资源时,如果这两个网络的端口、协议和域名不一致时就会出现跨域问题。    通俗讲...

微服务架构和分布式架构的区别

1、含义不同微服务架构:微服务架构风格是一种将一个单一应用程序开发为一组小型服务的方法,每个服务运行在自己的进程中,服务间通信采用轻量级通信机制(通常用HTTP资源API)。这些服务围绕业务能力构建并...

深入理解与应用CSS clip-path 属性
深入理解与应用CSS clip-path 属性

clip-pathclip-path是什么clip-path 是一个CSS属性,允许开发者创建一个剪切区域,从而决定元素的哪些部分可见,哪些部分会被隐...

2024-10-25 11:51 citgpt

HCNP Routing&Switching之OSPF LSA类型(二)
  • HCNP Routing&Switching之OSPF LSA类型(二)
  • HCNP Routing&Switching之OSPF LSA类型(二)
  • HCNP Routing&Switching之OSPF LSA类型(二)
  • HCNP Routing&Switching之OSPF LSA类型(二)
Redis和Memcached的区别详解
  • Redis和Memcached的区别详解
  • Redis和Memcached的区别详解
  • Redis和Memcached的区别详解
  • Redis和Memcached的区别详解
Request.ServerVariables 大全

Request.ServerVariables("Url")返回服务器地址Request.ServerVariables("Path_Info")客户端提供的路...

python操作Kafka

目录一、python操作kafka1.python使用kafka生产者2.python使用kafka消费者3.使用docker中的kafka二、python操作kafka细...

Runtime.getRuntime().exec详解

Runtime.getRuntime().exec详解概述Runtime.getRuntime().exec用于调用外部可执行程序或系统命令,并重定向外部程序的标准输入、标准输出和标准错误到缓冲池。...

promise.all详解 promise.all是干什么的
promise.all详解 promise.all是干什么的

promise.all详解promise.all中所有的请求成功了,走.then(),在.then()中能得到一个数组,数组中是每个请求resolve抛出的结果...

2024-10-24 16:21 citgpt

Content-Length和Transfer-Encoding详解
  • Content-Length和Transfer-Encoding详解
  • Content-Length和Transfer-Encoding详解
  • Content-Length和Transfer-Encoding详解
  • Content-Length和Transfer-Encoding详解

取消回复欢迎 发表评论: