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"
接下來調用
完畢。