在Delphi 10.2中链接Intel Fortran生成的静态库(.LIB)实现方法问询

前置编译要求（Fortran侧） #

• 保证Intel Fortran编译静态库的目标架构（x86/x64）和Delphi项目的目标架构完全匹配，二者位数不能混用
• 编译Fortran静态库时调整编译器配置：
  1. 进入Fortran项目属性，找到「Fortran」→「External Procedures」选项页
  2. 「Calling Convention」选择CDECL，和Delphi侧调用约定保持一致
  3. 「Name Case Interpretation」设置为Lowercase，「Append Underscore to External Names」设置为No，避免编译器自动添加符号修饰
  4. 所有需要对外暴露的函数，添加bind(C)语法固定符号名，示例如下：

  ! Fortran侧导出函数示例
  integer function add(a, b) bind(C, name='add')
      implicit none
      ! 按值传递参数需加value关键字，默认是按引用传递
      integer, value :: a, b
      add = a + b
  end function add
  

Delphi侧配置步骤 #

1. 声明外部函数原型：在Delphi代码的接口或实现段，声明和Fortran侧完全匹配的函数原型，调用约定和符号名必须和Fortran侧一致，示例如下：

// Delphi侧导入函数声明
function add(a: Integer; b: Integer): Integer; cdecl; external 'fortran_lib.lib';

如果Fortran侧参数是默认的按引用传递，Delphi侧需要将参数声明为var或指针类型。

2. 添加静态库到链接依赖，二选一即可：

• 直接将Fortran编译生成的.lib文件拖入Delphi的项目管理器面板，会自动加入链接列表
• 手动配置项目选项：依次打开「Project」→「Options」→「Delphi Compiler」→「Linking」，在「Additional options to pass to the linker」输入框中填写.lib文件的完整路径，若文件放在Delphi项目根目录可直接填写文件名

3. 补充Intel运行时依赖：Intel Fortran静态编译的lib会依赖官方运行时静态库，你需要将对应架构的运行时库也加入Delphi链接依赖，常用依赖库包括libifcoremt.lib、libmmt.lib、libirc.lib，所有运行时库都可以在Intel Fortran安装目录的compiler\lib\<架构>文件夹下找到。如果链接时报「未找到符号」错误，可以用dumpbin /symbols xxx.lib命令查询缺少的符号属于哪个运行时库，补充添加即可。

常见问题排查 #

• 链接时报「未找到标识符xxx」：使用dumpbin /symbols 你的Fortran静态库.lib查看导出的符号列表，核对Delphi侧external后指定的符号名是否和导出名完全一致
• 运行时结果异常、程序崩溃：检查两侧调用约定是否一致，参数传递方式（值传递/引用传递）是否匹配，数据类型长度是否对应（例如Fortran的real*8对应Delphi的Double，integer*4对应Delphi的Integer）

内容的提问来源于stack exchange，提问作者Eve Belisle