c++ - 如何使用字符串参数在Delphi中调用C++ DLL？

Question

我的 Delphi 应用程序正在从 C++ DLL 调用一个函数，该函数应该返回这样的字符串。

C++动态链接库

__declspec( dllexport ) void sample(char* str1, char* str2)
{
    strcpy(str1, "123");
    strcpy(str2, "abc");
}

德尔福

procedure sample(Str1, Str2: pchar); cdecl; external 'cpp.dll';
var
  buf1 : Pchar;
  buf2 : Pchar;
begin
  sample(@buf1, @buf2);
  //display buf1 and buf2
  //ShowMessage(buf1); //it display random ascii characters 
end;

正确的做法是什么？

Answer 1

您需要为要写入的 C++ 代码分配内存。例如:

var
  buf1, buf2: array [0..255] of Char;
begin
  sample(buf1, buf2);
end;

您还应该重新设计您的界面以接受缓冲区的长度，从而允许 DLL 代码避免缓冲区溢出。