用VC创建供PB调用的DLL

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"

接下来调用

完毕。

Published At
Categories with 数据库类
comments powered by Disqus