用VC创建供PB调用的DLL

发表于:2007-06-07来源:作者:点击数: 标签:
1、用vs .net 2003新建vc++项目中的WIN32 项目,项目名称为wxjextend,应用程序类型选择dll 2、在主 DLL 源文件中输入 long WXJEXTEND_API __s td call BitAnd(long bit1, long bit2) { return bit1 bit2; } long WXJEXTEND_API __stdcall BitOr(long bit1,

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"

接下来调用

完毕。


原文转自:http://www.ltesting.net