delphixe3调用C语言开发的dll接口中参数之间数据类型转换及处理

最新推荐文章于 2021-05-19 08:09:04 发布

cms26

最新推荐文章于 2021-05-19 08:09:04 发布

阅读量1.2k

点赞数

CC 4.0 BY-SA版权

分类专栏： delphi 文章标签： delphi dll pAnsichar base64

本文链接：https://blog.youkuaiyun.com/cms26/article/details/81088235

在升级到DelphiXE3后，调用C语言开发的DLL接口遇到问题，主要由于Delphi7中的PChar与从Delphi2010开始的PChar（默认为PWideChar）类型差异。解决方法是在DelphiXE3中使用PAnsichar类型来匹配C接口。在实际应用中，涉及Base64解码的参数传递，发现内置解码方法导致乱码或长度错误，最终通过DecodeBase64方法配合字节数组转换成功解决，但具体原因不明。欢迎交流讨论。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

写这篇博客的原因：之前我是用delphi7开发，在调用c版的dll接口时从没有出现过问题，后来升级为delphixe3版本开发时，出现一些令人头疼的问题，我费了很大劲才解决。

Delphixe3出现如下问题：

举个例子：dll文件接口定义如下

int testDLLfun(unsigned char*a,unsigned long aLen,  unsigned char* b, unsigned long * bLen);

当Delphi调用该函数时，若在delphi7中char*对应的是pchar类型（delphi7中默认的pchar就是PAnsichar类型），而从delphi2010版本以上pchar类型默认指的是PWidechar，因此在delphixe3中我们要定义成PAnsichar类型，在这里我用的是静态调用dll的方式。

function  testDLLfun(a:PAnsiChar;aLen:Integer; b:PAnsiChar;bLen:pInteger):Integer;stdcall;  external'dllName.dll' name  'testDLLfun';

具体实现调用delphi中的testDLLfun方法如下

function test(const  aStr: AnsiString): String;
var aStr1:AnsiString;
bLen,retcode:Integer;
b:PAnsiChar;
bMemoryStream:TMemoryStream;
aBytes:TBytes;
begin
bMemoryStream:=TMemoryStream.Create;
try
bLen:=2048;
Se