用Fortran来实现DLL的编程和应用(2)

  Fortran程序中，很多用到了COMMON来进行数据的交换，如何在ＤＬＬ中处理也必须面对，在这里根据Fortran手册的程序，实现在Fortran程序间的调用。
但是在Fortran与C之间，好像不存在这里问题，Common只能是Fortran与Fortran之间的这种数据共享。

这一点在流程模拟程序Aspen Plus的原始代码中有大量的应用。

在VF6.5的Sample目录下有一个很好的例子。我们来进行分析。

二、涉及到用 Common 数据输入输出的 DLL

1            生成第一个DLL：DLL1

1.1           新建1个DLL的Project：dll1，编写第一个DLL1.for如下：

C This software DLL1.FOR is part of the Compaq Visual Fortran kit.

C

      PROGRAM DLL1

      END

     

      SUBROUTINE DLL1_SUB

cDEC$ ATTRIBUTES DLLEXPORT:: /DLL1_COMMON/, DLL1_SUB

cDEC$ ATTRIBUTES DLLIMPORT:: /DLL2_COMMON/