c - 使用分配的字符缓冲区调用 DLL 函数，该函数填充在 Inno Setup 中

问题描述

我在 Windows 10 64 位上使用 (Unicode) Inno Setup 6.0.5。

我要使用的导出符号具有签名：

typedef int(__stdcall *GetDirVST2x86) (LPWSTR lpString1);

Inno Setup [Code]部分的声明如下：

function GetDirVST2x86(var lpString1: String): Integer;
external 'GetDirVST2x86@files:R2RINNO.DLL stdcall setuponly';

其中，lpString1函数返回后将包含指向宽字符串的指针，并且 R2RINNO.DLL 是一个 32 位 DLL。

现在我的问题是，如果我编译并运行这个设置，当我尝试检索值时就会发生读取访问冲突。当我从 C 程序执行相同的函数时，我得到了正确的结果。从 Inno 脚本中的原型声明中删除会var获取一个空（或可能）空或空白字符串，因此这也无济于事。

我没有想要使用的 DLL 的源代码，并且我从 IDA 中找到了签名。脚本引擎 Inno Setup 似乎完全不够用，因为它根本不支持指针。

我观察到的一件有趣的事情是，如果我将类型更改lpString1为CardinalorInteger并用于IntToStr获取字符串，我将获得创建设置的目录的值。

这是一个有效的 C 代码：

#include <windows.h>
#include <stdio.h>

#define _UNICODE
#define UNICODE

typedef int(WINAPI *GetDirVST2x86) (LPWSTR );

int main() {
    HMODULE hModule = LoadLibrary("R2RINNO.DLL");
    if (NULL != hModule) {
        GetDirVST2x86 pGetDirVST2x86 = (GetDirVST2x86) GetProcAddress (hModule, "GetDirVST2x86");
        if (NULL != pGetDirVST2x86) {
            LPWSTR lpszVST2x86;
            pGetDirVST2x86(lpszVST2x86);
            wprintf(lpszVST2x86);
        }
        FreeLibrary(hModule);
    }
}

这是输出：

C:\Program Files (x86)\Steinberg\VstPlugins

这是我要使用的函数的 IDA 屏幕截图：

标签： cwinapidllinno-setuppascalscript

等效于 C 声明的 Pascal Script 应该是：

function GetDirVST2x86(lpString1: string): Integer;
  external 'GetDirVST2x86@files:R2RINNO.DLL stdcall setuponly';

（即 no var，因为它是输入字符指针参数）。

假设函数合约是您（作为调用者）分配一个缓冲区并将其提供给要填充的函数，您应该像这样调用函数：

var
  Buf: string;
begin
  { Allocate buffer for the result large enough according to the API specification }
  SetLength(Buf, 1000);
  GetDirVST2x86(Buf);
  SetLength(Result, Pos(#0, Result) - 1);
end;

另请参阅如何将字符串从 DLL 返回到 Inno Setup？

c - 使用分配的字符缓冲区调用 DLL 函数，该函数填充在 Inno Setup 中

问题描述

解决方案

推荐阅读