Delphi和VC混合编程总结

项目开发到了最后阶段，内核基本成型，Demo开发最终提上日程。

为了尽快完成Demo开发，毕竟Demo只是为了演示，所以决定使用Delphi来完成，因为做界面Delphi的效率是相当高的。而我们的内核引擎是使用C++开发，VC编译，这就涉及到了Delphi和VC的混合编程，这里将这几天来的经验总结共享出来，需要的时候可以随时查看。

目前的程序结构是这样的，内核使用dll封装为SDK，交付兄弟部门或者其他公司做二次开发，Demo采用Delphi主调内核，并实现结果呈现。

首先，在接口一层，要保证Delphi能够和VC进行数据交互，所以需要对应相关的数据类型。同时这里不推荐在接口函数层使用复杂数据类型，因为如果参数和返回值过于复杂，是不能简单通过基本类型来进行传递的，这样编译器内部就会进行编码，以完成复杂数据类型的传递。但是不同的语言，甚至不同的编译器的内部实现不同，很容易导致复杂数据类型数据传递失败，而产生无效传递的情况，切记切记。

基本类型对照表如下：

VC --------------------- Delphi

int                               Integer
unsigned int              Cardinal
char                           Byte
wchar_t                     WideChar
int*                             PInteger
unsigned int*            PCardinal
char                           PByte
wchar_t                     PWideChar
等

在数据类型对应的情况下，才能保证类型能够正确传递

其次，接口函数调用规范的统一

由于函数调用过程中函数参数要通过堆栈进行传递，而参数在堆栈中所占空间的释放问题由谁进行，直接导致函数调用规范的提出，这就是我们知道的stdcal，cdcel，pascal，fastcal等调用规范，为了保证参数的正确传递和结果的正确获取，需要在两种语言中统一调用规范。

这里使用stdcal，没有什么特殊的理由来选择这个，目的只有一个，那就是统一，以保证参数传递正确

最后，Delphi中声明VC动态链接库的导出函数

格式举例：

原型：
const wchar_t* __stdcall testW(const wchar_t* waveFile, const wchar_t* waveFmt, const wchar_t* grammarList, const wchar_t* params, int *recogStatus, int *result);

function test(waveFile:PWideChar;
                          const wav_Fmt: PWideChar;
                          const grammarList:PWideChar;
                          const params:PWideChar;
                          recogStatus:PInteger;
                          func_result:PInteger): PWideChar;stdcall;
                                                 external “qisr.dll” name 'testW';

简单解释一些函数声明的含义：
function 用于定义函数
external 关键字用于定义导出该函数的动态链接库名
name 用于定义动态链接库中导出函数的导出名

如果有VC链接库开发经验的朋友可能会发现，为什么Delphi中没有类似VC中对应于dll的lib导入库呢？这里简单解释一下，其实VC中与dll配套的lib文件起到的作用也就是告诉连接器静态链接导出函数的时候，从哪里获取导出函数入口地址用的，实际没有实体代码，这里Delphi中的声明代码其实起到的也就是这个作用。由于lib没有实体代码，所以很容易通过dll获取对应的lib导入库。