FORTRAN与C#中数据传递方式的请教

vvt

最简单的方法,还是用参数传递.
可以把输入参数都写在一个 struct 里,传递给 fortran,当做 type 使用.
fortran 里把这个 type 的成员值赋给对应的module中的变量.
(如果有必要,执行完,再把这些值放回type里)
(或者通过另一个输出的 type 返给 C# , C# 显示在界面上)

通过 type / struct 传递,需要注意结构字节对齐.其他的都很方便.我一直都是这么做的.

vvt

你说的是"显式链接"和"隐式链接"
这与是否使用type和派生类型没有关系的.都可以的.

vvt

我这里有一个和 C++  混编用结构体的例子.可以借鉴

[C++] 纯文本查看 复制代码

#include <iostream>
using namespace std;
extern "C" int myfortran( struct in *a , struct out *b);

struct in{
  int i;
  double rr;
};
struct out{
  char a[4];
  double rr;
};
int main()
{
  struct in X;
  struct out Y;
  X.i = 3;
  X.rr= 6.0;    
  int c = myfortran( &X , &Y );
  cout << "C++输出" << Y.a << Y.rr << endl;
  //printf("c=%s,r=%f\n",Y.a,Y.rr);
  return 0;
}

[Fortran] 纯文本查看 复制代码

Integer Function my(pA,pB)  Bind(C,Name="myfortran")
  use , Intrinsic :: ISO_C_Binding
  implicit none
  type T_IN
    integer(C_INT) :: i
    real(C_DOUBLE) :: rr 
  end type T_IN
  type T_OUT
    character(len=4) :: a
    real(C_DOUBLE) :: rr 
  end type T_OUT
  type(T_IN) , pointer :: A
  type(T_OUT), pointer :: B
  type(C_PTR) , value :: pA , pB
  call c_f_pointer( pA , A )
  call c_f_pointer( pB , B )
  write(*,*) '给Fortran输入',A
  B%rr = A%rr + 1.d0
  B%a  = "OUT" // c_null_char
end Function my

vvt

通过 obj 或 lib 或 dll 都是可以的，没有多大区别。
VS应该只能用两个工程，不能用同一个工程。（需要把 fortran工程的输出（比如obj或lib）放入C的工程）
也可以用 dll 动态加载方式。