函数名作为参数传递与回调函数

Posted 2023-04-26

函数名作为参数传递与回调函数成员函数名不能作为参数传递，否则会发生错误，因为里面隐藏着一个this 指针 回调函数，就是由你自己写的

参考技术A 函数名作为参数传递与回调函数
成员函数名不能作为参数传递，否则会发生错误，因为里面隐藏着一个this 指针
回调函数，就是由你自己写的。你需要调用另外一个函数，而这个函数的其中一个参数，就是你的这个回调函数名。这样，系统在必要的时候，就会调用你写的回调函数，这样你就可以在回调函数里完成你要做的事。
模块A有一个函数foo，它向模块B传递foo的地址，然后在B里面发生某种事件（event）时，通过从A里面传递过来的foo的地址调用foo，通知A发生了什么事情，让A作出相应反应。 那么我们就把foo称为回调函数。
我的理解:(有待再看)
eg:s.dll有一个函数s_create，向柜台服务器传递ServerCallBack函数的地址，之后，在柜台服务器里发生了某种事情后，通过s.dll的s_create里传递过来的ServerCallBack函数的地址，来调用ServerCallBack函数，通知s.dll发生了什么事情，让s.dll做出反应
比如，客户端发出了某个请求给s.dll，然后s.dll进行一系列通信工作，当s.dll调用s_create时，s.dll回停一会，先去做另外一件事件，就是执行ServerCallBack函数（该函数的指针是作为s_create的参数形式存在的），ServerCallBack执行了各种通信的消息处理之后，返回到s_create。继续向下进行
例子：
回调函数是一个很有用，也很重要的概念。当发生某种事件时，系统或其他函数将会自动调用你定义的一段函数。回调函数在使用的场合很多，比如Hook回调函数：MouseProc,GetMsgProc以及EnumWindows,DrawState的回调函数等等，还有很多系统级的回调过程。本文不准备介绍这些函数和过程，而是谈谈实现自己的回调函数的一些经验。
之所以产生使用回调函数这个想法，是因为现在使用VC和Delphi混合编程，用VC写的一个DLL程序进行一些时间比较长的异步工作，工作完成之后，需 要通知使用DLL的应用程序：某些事件已经完成,请处理事件的后续部分。开始想过使用同步对象，文件影射，消息等实现DLL函数到应用程序的通知，后来突 然想到可不可以在应用程序端先写一个函数，等需要处理后续事宜的时候，在DLL里直接调用这个函数即可。
于是就动手，写了个回调函数的原形。在VC和 Delphi里都进行了
一：声明回调函数类型。
vc版
typedef int (WINAPI *PFCALLBACK)(int Param1,int Param2) ;
二：声明回调函数原形
声明函数原形
vc版
int WINAPI CBFunc(int Param1,int Param2)；
三： 回调函数调用调用者
调用回调函数的函数我把它放到了DLL里，这是一个很简单的VC生成的WIN32 DLL.并使用DEF文件输出其函数名 TestCallBack。实现如下：
PFCALLBACK gCallBack=0;
void WINAPI TestCallBack(PFCALLBACK Func)

if(Func==NULL)return;
gCallBack=Func;
DWORD ThreadID=0;
HANDLE hThread = CreateThread( NULL, NULL, Thread1, LPVOID(0), &ThreadID );
return;

此函数的工作把传入的 PFCALLBACK Func参数保存起来等待使用，并且启动一个线程。声明了一个函数指针PFCALLBACK gCallBack保存传入的函数地址。
四： 回调函数如何被使用：
TestCallBack函数被调用后，启动了一个线程，作为演示，线程人为的进行了延时处理，并且把线程运行的过程打印在屏幕上.
五：万事具备
使用vc和Delphi各建立了一个工程，编写回调函数的实现部分
VC版
int WINAPI CBFunc(int Param1,int Param2)

int res= Param1+Param2;
TCHAR Buffer[256]="";
sprintf(Buffer,"callback result = %d",res);
MessageBox(NULL,Buffer,"Testing",MB_OK); //演示回调函数被调用
return res;


