100分 求 dll中实现 调用dll调用者的函数指针

[redsleaf001]

我准备些一个 dll

在dll中实现一个功能：如下

函数 excaddr(int addr) 返回数据类型为 VARIANT

函数中实现对 addr 指针的调用 并传递参数类型为 DISPPARAMS *pDispParams 返回调用参数的数据 VARIANT类型

[cpp2017]

dll

typedef VARIANT (__cdecl CallInFunc)(DISPPARAMS *);
extern "C" __declspec(dllexport)  VARIANT __cdecl excaddr(int* addr)
{
	CallInFunc* pFun = (CallInFunc*)addr;
	//return 
	DISPPARAMS disp;
	return pFun(&disp);
}

//调用的程序

typedef VARIANT (__cdecl excaddr)(int *);
void CBankNoticeDlg::OnBnClickedOk()
{
	// TODO: 在此添加控件通知处理程序代码
		
	 HINSTANCE  hInstance=  LoadLibrary("dll.dll");
	excaddr* proc =(excaddr*) GetProcAddress(hInstance,"excaddr");

	VARIANT v = proc((int*)CallInFunc);
	CString str;
	str.Format("%d",v.intVal);
	AfxMessageBox(str);

}

[redsleaf001]

第一个得到的答案如果通过，100分全部献上 :))

[cpp2017]

代码运行肯定没问题，
不过不知道是不是你想要的．

[redsleaf001]

是我想到的，能运行，但是还有个小问题，就是，为什么我声明的全局变量不管用？？提示错误is not a member of '`global namespace'不是全局变量。

还有救是 short 类型转换到 int 用转化吗？



多谢老大

[redsleaf001]

我在class中引用的

[fishion]

全局变量参考：
在stdafx.cpp中加入:
int myInt;
然后在stdafx.h中加入:
extern int myInt

[cpp2017]

1.你在哪里声明？哪里用？

2.

还有救是 short 类型转换到 int 用转化吗？
==>
如果是普通数字类型则没问题，如果是函数地址肯定是不行，short不够用．

[redsleaf001]

出现问题，我是用E语言调用的 调用是成功了，可是调用过后就马上退出了！

typedef VARIANT (__cdecl CallInFunc)(DISPPARAMS *);

virtual /* [local] */ HRESULT STDMETHODCALLTYPE Invoke( 

/* [in] */ DISPID dispIdMember, 

/* [in] */ REFIID riid, 

/* [in] */ LCID lcid, 

/* [in] */ WORD wFlags, 

/* [out][in] */ DISPPARAMS *pDispParams, 

/* [out] */ VARIANT *pVarResult, 

/* [out] */ EXCEPINFO *pExcepInfo, 

/* [out] */ UINT *puArgErr){ 

if(dispIdMember!=0){
TCHAR printbuf[80];
wsprintf(printbuf,_T("错误码: %u\r\n 错误:%u"),dispIdMember,ddsaddr);
::MessageBox(NULL, printbuf , _T("错误信息") ,MB_OK | MB_ICONSTOP);


   CallInFunc* pFun = (CallInFunc*)ddsaddr;//函数地址，都没错，我调试错
   DISPPARAMS disp;
   *pVarResult = pFun(&disp);
}


return S_OK; 

} 

[redsleaf001]

里边没多少代码啊！哪里有错啊！郁闷！

[redsleaf001]

*pVarResult = pFun(&disp);
已经确定是返回信息的的错误，如果我换成 pFun(&disp) 不返回信息 就没错！

郁闷