1、用vs.net2003新建vc++项目中的“WIN32 项目”,项目名称为wxjextend,应用程序类型选择dll
2、在主 DLL 源文件中输入
long WXJEXTEND_API __stdcall BitAnd(long bit1, long bit2)
{
return bit1 & bit2;
}
long WXJEXTEND_API __stdcall BitOr(long bit1, long bit2)
{
return bit1 | bit2;
}
long WXJEXTEND_API __stdcall BitNot(long bit)
{
return ~bit;
}
3、创建head(wxjextend.h)文件,输入以下代码
#ifdef WXJEXTEND_EXPORTS
#define WXJEXTEND_API __declspec(dllexport)
#else
#define WXJEXTEND_API __declspec(dllimport)
#endif
long WXJEXTEND_API __stdcall BitAnd(long bit1, long bit2);
long WXJEXTEND_API __stdcall BitOr(long bit1, long bit2);
long WXJEXTEND_API __stdcall BitNot(long bit);
4、别忘了在主DLL源文件加入
#include "wxjextend.h"
5、创建wxjextend.def文件,输入:
LIBRARY wxjextend
EXPORTS BitAnd= ?BitAnd@@YGJJJ@Z
EXPORTS BitOr = ?BitOr@@YGJJJ@Z
EXPORTS BitNot = ?BitNot@@YGJJ@Z
6、编译
7、将wxjextend.dll拷贝到PB的应用程序目录下,在PB中声明函数
Function long BitAnd(long op1,long op2) library "wxjextend.dll"
Function long BitOr(long op1,long op2) library "wxjextend.dll"
Function long BitNot(long op) library "wxjextend.dll"
接下来调用
完毕。