关于Delphi 调用vc的 dll出错

[yeflower]

利用VC++在Win32 Dynamic-Link Library下创建了dll工程
函数实现如下
extern "C" __declspec(dllexport) int getNumOne(int getA)
{
return getA;
}

结果在Delphi中调用，传入(1)调用正常，但是返回值却不正确，返回12433412

通过查找相关资料，应该是调用约定
1、__stdcall是Pascal程序的缺省调用方式，通常用于Win32 Api中，函数采用从右到左的压栈方式，自己在退出时清空堆栈。VC将函数编译后会在函数名前面加上下划线前缀，在函数名后加上"@"和参数的字节数。 int f(void *p) -->> _f@4(在外部汇编语言里可以用这个名字引用这个函数)
　　2、C调用约定（即用__cdecl关键字说明）（The C default calling convention）按从右至左的顺序压参数入栈，由调用者把参数弹出栈。对于传送参数的内存栈是由调用者来维护的（正因为如此，实现可变参数vararg的函数(如printf)只能使用该调用约定）。另外，在函数名修饰约定方面也有所不同。 __cdecl是C和C＋＋程序的缺省调用方式。每一个调用它的函数都包含清空堆栈的代码，所以产生的可执行文件大小会比调用__stdcall函数的大。函数采用从右到左的压栈方式。VC将函数编译后会在函数名前面加上下划线前缀。
　　是MFC缺省调用约定。

于是
extern "C" __declspec(dllexport) int __stdcall getNumOne(int getA)
{
return getA;
}
结果：Delphi中调用，开机第一次运行，传入(1)调用正常，结果得到1；以后再启动程序调用时，能得到正确的结果，但是show了以后，确定，程序就挂了。在显示结果以后，也释放了动态链接库的句柄。内存没有被清空。

写了dll,在VC下写的测试程序能够成功调用DLL,但是到了DELPHI却出现错误，就做了这样的测试dll,结果还是出错。 网上的关于DELPHI调用VC编写DLL的文章也不少，关于DELPHI中调用应该是没问题的。论坛中也有几个关于调用后失败的问题的贴，但是似乎都没有正确的解决。

请各位解惑一下

[panrongzeng]

按照delphi调用dll规范调用就没问题了。
出现问题可能是参数类型不对或者是类对象的创建、访问、释放之间关系没处理好

[yeflower]

（1）调用约定

C函数有_stdcall、_cdecl、_fastcall等多种调用约定，调用约定用来说明函数参数的压栈顺序和由谁（函数自身还是调用者）来修改堆栈。关于调用约定的详细说明，请参考我转载的另一篇文章。

编写供PB调用DLL，请使用_stdcall调用约定，如下所示：

extern "C" _declspec(dllexport) int _stdcall GetInt(char* name)
{
...
}


（2）def文件
在VC++中，如果生成DLL可以不使用.def文件，只需要在VC++的函数定义前加__declspec(dllexport)修饰就可以了。生成的DLL VC++用户可以直接使用，但PB、VB等用户使用会遇到函数名转换的问题。因为VC++对于__declspec(dllexport)声明的函数会进行名称转换，如下面的函数：

__declspec(dllexport) int _stdcall GetStr()

编译后会转换为 GetStr@0，这样在PB、VB中声明函数时应该声明GetStr@0，
如果函数带有参数，转换后的函数名将更加复杂，这使PB、VB用户使用起来很不方便。在def文件中由EXPORT输出函数可解决这个问题。
如dll要输出如下两个函数：
extern "C" _declspec(dllexport) int _stdcall GetInt(char* name)；
extern "C" _declspec(dllexport) char* _stdcall GetStr(int id)；

则def文件书写如下（TEST为工程名）：
LIBRARY "TEST"
DESCRIPTION 'TEST Windows Dynamic Link Library'

EXPORTS
; Explicit exports can go here
GetInt @1
GetStr @2

编译生成DLL后，在PB中要调用GetStr函数，只需做如下声明即可：

function string GetStr(int a) library("TEST.dll");

注意，如果您建的是Win32 Dynamic-Link Library 工程，def文件需要自己创建，然后把它加入工程，def文件名需和工程名相同。如您的工程名为test，则创建test.def。

最后一点很重要，我的问题也是在这里产生的。结贴

[kampan]

调用约定 对应好了

[qap22]

ding