delphi - 找出 ISAPI dll 的物理路径

Question

我正在转换 Delphi ISAPI dll，以便在 IIS 7.0 和 7.5 上更好地工作。 ISAPI 过去从注册表中读取其配置，但我想将其转换为使用同一文件夹中的 web.config 文件。

它在 CGI 中工作得很好，但在 ISAPI 中却是另一回事。我正在使用 GetModuleFileName 来获取模块的路径，当然，它会返回 IIS 工作进程的路径 (C:\Windows\SysWOW64\inetsrv)。

有没有办法获取ISAPI dll本身的物理路径？

Answer 1

我正在使用这个功能并且效果很好。

function GetDllName: string;
var
  pName: PChar;
begin
  GetMem(pName, 200);
  windows.GetModuleFileName(HInstance, pName, 200);
  Result := string(pName);
  FreeMem(pName);
end;