zhuhuanlai 发表于 2016-12-13 16:21:17

C#向FORTRAN中传递数据出错

大侠好,小弟又遇到问题还请抽空帮忙指点!
我有一个成熟的FORTRAN小程序,输入量几十个,输出量几百个。程序的结构为主程序,若干子程序和用MODULE定义的全局变量(程序的输入量,这些变量在主程序和各个子程序中都有用到)。现想用C#做一个界面,通过FORTRAN输出DLL(初想用显示链接),把用MODULE定义的全局变量(输入量)从C#界面中输入。
下边是我做的一个简单的调试例子生成FORTRAN的DLL时出现了以下问题。
FORTRAN代码如下:
MODULE EXAMP
use , Intrinsic :: ISO_C_Binding
implicit none
TYPE EXAMP_A
INTEGER(4), value :: N
REAL(8), value :: M
!DEC$ ATTRIBUTES DLLEXPORT :: TYPE EXAMP_A
END TYPE EXAMP_A
END MODULE EXAMP
Integer Function Add(X,B)Bind(C,Name="Add")!
!DEC$ ATTRIBUTES DLLEXPORT :: Add
use , Intrinsic :: ISO_C_Binding
implicit none
integer , value :: X , B
Add = M*N(X + b)
end Function Add
C#代码如下:

using System;
using System.Collections.Generic;
using System.Runtime.InteropServices;
using System.Text;
namespace ConsoleApplication1
{
    class Program
    {
      
//DLL文件地址
      extern static int Add(int A,int B);
      extern static structEXAMP_A
      {int N
      double M};
      static void Main(string[] args)
      {
            N=2   //想通过C#的结构体向FORTRAN的TYPE类型赋值
            M=0.5    //想通过C#的结构体向FORTRAN的TYPE类型赋值
            int c = Add(1,2);
            Console.WriteLine(c);
            Console.Read();
      }
    }
}

vvt 发表于 2016-12-13 19:10:19

你先学会在 C# 里实现:
1. 在一个 cs 文件里定义 struct
2. 在另一个 cs 文件里对其赋值。

然后你再学混编吧。走路还没学会,就开始跑了。
页: [1]
查看完整版本: C#向FORTRAN中传递数据出错