082-C++Bulider高级应用教案分析.ppt

  1. 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
// 以下两行对需要调用的输入函数进行说明 extern C__declspec (dllimport)__stdcall int add (int a, int b); extern C__declspec (dllimport) char* SayHello (char* Name); //--------------------------------------------------------------------------- void__fastcall TForm1::Button1Click (TObject *Sender) { Label1-Caption = IntToStr (add (StrToInt (Edit1-Text), StrToInt (Edit2-Text))); } //--------------------------------------------------------------------------- void__fastcall TForm1::Button2Click (TObject *Sender) { Label1-Caption = SayHello (Edit1-Text.c_str ( )); } //--------------------------------------------------------------------------- 【评析】 凡程序中需调用输入函数时,必须进行声明。该声明一般与DLL源程序中的输出函数声明相一致,只要把输出函数声明中的__declspec (dllexport) 改为__declspec(dllimport)即可。更规范的做法是将这些声明写入头文件(扩展名为.h),然后使应用程序的单元文件包含该头文件。因为SayHello的参数为char*类型,所以要用c_str方法将Edit1-Text转换成同样类型的串。若运行时出问题,请先检查一下DLL文件是否已放在应用程序的同一目录下,并且在项目中加入了DLL的.lib文件。该程序运行时按下“Call SayHello”后的画面如图11-10所示。 图11-10 程序调用了DLL中的SayHello函数 11.3.5 动态加载DLL 动态加载DLL指程序运行时加载DLL,需要使用Win32 API函数LoadLibrary或LoadLibraryEx。DLL被动态加载后,应使用Win32 API函数 GetProcAddress ( ) 得到DLL 中输出函数的地址(指针),应用程序中可使用该指针调用DLL外部函数。这样也就不需要使用.lib文件了。下面是一个例子。 【例11-8】 利用例9-6中已建立的DLL,假定编译产生的DLL文件是 dlltest.dll。 新建一个项目,窗体内放入两个编辑框和一个命令按钮。然后在Unit1.cpp中加入以下声明和事件代码: //Unit1.cpp文件? int (__stdcall* Add) (int, int); //必须声明为一个函数指针,然后用GetProcAddress //取得DLL中对应函数的地址(也可以在Unit1.h中声明) //--------------------------------------------------------------------------- void__fastcall TForm1::Button1Click (TObject *Sender) { HINSTANCE DLLInst = NULL; DLLInst = LoadLibrary (dlltest.dll); //装载DLL并返回模块句柄 if (DLLInst) { Add = (int (__stdcall*)(int, int)) GetProcAddress (DLLInst, add); if (Add) Caption = IntToStr (Add (Edit1-Text.ToInt ( ), Edit2-Text.ToInt ( ))); else ShowMessage (Don\t obtain function pointer); FreeLibrary (DLLInst); //释放DLL }

文档评论(0)

阿里山的姑娘 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档