谁帮写个DLL函数声明与实现的例子

2009-07-24 12:14:31 141 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

delphi调用vc写的dll的方法 1. 在VC中新建一个 DLL 工程。写如代码，如：extern "C"{ _declspec(dllexport) int getPPLength(); _declspec(dllexport) int npn(int m, int n);}int getPPLength(){ return 5* 12;}int npn(int m, int n) { int sum; 阅读详情

头文件 + CPP文件

...全文

VBA调用C/C++ DLL 在VBA开发过程中，为了能够使用系统已经提供的函数，或已经用C++语言开发的功能，本文对VBA调用C++ DLL进行了总结。 1. 函数声明 Function prototype: DWORD WINAPI GetCurrentDirectory( __i 阅读详情

liumang9527

VC/MFC 16,550 成员 421,606 内容

+ 关注 + 加入社区

切换为时间正序

oyljerry 2009-07-24

打赏
举报

http://www.vckbase.com/document/listdoc.asp?mclsid=13&sclsid=1303

jyh_baoding 2009-07-24

打赏
举报

楼上的对

iswjh 2009-07-24

打赏
举报

//入口函数
BOOL WINAPI DllMain(
HINSTANCE hinstDLL, // handle to DLL module
DWORD fdwReason, // reason for calling function
LPVOID lpReserved ) // reserved
{
// Perform actions based on the reason for calling.
switch( fdwReason )
{
case DLL_PROCESS_ATTACH:
// Initialize once for each new process.
// Return FALSE to fail DLL load.
break;

case DLL_THREAD_ATTACH:
// Do thread-specific initialization.
break;

case DLL_THREAD_DETACH:
// Do thread-specific cleanup.
break;

case DLL_PROCESS_DETACH:
// Perform any necessary cleanup.
break;
}
return TRUE; // Successful DLL_PROCESS_ATTACH.
}

//导出函数
__declspec(dllexport) int __cdecl myPuts(LPWSTR lpszMsg)
{
DWORD cchWritten;
HANDLE hConout;
BOOL fRet;

// Get a handle to the console output device.

hConout = CreateFileW(L"CONOUT$",
GENERIC_WRITE,
FILE_SHARE_WRITE,
NULL,
OPEN_EXISTING,
FILE_ATTRIBUTE_NORMAL,
NULL);

if (INVALID_HANDLE_VALUE == hConout)
return -1;

// Write a null-terminated string to the console output device.

while (*lpszMsg != L'\0')
{
fRet = WriteConsole(hConout, lpszMsg, 1, &cchWritten, NULL);
if( (FALSE == fRet) || (1 != cchWritten) )
return -1;
lpszMsg++;
}
return 1;
}

//Run-time dll加载
typedef int (__cdecl *MYPROC)(LPWSTR);

VOID main(VOID)
{
HINSTANCE hinstLib;
MYPROC ProcAdd;
BOOL fFreeResult, fRunTimeLinkSuccess = FALSE;

// Get a handle to the DLL module.

hinstLib = LoadLibrary(TEXT("myputs"));

// If the handle is valid, try to get the function address.

if (hinstLib != NULL)
{
ProcAdd = (MYPROC) GetProcAddress(hinstLib, "myPuts");

// If the function address is valid, call the function.

if (NULL != ProcAdd)
{
fRunTimeLinkSuccess = TRUE;
(ProcAdd) (L"Message sent to the DLL function\n");
}

// Free the DLL module.

fFreeResult = FreeLibrary(hinstLib);
}

// If unable to call the DLL function, use an alternative.

if (! fRunTimeLinkSuccess)
printf("Message printed from executable\n");
}

以上摘自MSDN,详细msdn中全有.

谁帮写个DLL函数声明与实现的例子

相关推荐