使用静态连接的方法连接DLL里的出口函数 TestCallBack,在工程里添加 Button( 对于Delphi的工程，还需要在Form1上放一个Edit控件，默认名为Edit1)。
响应ButtonClick事件调用 TestCallBack
TestCallBack(CBFunc) //函数的参数CBFunc为回调函数的地址
函数调用创建线程后立刻返回，应用程序可以同时干别的事情去了。现在可以看到屏幕上不停的显示字符串，表示dll里创建的线程运行正常。一会之后，线程延 时部分结束结束，vc的应用程序弹出MessageBox,表示回调函数被调用并显示根据Param1，Param2运算的结果，Delphi的程序 edit控件里的文本则被改写成Param1，Param2 的运算结果。
可见使用回调函数的编程模式，可以根据不同的需求传递不同的回调函数地址，或者定义各种回调函数的原形（同时也需要改变使用回调函数的参数和返回值约 定），实现多种回调事件处理，可以使程序的控制灵活多变，也是一种高效率的，清晰的程序模块之间的耦合方式。在一些异步或复杂的程序系统里尤其有用 --你可以在一个模块（如DLL）里专心实现模块核心的业务流程和功能，外围的扩展的功能只给出一个回调函数的接口，通过调用其他模块传递过来的回调函数地址的方式，将后续处理无缝地交给另一个模块，随它按自定义的方式处理。
本文的例子使用了在DLL里的多线程延时后调用回调函数的方式，只是为了突出一下回调函数的效果，其实只要是在本进程之内，都可以随你高兴可以把函数地址传递来传递去，当成回调函数使用。
这样的编程模式原理非常简单单一：就是把函数也看成一个指针一个地址来调用，没有什么别的复杂的东西，仅仅是编程里的一个小技巧。至于回调函数模式究竟能为你带来多少好处，就看你是否使用，如何使用这种编程模式了。

将表名作为参数传递时 PL/SQL 函数不起作用

【中文标题】将表名作为参数传递时 PL/SQL 函数不起作用

【英文标题】：PL/SQL function not working while passing table name as parameter

【发布时间】：2014-06-10 08:54:38

【问题描述】：

以下是我的功能，

create or replace 
FUNCTION checkXML
 (idx in number , tblname in varchar2) 
 return xmltype 
is 
required_xml XMLTYPE;
saved_hash_value raw(50);
current_hash_value raw(50);
xml_not_equal EXCEPTION;

begin
execute immediate 'select checkfield , my_hash(extract(xmlcol,'/')) , xmlcol into saved_hash_value , 
                   current_hash_value , required_xml  from ' || tblname || '  where indexid =' || idx ;


if saved_hash_value = current_hash_value then
  return required_xml;
else
  RAISE xml_not_equal;  
end if;

end;

我想知道哪里出错了。

收到的错误信息是，

ORA-06502: PL/SQL: numeric or value error: character to number conversion error
ORA-06512: at "SYSTEM.CHECKXML", line 11
06502. 00000 -  "PL/SQL: numeric or value error%s"
*Cause:    
*Action:

【参考方案1】：

您的 SQL 语句中有未转义的单引号，因此斜线 / 被解释为除法符号，而不是字符串的一部分。您需要添加转义：

my_hash(extract(xmlcol, ''/''))

您还应该为idx 真正使用绑定变量，而您的into 用于动态SQL 的位置错误：

execute immediate 'select checkfield , my_hash(extract(xmlcol, ''/'')) ,
  xmlcol from ' || tblname || ' where indexed = :idx'
into saved_hash_value , current_hash_value , required_xml
using idx;

也不确定您要实现的例外情况。您已在本地声明它，然后尝试引发它，但我认为这只会产生未处理的用户定义异常错误。您可能只想raise an application error，提供您自己的错误编号和消息，例如：

  ...
  if saved_hash_value != current_hash_value then
    raise_application_error(-20001, 'XML hash is not correct');  
  end if;
  return required_xml;
end;