您的位置:首页网页设计经验技巧 → delphi 回调函数的使用

delphi 回调函数的使用

时间:2009/5/25 23:57:00来源:本站整理作者:我要评论(0)

delphi 回调函数的使用

  1 回调函数的概述

  回调函数是这样一种机制:调用者在初始化一个对象(这里的对象是泛指,包括OOP中的对象、全局函数等)时,将一些参数传递给对象,同时将一个调用者可以访问的函数地址传递给该对象。这个函数就是调用者和被调用者之间的一种通知约定,当约定的事件发生时,被调用者(一般会包含一个工作线程)就会按照回调函数地址调用该函数。
  这种方式,调用者在一个线程,被调用者在另一个线程。

  消息:

  消息也可以看作是某种形式的回调,因为消息也是在初始化时由调用者向被调用者传递一个句柄和一个消息编号,在约定的事件发生时被调用者向调用者发送消息。
  这种方式,调用者在主线程中,被调用者在主线程或者工作线程中。

  Delphi事件模型:

   在Delphi的VCL中有很多可视化组件都是使用事件模型,例如TForm的OnCreate事件,其原理是:在设计时指定事件函数,在运行时事件触发,则会调用在设计时指定的事件函数。

  在机制上,Delphi事件模型与回调是一样的。但具体形式有些区别,纯的回调函数是全局函数的形式,而Delphi事件是对象方法的形式,即可以定义如下回调函数类型

  type

    TCallBackFunc = procedure (pData: Pointer) of object;

  2 回调函数的使用说明

  回调函数主要在两个场合使用,第一个是某些windows的API要求用回调函数作为其参数地址,另一种是用户在某种特定的场合定义的某个函数需要使用回调函数作为其参数地址,对于用户的定义的函数来说,一般是当调用动态连接库中的函数时使用。

  对于使用一个回调函数主要有以下几个步骤:

  1、定义一个回调函数类型,跟一般的函数过程的定义并没有什么区别,但其定义必须根据需要满足回调函数的函数要求,唯一的区别在于在函数或过程的定义后面必须声明其为windows标准调用;

  例:

  type

  THDFunction= function(I:integer;s:string):integer; stdcall;对于过程的声明

  type

  THDProcedure=procedure(s:string); stdcall;

  2、 然后根据此原形定义一个相应的函数或过程,对于这个函数或过程来说名字没有什么要求,对函数其参数的类型和返回值的类型必须和定义的回调函数类型完全一致,对于过程来说,只需要其参数类型一样就可以了。

  例:根据上面的函数和过程的原形定义一个相应的函数和一个相应的过程。

  函数原形定义:

  Function HdFunExample(k:integer,sExam:string):integer; stdcall;

  过程定义:

  procedure HdProExample(sExam:string);stdcall;

  3、 在程序中实现此回调函数或着过程;

  Function HdFunExample(k:integer,sExam:string):integer; stdcall;

  Begin

  End;

  procedure HdProExample(sExam:string);stdcall;
 
  begin

  end;

  4、 调用过程;

  回调函数一般作为系统的某个函数的入口地址;

  根据调用函数的原形:搜索想了解的问题

 

相关视频

    没有数据

相关阅读 Delphi 7将进度条放在状态条里面如何用Delphi实现StringTokenizer功能Delphi与FORTRAN语言的混合编程如何用Delphi和Web Services开发短信应用程序Delphi7目录结构Delphi单元文件详解Delphi for PHP功能简单介绍Delphi调试教程

文章评论
发表评论

热门文章 Wordpress本地安装教程dx1.5如何设置二级域名

最新文章 hbuilder有哪些快捷键Wordpress本地安装教程 Wordpress本地安装教程expression web 4文档乱码解决方法dz 2.5“收藏本版”关闭小对话框无法关闭解在制作安装软件之前,您必须先将易语言存盘,

人气排行 如何使用multipart/form-data格式上传文件Photoshop PS图层混合模式详解(非常详细)ISAPI_Rewrite3使用教程网站里添加收藏和设为首页代码桌面快捷方式图标不见了C#获取执行程序所在的当前路径的方法详解(XMLHttpRequest)进行跨域请求方法如何用远程桌面连接进行传输文件